【已解决】ACCESS写入数据报错

ybbihsse

Local $s_dbname = @ScriptDir & '\MDB.mdb' ;数据库不需要开放接口,以免影响服务器安全;
Local $o_Con, $o_Rs, $s_Tablename = "testresult", $formatT = "text(255)" ;实际内存大小,数据表参数及数据表名，TEXT格式；
Local $mdb_data_pwd


databas()
Func databas()
        $addfld = ObjCreate("ADODB.Connection")
        $addfld.Open("Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & $s_dbname & ";Jet Oledb:Database Password=" & $mdb_data_pwd)
        $RS = ObjCreate("ADODB.Recordset")
        $RS.ActiveConnection = $addfld
        $addfld.Execute("insert into " & $s_Tablename & " (time,mymac,getid,getuser) values ('时间','嗯','哦','啊')")


EndFunc   ;==>databas

大家帮我看下这个哪里错了哦

---------------------------------------------------------
呵呵，已经解决了，只需要把字段加上[]就可以了
        $addfld.Execute("insert into " & $s_Tablename & " ([time],[mymac],[getid],[getuser]) values ('时间','嗯','哦','啊')")

hzxymkb

论坛里有操作ACCESS的UDF，建议您找找看！

绿色风

回复 1# ybbihsse

 $addfld = ObjCreate("ADODB.Connection")
   $addfld.Open("Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & $mdbdatapath & ";Jet Oledb:Database Password=" & $mdbdatapwd)
          
  $addfld.Execute("insert into " & $TableName & "(title,mood,keyname,content,dtime,remarks) values('"&$title&"','"&$mood&"','"&$keyname&"','"&$content&"','"&"日期: "& _data()&"  录入','"&$remarks&"')")
                    
  $addfld.close

自己看吧，如果错就不是我们的问题的了。这个是我在使用中的，群里的那个，<心水记事本> 使用的。

kingfirekkk

回复 1# ybbihsse

楼主，你要把你的MDB数据库的架构也要列出来啊，不然还是不知道问题在哪里啊。