Πώς να περάσει μεταβλητές Από Visual Basic για πρόσβαση ερωτήματος

Microsoft Access είναι ένα μικρό μηχανισμό διαχείρισης βάσεων δεδομένων που χρησιμοποιούνται από αρχάριους ή για τις ιστοσελίδες μικρής κλίμακας . Μπορείτε να χρησιμοποιήσετε το Visual Basic ( VB ) να θέσει υπό αμφισβήτηση τη βάση δεδομένων απευθείας στον κώδικά σας . Αυτό είναι ευεργετικό για εκείνους που θέλουν να παρέχουν μια δυναμική ιστοσελίδα για τους αναγνώστες τους . Για να υποβάλετε ερώτημα στη βάση δεδομένων , θα πρέπει να δημιουργήσετε μια σύνδεση , να στείλετε το ερώτημα και να εκχωρήσετε τα αποτελέσματα στη δική σας Visual Basic μεταβλητή . Οδηγίες
Η

1 Κάντε διπλό κλικ φόρμα της Visual Basic για να ανοίξετε το αρχείο κώδικα και τοποθετήστε το σε επεξεργαστή VB σας . Μετακινηθείτε προς τα κάτω στο τμήμα του κώδικα VB σας, όπου θέλετε να τοποθετήσετε τη σύνδεση της βάσης δεδομένων και το ερώτημα . 2

Δημιουργία σύνδεσης σε βάση δεδομένων σας . Η μεταβλητή σύνδεσης περιλαμβάνει τον εξυπηρετητή και τη βάση δεδομένων στην οποία θέλετε να συνδεθείτε . Ο παρακάτω κώδικας δημιουργεί μια σύνδεση :

Dim conn Όπως String = "Πηγή δεδομένων = localhost ? Initial Catalog = Northwind ? Ολοκληρωμένη Ασφάλεια = True "

Δημ. sqlcon Όπως SqlConnection = Νέα SqlConnection ( conn )

sqlcon.Open ( )

η "localhost " κείμενο συνδέεται στον τοπικό υπολογιστή στον οποίο βρίσκεται ο κώδικας της ιστοσελίδας. Εάν ο διακομιστής της βάσης δεδομένων σας βρίσκεται σε διαφορετικό υπολογιστή , πληκτρολογήστε το όνομα του υπολογιστή αντί για " localhost ". Αντικαταστήστε το " Northwind " με το όνομα της βάσης δεδομένων σας .
Εικόνων 3

Ερώτημα τους πίνακες και να ανακτά πληροφορίες της βάσης δεδομένων σας . Ο ακόλουθος κώδικας δείχνει πώς μπορείτε να το ερώτημα της Access χρησιμοποιώντας τη σύνδεση που δημιουργήσατε στο βήμα τρία:

Dim μεταβλητή As String = " Μαϊάμι"

Dim strSelect As String = "SELECT * FROM Customers WHERE Πόλη = » και μεταβλητό & " '"

Dim dscmd As New SqlDataAdapter ( strSelect , sqlcon )

Dim ds As New DataSet ( )

dscmd.Fill (ds , " πελάτες " )

στην παραπάνω κώδικα , ένα ερώτημα στέλνεται στη βάση δεδομένων της Access χρησιμοποιώντας τη μεταβλητή που ονομάζεται " μεταβλητή ". Η μεταβλητή περιέχει την πόλη " Μαϊάμι ". Η μεταβλητή αυτή αποστέλλεται στη βάση δεδομένων Access. Το ερώτημα έχει αποσταλεί και πραγματοποιήθηκε σε μια μεταβλητή δέσμη που ονομάζεται « DS. "
Η 4

Εκτυπώστε το πρώτο ρεκόρ να δοκιμάσετε το νέο σας κωδικό . Ο κώδικας που ακολουθεί εκτυπώνει το τελευταίο όνομα από την πρώτη εγγραφή στα αποτελέσματα του ερωτήματος :

MsgBox ds.Tables.Item ( " last_name " )
Η
εικόνων