2013-08-22 2 views
0

스피 MS 액세스 데이터베이스를 사용하고 난 다음 코드를 사용하여 두 날짜 날짜 사이를 검색하는 방법?

stdate= starting date 

edate=end date 

스피

사이에 데이터를 얻을 싶어요.

Private Sub Label3_Click() 
DataGrid1.Visible = True 
Dim stdate As Date 
Dim edate As Date 
Format = stdate("mm/dd/yyyy") 
Format = edate("mm/dd/yyyy") 
stdate = Text1.Text 
edate = Text2.Text 

Adodc1.RecordSource = "SELECT * FROM sales_info WHERE date BETWEEN &stdate& and    &edate& " 
Adodc1.Refresh 
End Sub 

오류는 점점 IAM 있습니다

syntax error expected array(in format statement) 

missing operator in query expression date. 

감사

날짜가 있기 때문에 PLZ 초보자에게

스피 당신의 필드의 이름을 변경

답변

0

시도를 도와 예약어. 날짜의 형식 (#으로) VB6에 따르는 형식을 사용하도록 변경 한 후

0

의 선 형식 = stdate ('MM/DD/YYYY') 및 형식 = EDATE ("MM/DD/yyyy ") 나에게 유효한 VB6처럼 보이지 않습니다.

당신은 함께 비트를 접착하여 쿼리 문자열을 구축해야합니다, 인터프리터는이 변수

원하는 것을 이해하는 인용 부호 안에 볼 수 & stdate "WHERE 날짜 BETWEEN # sales_info SELECT * FROM" & "# 및 #"& EDATE는 & "#"

1

이 코드는 내가 또한 당신에게 있다는 점에서 @Joe와의 동의

Private Sub Label3_Click() 
    DataGrid1.Visible = True 
    Dim stdate As String 
    Dim edate As String 
    stdate = Format(Text1.Text, "mm/dd/yyyy") 
    edate = Format(Text2.Text, "mm/dd/yyyy") 

    Adodc1.RecordSource = "SELECT * FROM [sales_info] WHERE [date] BETWEEN #" & stdate & " and " & edate & "]" 
    Adodc1.Refresh 
End Sub 

을 워크해야 일반적으로 예약어이므로 열 이름에 날짜를 사용하지 않아야합니다. 그 주위를 돌아 다니다 보면 장기적으로 삶을 더 어렵게 만들 것입니다.

0

시도해보십시오. :)

Adodc1.RecordSource = = "SELECT * " & "FROM tbl " & _ 
     "WHERE Date >= #" & stdate & "# AND Date <= #" & edate & "# " 
    Adodc1.Requery 
관련 문제