Set cmDetUse = New ADODB.Command
    cmDetUse.ActiveConnection = DataEnvironment1.Connection1
   cmDetUse.CommandType = adCmdText                strSQL = "insert into xianjin (date) values (" & Date & ")"
                 cmDetUse.CommandText = strSQL
                cmDetUse.Execute
date是表xianjin中的一个日期型字段,可是就是插不进去,添加其他字段没有问题,就是日期型的不可以,怎么办?

解决方案 »

  1.   

    strSQL = "insert into xianjin [date] values (#" & Date & "#)"
      

  2.   

    楼上仁兄,我试了不行呀!!提示insert 语法错误
      

  3.   

    strSQL = "insert into xianjin (date) values ('" & Date & "')"
    这样应该行
      

  4.   

    strSQL = "insert into xianjin (str_id,xianjin) values (" & Text5.Text & "," & Text3(0).Text & ")"
    就没问题,cdate(Date)这样不用吧,DATE是日期型,我试了也不行
      

  5.   

    如果是sql server
    strSQL = "insert into xianjin (date) values ('" & Date & "')"
      

  6.   

    我用的是ACCESS,"insert into xianjin (date) values ('" & Date & "')"还是不行
      

  7.   

    insert into [xianjin](date) values ('" & Date & "')"
      

  8.   

    strSQL = "insert into xianjin (date) values ('" & Date & "')"
    还有date字符串的内容要符合时间的格式。例如:date="#2003-10-13#"