高手帮忙啊!!!

[jonia]

Dim strdate As String

strdate = CStr(frmSearchPn.DTPicker1)'一个日期型的数据如"2003-8-14"

strSql = "select * from tbschedule where tbdate =" & strdate
Ado.RecordSource = strSql
Ado.Refresh

ado 已经绑定了
就是不出数据！！！帮帮忙啊！！

[xayzmb]

strSql = "select * from tbschedule where tbdate = #" & strdate & "#"

[xayzmb]

数据库是ACCESS时
strSql = "select * from tbschedule where tbdate = #" & strdate & "#"
数据库是SQL server时
strSql = "select * from tbschedule where tbdate = '" & strdate & "'"

[jonia]

谢谢帮忙！！问题解决！！

[unkowme]

在SQL上：
strSql = "select * from tbschedule where tbdate ='" & strdate & "'"