Πρώτα Βήματα - Desktop Applications

Απ: hard-coded database insert/delete/update με χρήση VB2005 & SQL2005

Q-apprentice — Thu, 08 Apr 2010 18:30:10 GMT

Τελικά με λίγη υπομονή και προσπάθεια τα κατάφερα. Στην ουσία έφτιαξα ένα module και functions με τα queries τα οποία θέλω και τα καλώ την στιγμή που τα χρειάζομαι ως ένα απλό function.

Απ: hard-coded database insert/delete/update με χρήση VB2005 & SQL2005

Q-apprentice — Mon, 16 Nov 2009 08:29:18 GMT

Δεν θέλω να χρησιμοποιησω τον wizard γιατί θέλω να κάνω αλλαγές στα queries hard-coded και να τα χειρίζομαι μέσω κώδικα για λόγους re-usability. Τώρα αν είναι πιο εύκολο με τον wizard θα ήθελα την βοήθεια σας πάνω σε αυτό.

Ευχαριστώ πολύ

Απ: hard-coded database insert/delete/update με χρήση VB2005 & SQL2005

nikolaosk — Mon, 16 Nov 2009 04:59:05 GMT

Γιατί δεν θέλεις να χρησιμοποιήσεις τον wizard?

κάνεις ένα νέο window forms application... εγώ εδώ σου έχω κάτι σε Vb.

κάνεις μια μέθοδο(Private Sub GetDataFromDB(ByVal selectCommand As String)), που σε αυτή συνδέεσαι στην βάση,εκτελείς το ερώτημα, κάνεις populate with data ένα datatable, και δένεις το data table με ένα bindingsource.

τώρα στο form2_load event απλά θέτεις το datascource του gridview στο bindingsource

και μετά καλείς την μέθοδο που έχεις ήδη φτιάξει και περνάς σαν παράμετρο στην μέθοδο το sql clause.

απλά σύρε ένα datagridview control, και στο form2.vb (form2 είπα εγώ την φόρμα μου), σου παραθέτω τοn κώδικα παρακάτω με κάποια σχόλια

Imports System.Data.SqlClient


Public Class Form2

    Private bindingSource1 As New BindingSource()
    Private dataAdapter As New SqlDataAdapter()



    Private Sub Form2_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load
        Me.DataGridView1.DataSource = Me.bindingSource1
        GetDataFromDB("select * from Authors")

    End Sub



    Private Sub GetDataFromDB(ByVal selectCommand As String)

        Try

            ' Specify a connection string. i use pubs sample db
            Dim connectionString As String = _
                "Integrated Security=SSPI;Persist Security Info=False;" + _
                "Initial Catalog=Pubs;Data Source=."
            ' Create a new data adapter object
            Me.dataAdapter = New SqlDataAdapter(selectCommand, connectionString)

           
            ' Populate the new data table and bind it to the BindingSource.
            Dim table As New DataTable()

            Me.dataAdapter.Fill(table)
            Me.bindingSource1.DataSource = table


            Me.DataGridView1.AutoResizeColumns( _
                DataGridViewAutoSizeColumnsMode.AllCellsExceptHeader)
        Catch ex As SqlException
            MessageBox.Show(ex.Message)
        End Try

    End Sub
End Class

hard-coded database insert/delete/update με χρήση VB2005 & SQL2005

Q-apprentice — Mon, 16 Nov 2009 00:46:12 GMT

Καλησπέρα σε όλους,

Θέλω να κάνω το εξής σε μια εφαρμογή που φτιάχνω... Σε μια φόρμα 4 πεδίων, θέλω τις τιμές των πεδίων να καταχωρηθούν/διαγραφούν/τροποποιηθούν σε μια βάση δεδομένων στα αντίστοιχα πεδία πατώντας το ανάλογο κουμπί στην φόρμα κάθε φορά.

Το πρόβλημα μου είναι πως θα συνδέσω το data grid μιας φόρμας που κάνει display Τα στοιχεία ώστε στο form load να διαβάζει τα περιεχόμενα του πίνακα της βάσης χωρίς να χρησιμοποιήσω τον wizard που παρέχει το IDE του Visual Studio ? Έχω διαβάσει πως πρέπει να φιτάξω το connection στην βάση, το grid και την σύνδεση μεταξύ αυτών για να μπορέσω να τρέξω τα queries που θέλω. Το πρόβλημα μου λοιπόν είναι πως δεν έχω κάποιο παράδειγμα να δω για να βασιστώ.

Αν μπορείτε να με βοηθήσεται θα το εκτιμήσω πολύ.

Ευχαριστώ εκ των προτέρων