源代码是这样的
 Dim db As Database
    
    On Error GoTo ErrMsg
    
    
    Set db = FrmNewOperator.OpenCloseDb(db, True)
    StrSql = "Insert Into T_OperateLog(Operator,OperateTime,OperateContent) Values('" & LoginName & "',#" & Now() & "#,'" & OperateContent & "')"
    db.Execute StrSql
    Set db = Nothing提示说语法错误,说日期格式不对
数据库用的是mdb,数据环境用的是dao3.6,打包的时候已经把dao360.dll和msjet40.dll这些文件打包进去了,但为什么会出错呢?好急,请打包过dao的帮忙....
谢谢!

解决方案 »

  1.   

    我在win2000下往access表插日期型的数据时用"'" & now() & "'"不出错,用##反而出错
    不知道是不是这个原因
      

  2.   

    StrSql = "Insert Into T_OperateLog(Operator,OperateTime,OperateContent) Values('" & LoginName & "',#" & format(Now,"yyyy-mm-dd hh:mm:ss") & "#,'" & OperateContent & "')"