1 Κάντε κλικ στο κουμπί των Windows " Start" και επιλέξτε " Όλα τα προγράμματα ". Κάντε κλικ στο " Microsoft. NET Framework , " και στη συνέχεια κάντε κλικ στο κουμπί " Visual Studio " για να ανοίξετε το λογισμικό . 2
Ανοίξτε το αρχείο έργου σας για να φορτώσει όλο τον κώδικα . Κάντε διπλό κλικ στη φόρμα που θέλετε να χρησιμοποιήσετε για να συνδεθείτε με το διακομιστή .
Εικόνων 3
Προσθέστε τις βιβλιοθήκες ADO στην κορυφή του αρχείου κώδικα . Αντιγράψτε και επικολλήστε τα ακόλουθα αρχεία βιβλιοθήκης στο συντάκτη VB σας :
Εισαγωγές System.Data
Εισαγωγές System.Data.SqlClient
Η 4
Δημιουργήστε τη σύνδεση SQL Server χρησιμοποιώντας το αντικείμενο ADO . Ο ακόλουθος κώδικας συνδέεται με το " ο_διακομιστής_μου " SQL Server :
Dim connstring Όπως String
connstring = "Ο διακομιστής = ο_διακομιστής_μου ? Uid = το όνομα χρήστη ? Pwd = κωδικό ? Βάση δεδομένων db = ? "
Dim conn As New SqlConnection ( connstring )
conn.Open ( )
Αντικαταστήστε το " ο_διακομιστής_μου ", " όνομα ", "password ", και τις αξίες " db " με σας δικές του πληροφορίες διακομιστή.
5
Ερώτημα το διακομιστή . Αφού συνδεθείτε στο διακομιστή , μπορείτε να υποβάλετε ερώτημα για τις πληροφορίες της βάσης δεδομένων . Ο ακόλουθος κώδικας ανακτά μια λίστα με τους πελάτες :
Dim εντολή As New SqlCommand ( "SELECT * από τους πελάτες " , conn )
Dim αναγνώστη Όπως SqlDataReader = command.ExecuteReader ( )
6
Κλείστε τη σύνδεση . Αφού ολοκληρώσετε την αναζήτηση του διακομιστή, κλείστε τη σύνδεση χρησιμοποιώντας τον ακόλουθο κώδικα :
conn.Close
Η
εικόνων
Πνευματικά δικαιώματα © Γνώση Υπολογιστών Όλα τα δικαιώματα κατοχυρωμένα