Πώς να αποκτήσετε πρόσβαση VBA στην εντολή Λήψη εξωτερικών δεδομένων

Access Visual Basic for Applications ( VBA) είναι η γλώσσα προγραμματισμού που του Microsoft Office που χρησιμοποιούν οι προγραμματιστές να επεκτείνουν τις δυνατότητές Access » . Όλες οι εντολές που είναι διαθέσιμες στο πρότυπο διασύνδεσης Access είναι επίσης διαθέσιμα σε VBA , συμπεριλαμβανομένων των εντολών που ανακτούν εξωτερικά δεδομένα . Χρησιμοποιώντας VBA για να πάρει εξωτερικών δεδομένων περιλαμβάνει τη χρήση μιας λειτουργίας του οποίου οι παράμετροι που έχετε ορίσει στο ολοκληρωμένο περιβάλλον ανάπτυξης της Access του ( IDE ) . Με τη χρήση της Access VBA για να πάρει τα εξωτερικά δεδομένα , να ελευθερώσετε δεδομένων προσωπικού έναρξη της ομάδας εργασίας σας από το να έχουν να φέρω εξωτερικών δεδομένων με μη αυτόματο τρόπο . Τα πράγματα που θα χρειαστείτε για Microsoft Access

Εμφάνιση Περισσότερες οδηγίες
Λήψη εξωτερικών δεδομένων από μια βάση δεδομένων
Η 1

Ανοικτή Πρόσβαση και κάντε κλικ στο " Δημιουργία " τίτλο του μενού , στη συνέχεια, κάντε κλικ στο " τραπέζι" στοιχείο. 2

Πληκτρολογήστε " Τίτλοι " στην πρώτη επικεφαλίδα στήλης του νέου πίνακα και " Συγγραφείς" στον τίτλο στα δεξιά του "Τίτλος ". Αυτές οι επικεφαλίδες στήλης αποτελούν πεδία για μια μικρή βάση δεδομένων βιβλία, τα οποία θα χρησιμοποιήσετε ως μια εξωτερική βάση δεδομένων για την εισαγωγή με VBA .
Εικόνων 3

Πληκτρολογήστε μερικούς τίτλους βιβλίων δείγματος και συγγραφείς σε σειρές του πίνακα , στη συνέχεια, πατήστε το πλήκτρο "Control + S. " Πληκτρολογήστε " Βιβλία " , όταν σας ζητηθεί το όνομα του πίνακα
Η

4 Κάντε κλικ στο κουμπί του μενού "Αρχείο " του "Save As " εντολή , στη συνέχεια, πληκτρολογήστε . "C : \\ books.accdb " για το όνομα αρχείου της βάσης δεδομένων . Κάντε κλικ στο κουμπί " Κλείσιμο βάσης δεδομένων " εντολή του μενού "Αρχείο" για να κλείσετε τη βάση δεδομένων .
5

Πατήστε " Control + N " για να δημιουργήσετε μια νέα βάση δεδομένων , στη συνέχεια, πατήστε το πλήκτρο "Alt + F11 " για να μπείτε στο VB IDE .
Η

6 Κάντε κλικ στην " Ενότητα " εντολή στο μενού "Εισαγωγή " για να δημιουργήσετε ένα νέο παράθυρο για την εισαγωγή κώδικα του προγράμματος .
Η 7

Επικολλήστε τον ακόλουθο υπορουτίνα στο νέο παράθυρο κώδικα . Αυτή η υπορουτίνα καλεί μέθοδος πρόσβασης είναι " DoCmd " για να ανοίξει μια εξωτερική βάση δεδομένων - . Αυτή που κάνατε στα βήματα 1 έως 4

Public Sub importData ( )

DoCmd.TransferDatabase acImport , " Microsoft Access " , _

" C : \\ books.accdb " , acTable , " βιβλία " , " books2 "

Sub End
8

Κάντε κλικ σε οποιαδήποτε δήλωση στο υπορουτίνα που μόλις επικολληθεί , στη συνέχεια, πατήστε το πλήκτρο "F5 " για να εκτελέσετε την υπορουτίνα .
Η

9 Πατήστε το πλήκτρο " Alt - +11 " για να επιστρέψετε στην πρόσβαση , στη συνέχεια, κλείστε και ανοίξτε πάλι το παράθυρο πλοήγησης οθόνη προς τα αριστερά κάνοντας κλικ της πάνω κουμπί " <<" . Το παράθυρο περιήγησης θα εμφανίσει ένα νέο πίνακα , " books2 . "
Η 10

Κάντε διπλό κλικ στο " books2 " στοιχείο για να εμφανίσετε την ίδια λίστα των βιβλίων που πληκτρολογήσατε στο βήμα 3 . Η " importData " υπορουτίνα τρέξατε προηγουμένως εισαχθεί την αρχική βάση δεδομένων βιβλίων σε ένα νέο πίνακα στην τρέχουσα βάση δεδομένων .
Εικόνων Λήψη εξωτερικών δεδομένων από αρχείο κειμένου

11

Ανοίξτε το Notepad ή άλλο πρόγραμμα επεξεργασίας κειμένου και πληκτρολογήστε το κείμενο στο αρχείο
Η 12

Αποθηκεύστε το αρχείο ως . "c : \\ textfile.txt "

13

Ανοικτή Πρόσβαση , πιέστε το πλήκτρο " Alt - F11 ", στη συνέχεια, επικολλήστε τον ακόλουθο κώδικα στο παράθυρο κώδικα :

Public Sub GetExternalText ( )

Δημ. strText

Άνοιγμα" c : \\ textfile.txt " Για Input Όπως # 1

Do While Not EOF ( 1 )

Γραμμή Input # 1 , strText

Debug.Print strText

Loop

Close # 1

End Sub

14

Κάντε κλικ σε οποιαδήποτε δήλωση στο πρόγραμμα , στη συνέχεια, πατήστε το πλήκτρο "F5 " για να εκτελέσετε το πρόγραμμα .
Η 15

τύπου " Control + G "για να ανοίξει το IDE του " " παράθυρο Άμεση , η οποία θα εμφανίζει τα δεδομένα κειμένου του προγράμματος σας παραλαμβάνονται από το εξωτερικό αρχείο κειμένου .
Η
εικόνων