Använda datum i ett Structured Query Language ( SQL ) fråga kan vara förvirrande om du aldrig har använt dem . Microsoft SQL Server är en relationsdatabas som används för stora databaser . Microsoft Access är också en relationsdatabas , men för mindre lokala databaser . Ofta finns behovet av att frågan resultat från en tabell med en datumintervall . I några få steg kan du skapa en fråga med ett datum fält från en tabell i SQL Server
1 .
Starta Microsoft Office Access 2007 väljer du " tom databas och klicka på " Skapa ". Klicka på " Databas Verktyg "och välj "Visual Basic "för att öppna Microsoft Visual Basic.
2 .
Välj " Infoga " -menyn och klicka på " Module ". Skriv följande för att skapa en ny subrutin :
Private Sub querySQLDate ( )
Tryck på "Enter . "
3
Skriv följande att förklara dina variabler .
Dim strSQL As String
Dim rst Som Recordset
Dim DBS som databas
Dim x As Integer
4 .
Skriv följande för att ställa din databas och länka " Order " tabellen från Northwind -databasen i SQL Server :
Set DBS=CurrentDb
DoCmd. TransferDatabase acLink , " ODBC-databas " , _
" ODBC , DSN=lokal, LANGUAGE=us_english ; DATABASE=Northwind " , _
acTable , " Order " , " dbo. Orders "
Redigera " ODBC , DSN=lokal " och ange namnet på din SQL Server DSN br
<. > 5
Skriv följande för att definiera din fråga med hjälp av " Begärt " fältet och för att visa endast augusti månad 1996 .
strSQL=" SELECT dbo_Orders . Kundnr , dbo_Orders. EmployeeID , dbo_Orders. OrderDate , dbo_Orders. RequiredDate "
strSQL=strSQL " FRÅN dbo_Orders "
strSQL=strSQL " WHERE ( ( ( dbo_Orders . Begärt ) Mellan # 1996/08/01 # och # 1996/08/31 #));"
6 .
Skriv följande för att loopa igenom din Recordset och visa datum genom en meddelanderuta :
Set rst=dbs. OpenRecordset ( strSQL )
rst. MoveLast
RST . MoveFirst
för x=0 Till rst. RecordCount-1
MsgBox RST . Fält ( " Begärt " ) . Value
rst. MoveNext
Nästa X
Tryck " F5 "för att verkställa dina subrutin .
Previous:nothing Next:hur man öppnar powerpoint med Visual Basic