主题:怎么做更新啊
我要做修改,代码是下面的,出错的更新语句,谢谢大家,帮忙看看
<%
dim number,name,price
number=request.Form("number")
name=request.Form("name")
price=request.Form("price")
dim conn
set conn=server.createobject("adodb.Connection")
conn.connectionString="Dbq=C:\Inetpub\wwwroot\canting.mdb;Driver={Microsoft Access Driver (*.mdb)}"
conn.mode=0
conn.open
dim comm
set comm=server.CreateObject("adodb.Command")
comm.ActiveConnection=conn
dim sqlstr
sqlstr="update caipu set name='"&name&"',number='"&number&"',number='"&number&"' where number='"&number&"'"
comm.commandtext=sqlstr
comm.commandtype=1
set rs=comm.execute
response.Write("修改成功!")
%>
<%
dim number,name,price
number=request.Form("number")
name=request.Form("name")
price=request.Form("price")
dim conn
set conn=server.createobject("adodb.Connection")
conn.connectionString="Dbq=C:\Inetpub\wwwroot\canting.mdb;Driver={Microsoft Access Driver (*.mdb)}"
conn.mode=0
conn.open
dim comm
set comm=server.CreateObject("adodb.Command")
comm.ActiveConnection=conn
dim sqlstr
sqlstr="update caipu set name='"&name&"',number='"&number&"',number='"&number&"' where number='"&number&"'"
comm.commandtext=sqlstr
comm.commandtype=1
set rs=comm.execute
response.Write("修改成功!")
%>