access如何转换日期格式

来源:百度知道 编辑:UC知道 时间:2024/05/26 01:12:28
<%
set con=server.CreateObject("adodb.connection")
db="cfsoft/mydb.mdb"
con.open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.MapPath(db)
set rs=server.CreateObject("adodb.recordset")
sqlstr="select * from bbs order by djl desc"
rs.open sqlstr,con,1,3
set rs1=server.CreateObject("adodb.recordset")
sqls="update bbs set zd=1,time="& date() &" where bid=" & request("bid")
sqls1="update bbs set zd=0 where bid=" & request("bid")
'response.write "update bbs set zd=1,time="& date() &" where bid='" & request

("bid") & "'"
'response.End
if request("zd")=1 then
rs1.open sqls,con,1,3
else
rs1.open sqls1,con,1,3
end if
%>
为何提示
Microsoft JET Database Engine 错误 '80040e14'

UPDATE 语句的语法错

你址接用con.execute(sql语句)啊.
if request("zd")=1 then
rs1.open sqls,con,1,3
else
rs1.open sqls1,con,1,3
end if
换成
if request("zd")=1 then
con.execute(sqls)
else
con.execute(sqls1)
end if
你试试看.
rs.open这样是打一个可更新或只可查询的记录的.并不是你那样用的.
你的DATE函数用NOW函数试试!

sqls="update bbs set zd=1,time=#"& date() &"# where bid=" & request("bid")