查人人中国名人网第四纪冰川资料:addnew加不进数据？
来源：百度文库 编辑：查人人中国名人网 时间：2024/05/03 00:15:44
代码如下，问题如上
dim UserName,Password,Question,Answer,Sex
UserName=trim(request("UserName"))
Password=trim(request("Password"))
Question=trim(request("Question"))
Answer=trim(request("Answer"))
Sex=trim(Request("Sex"))
dim sqlUser,rsUser
sqlUser="select * from User where UserName=" & Username
set rsUser=server.createobject("adodb.recordset")
rsUser.open sqlUser,conn,1,3
rsUser.addnew
rsUser("UserName")=UserName
rsUser("Password")=md5(Password)
rsUser("Question")=Question
rsUser("Answer")=md5(Answer)
rsUser("Sex")=Sex
rsUser.update
response.redirect "UserManage.asp"
rsUser.close
set rsUser=nothing
？？？？？？？？？？？？？？？
错哪了？
我是直接在网上调的，没在本地
dim UserName,Password,Question,Answer,Sex
UserName=trim(request("UserName"))
Password=trim(request("Password"))
Question=trim(request("Question"))
Answer=trim(request("Answer"))
Sex=trim(Request("Sex"))
dim sqlUser,rsUser
sqlUser="select * from User where UserName=" & Username
set rsUser=server.createobject("adodb.recordset")
rsUser.open sqlUser,conn,1,3
rsUser.addnew
rsUser("UserName")=UserName
rsUser("Password")=md5(Password)
rsUser("Question")=Question
rsUser("Answer")=md5(Answer)
rsUser("Sex")=Sex
rsUser.update
response.redirect "UserManage.asp"
rsUser.close
set rsUser=nothing
？？？？？？？？？？？？？？？
错哪了？
我是直接在网上调的，没在本地
代码没问题，可能是硬盘权限问题
建议不要用addnew 来加新记录，第一效率不高，第二不容易排错
建议使用insert into 来加新纪录
strSQL="insert into user() values()"
在这里可以调试语句是否正确，可以用
response.write strsql
response.end
来查看sql语句是否正确
cnn.execute strsql
贴出错误提示