ADO SQL Server Tutorial

Έχοντας τη γνώση για να δημιουργήσετε και να χρησιμοποιήσετε μια σύνδεση ADO με τον SQL Server μπορεί να σας εξοικονομήσει χρόνο , όταν θα πρέπει να διερευνούν τα δεδομένα από μια βάση δεδομένων . Ο SQL Server είναι ένα σχεσιακό σύστημα διαχείρισης βάσεων δεδομένων που χρησιμοποιούνται συνήθως για τη δημιουργία μεγάλων βάσεων δεδομένων σε πολλαπλούς χρήστες σε πολλαπλές τοποθεσίες . Μπορείτε να χρησιμοποιήσετε το ADO συνδέσεις σε πολλές γλώσσες προγραμματισμού ? Αυτό το παράδειγμα χρησιμοποιεί το Microsoft Visual Basic.NET . VB.NET είναι μια αντικειμενοστραφής γλώσσα προγραμματισμού που είναι σχετικά εύκολο να μαθαίνουν και να χρησιμοποιούν . Τα πράγματα που θα χρειαστείτε για Microsoft Visual Basic Express
Microsoft SQL Server

Παρουσίαση Περισσότερες οδηγίες
Η

1 Ανοίξτε το Microsoft Visual C # Express και επιλέξτε "New Project ... " από το αριστερό παράθυρο της οθόνης σας . Κάντε κλικ στο " Visual Basic " υπό τον τίτλο " Εγκατεστημένα πρότυπα " διπλό κλικ στο " Windows Forms Application ". 2

Κάντε κλικ στο "Toolbox " παράθυρο και κάντε διπλό κλικ στο " κουμπί" για να προσθέσετε ένα νέο κουμπί στη φόρμα σας . Κάντε κλικ στο μενού "Έργο" και επιλέξτε " Properties" . Κάντε κλικ στην επιλογή "Αναφορές " και στη συνέχεια επιλέξτε "Προσθήκη " . Επιλέξτε " COM " και κάντε κλικ στο " " Microsoft ActiveX Data Objects Library " " . Κάντε κλικ στο " OK".
Εικόνων 3

διπλό κλικ στο " Button1 " για να ανοίξει το μάθημα « Form1.vb " . Πληκτρολογήστε τα ακόλουθα στην πρώτη γραμμή πάνω "Δημόσια Τάξη Φόρμα1 " :

εισαγωγές ADODB
Η 4

Πληκτρολογήστε το παρακάτω για να δηλώσετε τις μεταβλητές σας παρακάτω " Button1_Click " :

Δημ. con As New ADODB.Connection

Dim rst As New ADODB.Recordset

Dim sXMLResult Όπως String

5

Πληκτρολογήστε το παρακάτω για να ανοίξετε τη σύνδεση σας βάση δεδομένων του SQL Server :

con.ConnectionString = " Provider = SQLNCLI10 ? " _

& "Ο διακομιστής = το όνομα του διακομιστή σας? " _

& "Η βάση δεδομένων = το όνομα της βάσης δεδομένων σας ? " _

& « Ολοκληρωμένη Ασφάλεια = SSPI ? " _

& " DataTypeCompatibility = 80 ? " _

& " MARS Connection = False ? "

con.Open ( )
Η 6

Πληκτρολογήστε την ακόλουθη ερώτημα για έναν πίνακα βάσης δεδομένων του SQL Server :

rst.ActiveConnection = con

RST = con.Execute ( "SELECT tableName.fieldName ΑΠΟ tableName ? " )
Η 7

Πληκτρολογήστε το παρακάτω, για να βρόχο μέσω όλων των εγγραφών στον πίνακα :

Ενώ ( Δεν rst.EOF )

sXMLResult = rst.Fields ( " fieldname " ) . Value

MsgBox ( sXMLResult )

rst.MoveNext ( )

End Ενώ
Η 8

Πληκτρολογήστε το παρακάτω, για να κλείσετε τη σύνδεση και την απελευθέρωση μεταβλητή από τη μνήμη :

con.Close ( )

con = Τίποτα

Πατήστε το πλήκτρο " F5 " για να τρέξετε το πρόγραμμά σας στη συνέχεια κάντε κλικ στο κουμπί " Button1 ".
Η
εικόνων