Πώς να ανακτήσετε τα δεδομένα σε VB6 Χρησιμοποιώντας ένα Range Ημερομηνία

Η Visual Basic 6 γλώσσα προγραμματισμού σας επιτρέπει να αναζήτηση μιας βάσης δεδομένων και να ανακτήσετε τις πληροφορίες που βασίζονται σε ένα εύρος ημερομηνιών . Ένας πίνακας βάσης δεδομένων που έχει μια ημερομηνία που περιλαμβάνεται στα αρχεία πίνακας μπορεί να χρησιμοποιηθεί για την ανάκτηση πληροφοριών με βάση την ημερομηνία που τέθηκε σε πίνακα . Αυτό είναι ευεργετικό για τους προγραμματιστές που πρέπει να επιστρέψει εγγραφές για μια συγκεκριμένη ημερομηνία και να το εμφανίσετε για το χρήστη . Οδηγίες
Η

1 Κάντε κλικ στο κουμπί των Windows " Start" και επιλέξτε " Όλα τα προγράμματα ". Κάντε κλικ στο " Visual Basic " και στη συνέχεια κάντε κλικ στο κουμπί " Microsoft Visual Basic 6 " για να ανοίξετε το λογισμικό προγραμματισμού . 2

Κάντε κλικ στο " Αρχείο " και στη συνέχεια κάντε κλικ στο κουμπί "Άνοιγμα ". Κάντε διπλό κλικ στο Basic 6 εφαρμογή Visual να φορτώσετε τα αρχεία κώδικα στο χώρο εργασίας .
Εικόνων 3

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

Ορισμός con = Νέα ADODB.Connection

con.ConnectionString = " Provider = Microsoft.Jet.OLEDB.4.0 ? Προέλευσης δεδομένων = mydb.mdb "

con.Open

Σε αυτό το παράδειγμα , μια βάση δεδομένων Microsoft Access ανοίγει . Αντικαταστήστε αυτό το όνομα αρχείου με το δικό του server της βάσης δεδομένων σας ή το όνομα του αρχείου .
Η 4

Δημιουργήστε το ερώτημα που ανακτά πληροφορίες σύμφωνα με την ημερομηνία . Σε αυτό το παράδειγμα , μια λίστα των πελατών ανακτάται σύμφωνα με την ημερομηνία εγγραφής. Πληκτρολογήστε τον ακόλουθο κώδικα στο αρχείο τον κωδικό σας:

Ιδιωτική ερώτημα Όπως ADODB.Command

query.CommandText = " επιλέξτε * από τον πελάτη , όπου signup_date μεταξύ '1 /1/2010 ' και '12 /31/2010 "
5

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

Ορισμός αρχεία = query.Execute

αρχεία MsgBox ( 0 )
Η
εικόνων