Set querysql = dbs.OpenRecordset("select * from spare where CONVERT(field_4) =STR(DTPicker1.Value)")VB+ACCESS
DTPicker1为日期控件field_4字段是DATE类型的执行时没报错,但查不出记录,不知道错在哪

解决方案 »

  1.   

    Set querysql = dbs.OpenRecordset("select * from spare where CONVERT(field_4) =" & STR(DTPicker1.Value))
      

  2.   

    CONVERT是什么阿?
    转换?sql没有这个功能吧
      

  3.   

    记得ACCESS的日期型数据要用两个#包起来,
      

  4.   

    Set querysql = dbs.OpenRecordset("select * from spare where field_4 >=#" & Format(DTPicker1, "yyyy-mm-dd") & "# And field_4 <#" & Format(DTPicker1 + 1, "yyyy-mm-dd") & "#")