Εάν σχεδιάζετε σχετικά με τη χρήση μιας βάσης δεδομένων Access στην εφαρμογή σας VB.NET , το πρώτο πράγμα που χρειάζεται να κάνετε είναι να δημιουργήσετε τη βάση δεδομένων της Access . Στην VB.NET η υπηρεσία παροχής Microsoft Jet OLE DB χρησιμοποιείται για να δημιουργήσει μια βάση δεδομένων της Access. Αυτός ο παροχέας είναι ένα αντικείμενο COM και πρέπει να προστεθεί ως αναφορά στο έργο σας προτού να μπορεί να χρησιμοποιηθεί . Το πραγματικό όνομα του αντικειμένου είναι "Microsoft ADO Ext .
εικόνων Κάνοντας σύνδεσης σε βάση δεδομένων
Η
Για να αποθηκεύσετε τα δεδομένα σε μια βάση δεδομένων της Access από την εφαρμογή σας VB.NET , θα πρέπει να κάνετε μια σύνδεση βάσης δεδομένων . Η " OdbcConnnection " αντικείμενο χρησιμοποιείται για να δημιουργήσει μια μοναδική σύνδεση με τη βάση δεδομένων, χρησιμοποιώντας μια συμβολοσειρά σύνδεσης . Η άλλη επιλογή σύνδεσης είναι να χρησιμοποιήσετε το " OleDbConnection " αντικείμενο .
Η Καταστάσεις SQL
Η
δηλώσεις SQL είναι ένα κρίσιμο μέρος κατά τη χρήση μιας βάσης δεδομένων Access από το VB . NET . Αυτές οι δηλώσεις σας επιτρέπουν να προσθέσετε, να τροποποιήσετε και να ανακτήσετε τα δεδομένα από τη βάση δεδομένων σας . Η " INSERT INTO " δήλωση σας επιτρέπει να εισάγετε δεδομένα σε πίνακες της βάσης δεδομένων της Access . Η " ΕΝΗΜΕΡΩΣΗ" δήλωση SQL σας επιτρέπει να τροποποιήσετε τα δεδομένα σε έναν πίνακα . Η πλέον χρησιμοποιούμενη δήλωση SQL είναι το "SELECT " δήλωση. Αυτή η εντολή χρησιμοποιείται για την ανάκτηση δεδομένων από τη βάση δεδομένων εικόνων
VB.NET Παράδειγμα
Η
Το παρακάτω παράδειγμα μπορεί να χρησιμοποιηθεί για τη δημιουργία μιας βάσης δεδομένων Access : . Δημ. γάτα Όπως Catalog = Νέος Κατάλογος ( ) cat.Create ( " Provider = Microsoft.Jet.OLEDB.4.0 ? " & _ "Πηγή δεδομένων = D : \\ AccessDB \\ NewMDB.mdb ? " & _ " Jet OLEDB : Τύπος κινητήρα = 5 " )
το παρακάτω παράδειγμα χρησιμοποιείται για την εισαγωγή δεδομένων σε πελάτες του πίνακα χρησιμοποιώντας το αντικείμενο OdbcConnection : Private Sub InsertRow ( ByVal ConnectionString Όπως String ) Dim QueryString As String = _ " INSERT INTO Πελάτες ( ΚωδΠελάτη , CompanyName ) αξίες ( « NWIND » , « Northwind Traders ')" Dim εντολή As New OdbcCommand ( QueryString ) Χρησιμοποιώντας τη σύνδεση As New OdbcConnection ( ConnectionString ) command.Connection = connectionconnection.Open ( ) command.ExecuteNonQuery ( ) End Sub UsingEnd
εικόνων
Πνευματικά δικαιώματα © Γνώση Υπολογιστών Όλα τα δικαιώματα κατοχυρωμένα