查人人中国名人网《名侦探的守则》:请各位高手帮我看一下这段ASP代码哪里有问题
来源：百度文库 编辑：查人人中国名人网 时间：2024/04/29 03:35:52
<HTML>
<HEAD>
<META NAME="GENERATOR" Content="Microsoft Visual Studio 6.0">
</HEAD>
<BODY>
<P> </P>
<%
dim mysql
dim NewUserID,NewUserPWD,IPAdd,connstr,shujvku,mysql1,birthday,aihao,zhuzhi
NewUserID=Request.Form("uid")
NewUserPWD=Request.Form("pwd1")
IPAdd=Request.ServerVariables("Remote_Host")
birthday=Request.Form("birthday")
aihao=Request.Form("aihao")
zhuzhi=Request.Form("zhuzhi")
shujvku="/ceshi/shujv/shangp2.mdb"
Connstr="DBQ="+server.mappath(shujvku)+";DefaultDir=;DRIVER={Microsoft Access Driver (*.mdb)};DriverId=25;FIL=MS Access;ImplicitCommitSync=Yes;MaxBufferSize=512;MaxScanRows=8;PageTimeout=5;SafeTransactions=0;Threads=3;UserCommitSync=Yes;"
set myrecord=Server.CreateObject("ADODB.Connection")
myrecord.Open connstr
mysql="select * from yonghu where uid='" & NewUserID & "'"
set rs=myrecord.execute(mysql)
if not rs.BOF then
Response.Write "该用户名已经存在，请重新输入一个用户名"
Response.Write "<a href='NewUser.asp'>重新注册</a>"
else
mysql1="insert yonghu (uid,pwd,ip,shengri,aihao,zhuzhi) values ('"&NewUserID&"','"&NewUserPWD&"','"&IPAdd&"','"&birthday&"','"&aihao&"','"&zhuzhi&"')"
myrecord.execute(mysql1)
Response.Write ("恭喜你，你已经注册成功，你现在可以<a href='default.asp'>主页</a>")
end if
myrecord.Close
set myrecord=nothing
%>
</BODY>
</HTML>
表单递交到着个文件后， 就该页无法显示
我怎么也找不到到底是哪错了
我是自学的ASP 所以有很多地方学的不够到位，希望各位高手指教
如果哪位能留个QQ ，在以后给我一些指导就更好了，当然这个是次要。
谢谢啊！ 我不是那种喜欢麻烦别人的人 不过书中讲的很大略 我想这个应该是什么细节出了问题 我学的不到位 找不到问题哎
lisida11
哥们你的答案很详细
不过 还是没有解决问题，用这个方法添加4个记录可以
我添加7个记录就不行了 显示就是该页无法显示了
貌似数据库连接有问题啊
connstr="DBQ="+server.mappath("ceshi/shujv/shangp2.mdb")+";DefaultDir=;DRIVER={Microsoft Access Driver (*.mdb)};"
set conn=server.createobject("ADODB.CONNECTION")
这样就可以连接上数据库了，语句太多容易出错。
还有
mysql1="insert yonghu (uid,pwd,ip,shengri,aihao,zhuzhi) values ('"&NewUserID&"','"&NewUserPWD&"','"&IPAdd&"','"&birthday&"','"&aihao&"','"&zhuzhi&"')"
myrecord.execute(mysql1)
可能是这里出错了，最好不要这样添加记录
这样最好
set rs=server.createobject("adodb.recordset")
sql="select * from database"
rs.open sql,conn,3,3
rs.addnew
rs("uid")=NewUserID
rs("xxx")=xxxx
rs.update
这样方便也不容易出错。
还有，加我qq:23965905，一起讨论asp吧
----------------------------------------------------
回答：
？怎么添加7个记录就无法显示了？
这样的问题真的很少见
麻烦你把该页无法显示所说的内容补充一下好吗？
我看看到底是什么问题
最好也把网址发过来一下
首先RS没定义
其次，你应该学会怎么调试程序
把你认为有问题的句子用单引号解释掉
如果问题仍旧存在，说明他没问题，问题没了
说明他错了
刷新该页面，不行看看是不是网络断了。