Προγραμματισμός

* Γνώση Υπολογιστών >> Προγραμματισμός >> Visual Βασικά Προγραμματισμός

Πώς να δημιουργήσετε ένα νέο αρχείο βάσης δεδομένων χρησιμοποιώντας ADOX σε VB6

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

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

Προσθέστε την κλήση βιβλιοθήκης ADOX στην κορυφή της κωδικοποίησης του αρχείου σας . Αντιγράψτε και επικολλήστε τον παρακάτω κώδικα στο επάνω μέρος του άνοιξε αρχείο με τον κειμενογράφο :
Εισαγωγές

ADOX εικόνων
3

Δημιουργήστε μια " κατηγορία " τάξη βιβλιοθήκη μεταβλητής . Πρέπει να δημιουργήσετε αυτήν τη μεταβλητή κλάσης βιβλιοθήκη για να χρησιμοποιήσετε τη λειτουργία «δημιουργήσουν» που δημιουργεί την βάση δεδομένων της Access . Προσθέστε τον ακόλουθο κώδικα στο αρχείο :

Dim db Όπως Catalog = Νέος Κατάλογος ( )
Η 4

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

db.Create ( " Provider = Microsoft.Jet.OLEDB.4.0 ? Προέλευσης δεδομένων = c : \\ βάση δεδομένων \\ db.mdb ? Jet OLEDB : Τύπος κινητήρα = 5 " )

Ο παραπάνω κώδικας δημιουργεί μια νέα βάση δεδομένων που ονομάζεται " db.mdb " στο φάκελο " βάσης δεδομένων " .
Η
εικόνων

Συναφής σύστασή

Πνευματικά δικαιώματα © Γνώση Υπολογιστών Όλα τα δικαιώματα κατοχυρωμένα