Πώς να χρησιμοποιήσετε Ημερομηνίες σε μια πρόσβαση ερωτήματος SQL Server

Χρήση ημερομηνιών σε ένα Structured Query Language ( SQL ) ερώτημα μπορεί να προκαλέσει σύγχυση , αν δεν έχετε χρησιμοποιήσει . Microsoft SQL Server είναι ένα σχεσιακό σύστημα διαχείρισης βάσεων δεδομένων που χρησιμοποιούνται για μεγάλες βάσεις δεδομένων . Η Microsoft Access είναι επίσης ένα σχεσιακό σύστημα διαχείρισης βάσεων δεδομένων , αλλά για τις μικρότερες τοπικές βάσεις δεδομένων . Συχνά , υπάρχει η ανάγκη για την αναζήτηση αποτελεσμάτων από έναν πίνακα με ένα εύρος ημερομηνιών . Σε μερικά βήματα μπορείτε να δημιουργήσετε ένα ερώτημα χρησιμοποιώντας ένα πεδίο ημερομηνίας από έναν πίνακα του SQL Server . Τα πράγματα που θα χρειαστείτε για Microsoft Access 2007 για Microsoft SQL Server 2000
Η Εμφάνιση Περισσότερες οδηγίες
Η 1

Ξεκινήστε το Microsoft Office Access 2007 , επιλέξτε "Blank Database " και κάντε κλικ " Δημιουργία . " Κάντε κλικ στο " Εργαλεία βάσης δεδομένων " και επιλέξτε " Visual Basic" για να ανοίξετε το Microsoft Visual Basic . 2

Επιλέξτε από το μενού "Εισαγωγή" και κάντε κλικ στο " ενότητα ". Πληκτρολογήστε το παρακάτω, για να δημιουργήσετε μια νέα υπορουτίνα :

Private Sub querySQLDate ( )

Press " . Enter"
εικόνων 3

Πληκτρολογήστε το παρακάτω, για να δηλώσει το μεταβλητές :

Dim strSQL Όπως String

Dim rst Όπως εγγραφών

Dim dbs Όπως Database

Dim X As Integer
Η 4

Πληκτρολογήστε το παρακάτω, για να ρυθμίσετε τη βάση δεδομένων σας και να συνδέσετε το πίνακα "Παραγγελίες" από τη βάση δεδομένων Northwind στον SQL Server :

Set dbs = CurrentDb

DoCmd.TransferDatabase acLink , " ODBC βάση δεδομένων» , _

" ODBC ? DSN = ΤΟΠΙΚΟ ? LANGUAGE = us_english ? DATABASE = Northwind " , _

acTable , "Παραγγελίες" , " dbo.Orders "

Επεξεργασία " ODBC ? DSN = LOCAL " και πληκτρολογήστε το όνομα του DSN SQL Server σας
5

πληκτρολογήστε το παρακάτω, για να καθορίσει το ερώτημά σας χρησιμοποιώντας το . " πεδίο RequiredDate »και να δείξει μόνο τον μήνα Αύγουστο 1996 :

strSQL = "SELECT dbo_Orders.CustomerID , dbo_Orders.EmployeeID , dbo_Orders.OrderDate , dbo_Orders.RequiredDate "

strSQL = strSQL & " ΑΠΟ dbo_Orders "

strSQL = strSQL & " WHERE ( ( ( dbo_Orders.RequiredDate ) Μεταξύ # 1/8/1996 # And # 31/08/1996 # ) ) ? "
Η 6

Πληκτρολογήστε το παρακάτω, για να βρόχο μέσω εγγραφών σας και να εμφανίσει τις ημερομηνίες μέσα από ένα πλαίσιο μηνύματος :

Set RST = dbs.OpenRecordset ( strSQL )

rst.MoveLast

rst.MoveFirst

Για Χ = 0 Για να rst . recordcount - . 1

MsgBox rst.Fields ( " RequiredDate " ) Αξία

rst.MoveNext

Επόμενο X

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