dim dat dat=CDate(combol.text) select * from xxx where date='" &dat &"'
SQL Server: exec('select * from XXX where '+right(convert(char(10),[date]),8)+'='''+combo1.text+''')
Access就用#分隔日期 SqlServer就用'
data change string or string change data
直接读入变量,再代入SQL语句试试。
不要用Combo1.text,直接代入字符型变量 dim strdata as string private command1_click() strdata=combo1.text select * from XXX where data="#" & strdata & "#" end sub 看看行不行。
dat=CDate(combol.text)
select * from xxx where date='" &dat &"'
exec('select * from XXX where '+right(convert(char(10),[date]),8)+'='''+combo1.text+''')
SqlServer就用'
or
string change data
dim strdata as string
private command1_click()
strdata=combo1.text
select * from XXX where data="#" & strdata & "#"
end sub
看看行不行。