Πρόσβαση: VBA Εξαγωγή Query

Γνωρίζοντας πώς να εξάγουν τα αποτελέσματα του ερωτήματος σε ένα αρχείο κειμένου σας επιτρέπει να κάνετε την εφαρμογή της βάσης δεδομένων σας πιο δυναμικό και φιλικό προς το χρήστη . Microsoft Office Access είναι ένα σχεσιακό σύστημα διαχείρισης βάσεων δεδομένων που περιλαμβάνονται στη σουίτα Microsoft Office . Visual Basic for Applications , επίσης γνωστή ως VBA , είναι μια γλώσσα προγραμματισμού ηλεκτρονικών υπολογιστών που χρησιμοποιούνται για την αυτοματοποίηση εργασιών αλλιώς γίνεται με το χέρι . Ένα ερώτημα χρησιμοποιείται για την ανάκτηση δεδομένων από έναν πίνακα βάσης δεδομένων . Μπορείτε να γράψετε κώδικα VBA για να εξάγετε τα αποτελέσματα ενός ερωτήματος σε ένα αρχείο κειμένου . Οδηγίες
Η

1 Ανοίξτε τη βάση δεδομένων Northwind Microsoft Office Access . Η βάση δεδομένων Northwind περιλαμβάνεται στη σουίτα Microsoft Office . 2

Κάντε κλικ στο " Εργαλεία βάσης δεδομένων , " και στη συνέχεια επιλέξτε " Visual Basic" για να ανοίξετε το Microsoft Visual Basic παράθυρο . Κάντε κλικ στο " Εισαγωγή" πεδίο και επιλέξτε " Ενότητα ".
Εικόνων 3

Αντιγράψτε και επικολλήστε τον παρακάτω κώδικα στη νέα λειτουργική μονάδα για να δημιουργήσετε έναν νέο πίνακα με τα αποτελέσματα του ερωτήματος από τον πίνακα « Υπάλληλος » και στη συνέχεια να εξαγάγετε αυτόν τον πίνακα σε ένα αρχείο κειμένου :

Private userQueryVariables Sub ( )

Dim strSQL Όπως String

strSQL = "SELECT Υπαλλήλων [ Επώνυμο ] , εργαζόμενοι [ . . ,"sti̱ synécheia na exagágete af̱tón ton pínaka se éna archeío keiménou :̱

Private userQueryVariables Sub ( )

Dim strSQL Ópo̱s String

strSQL = "SELECT Ypallí̱lo̱n [ Epó̱nymo ] , ergazómenoi [ . . . Όνομα ] , "

strSQL = strSQL & " Οι εργαζόμενοι [ Τίτλος εργασίας ] , Employees.Notes ΣΕ QueryResults "

strSQL = strSQL & " FROM Υπάλληλοι ? "

DoCmd.SetWarnings Λάθος

DoCmd.RunSQL ( strSQL )

DoCmd.OutputTo acOutputTable , " QueryResults " , acFormatTXT , "c : \\ queryResultsExported.txt "

Sub End
Φτηνές 4

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