求ASP修改数据库中字段的语句！！

来源：百度知道 编辑：UC知道 时间：2024/06/04 21:01:07
我是初学者，下载了个模板在理论结合实例学习ASP。以下语句段是要实现修改access数据库中的数据的，可在实际操作无法实现。大虾们，帮帮忙！指点指点小弟。。。
<%
dim strSQL, cmdObj, rsObj

Set cmdObj = Server.CreateObject("ADODB.Command")
Set rsObj = Server.CreateObject("ADODB.RecordSet")
cmdObj.CommandText = "SELECT top 1 * FROM st_info ORDER by ID desc"
cmdObj.CommandType = 1
Set cmdObj.ActiveConnection = conn
rsObj.Open cmdObj, ,2,3
rsObj("user_number") = Request.Form("user_number")
rsObj("user_name") = Request.Form("user_name")

rsObj("user_idnumber") = Request.Form("user_idnumber")
rsObj("user_sex") = Request.Form("user_sex")
rsObj("user_birthday") = Request.Form("user_birthday")

rsObj("user_address") = Request.Form("user_add

太乱了，直接改为：
<%
'conn是你连接数据库的对象
on error resume next
dim startime
startime=timer()*1000
dim conn
dim dbpath
set conn=server.createobject("adodb.connection")
DBPath = Server.MapPath("inc/data.mdb") '换成你的数据库路径
conn.Open "driver={Microsoft Access Driver (*.mdb)};dbq=" & DBPath

Set rsObj = Server.CreateObject("ADODB.RecordSet")
rsObj.open "SELECT top 1 * FROM st_info ORDER by ID desc" ,conn,1,3

rsObj.addnew()
rsObj("user_number") = Request.Form("user_number")
rsObj("user_name") = Request.Form("user_name")

rsObj("user_idnumber") = Request.Form("user_idnumber")
rsObj("user_sex") = Request.Form("user_sex")
rsObj("user_birthday") = Request.Form("user_birthday")

rsObj("user_address") = Request