Question

asp 高手帮忙解答下这个问题数据库插入完成后为什么不执行跳转语句

if Cint(request.Form("codestr")) = Session("GetCode") then
xusername=request("username")
xuserpass=request("password")
xuser1=request("user1")
xmph=request("mph")
xbtel=request("btel")
xatel=request("atel")
xbm=request("bm")
Set rs = Server.CreateObject ("ADODB.Recordset")
sql="insert into users (username,userpass,bm,mph,btel,atel,user1,Admin_bz,key_bj) values('"&xusername&"','"&xuserpass&"','"&xbm&"','"&xmph&"','"&xbtel&"','"&xatel&"','"&xuser1&"',0,0)"
rs.Open sql,conn,1,1
set rr = nothing%>
<script>document.location.href='reg1.asp';</script>

最后的跳转语句无论我怎么写最后这句都不执行。因为我是用IF嵌套写法，非常奇怪无论我如何去写语句。知道执行插入if中的内容执行后还有在执行else内容。现在完全不懂不知道问题在哪了。这个代码是最早的新的也已经写了七八种写法了问题依旧。谢谢各位帮忙告诉我下这种情况是因为什么。我也知道IF与else内容不可能同时执行。但是真的执行。 我用IF elseif 加条件判断都执行就是不执行插入数据库语句后面这句跳转语句。response.Redirect 我也用了，都是不执行跳转代码。再次谢谢给位小弟不胜感激！！！需要源代码我发空间。
http://hi.baidu.com/qtsmgyldpecorxe/item/0e3f5c18d93fdac838cb3074
发到空间了。。谢谢帮看看下。现在真的无语了。不知道那错了。where好像不是吧因为我已经写入数据库了。数据库里面有东西不是没有写入。而且我是插入一条新记录应该不需要where 条件吧。谢谢帮忙看下

Answer 1

缺少 where 的条件
sql="insert into users (username,userpass,bm,mph,btel,atel,user1,Admin_bz,key_bj) values('"&xusername&"','"&xuserpass&"','"&xbm&"','"&xmph&"','"&xbtel&"','"&xatel&"','"&xuser1&"',0,0)"
并没有写入
所以没有完全运行到跳转那一步

追问

全部代码已发空间谢谢帮忙看看。

追答

追问

问题还是有但是好多了。10次有6次这个问题有4次正确。不知道怎么办了。我最早就是这样，越该越不提示正确的。现在有正确的步骤了单问题还是有数据已经插进数据库了。但是提示此用户已经有人使用。

追答

把Cint 改为 int 试试
如果验证码是纯数字的话

追问

还是不行！真的我郁闷死了！就是一简单的插入怎么这么多问题！郁闷死了

追答

把你的完整代码发到你的百度空间里去
登录与验证跳转2个文件
帮你看看

追问

发过去了我把有一个验证的发的是生成验证码的文件！哪个不用看了。其他的我都发上去了，谢谢了

追答

ok
见我的百度空间

Answer 2

这个和缺少where 条件无关，缺少语句就出错了，把完整源代码贴出来或者放空间。

追问

全部代码已发空间谢谢帮忙看看。

追答

if request.form.count0 then

注：request.form.count0不可靠，这里最好在表单中加入一个隐藏域，通过隐藏域的值来判断用户是否点击了提交。

id=request("username")
Set rr = Server.CreateObject ("ADODB.Recordset")
sql="select * from users where username='"&id&"'"
rr.Open sql,conn,1,1
if rr.recordcount=0 then
注：一般在使用rr.recordcount=0的时候，需要定义conn.cursorlocation=3，根据个人经验，因为数据库服务器的原因，很多时候，如果记录为空，rr.recordcount的返回值是-1，而不是0。仔细看了您的代码，逻辑上是对的，因为我没有数据库所以无法测试，您先按我的思路改动一下试试。
regf=1
else
regf=0
end if
set rr = nothing
……