主题:困惑中... 30分
为什么可以访问数据库(因为"用户名已经被使用"可以执行)
而不能向里面写数据?
<!--#include file="conn.asp"-->
<!--#include file="md5.asp"-->
<%
email = Request("email")
zhanghao = Request("zhanghao")
mima = Request("mima")
mima1 = Request("mima1")
question = Request("question")
answer = Request("answer")
If email = "" Or zhanghao = "" Or mima= "" Or mima1 = "" Then
Response.Write "<html><body><center><font size=5>请将资料填写完整。</font></center></body></html>"
Response.End
End If
sql="select * from account where zhanghao like '%" &zhanghao& "%'"
set rs=conn.execute(sql)
if not rs.eof then
response.write "用户名已经被使用!"
response.end
end if
Set rs = Server.CreateObject("ADODB.Recordset")
rs.Open "客户", dbconnection, adOpenDynamic, 3
rs.addnew
rs("email")=trim(request("email"))
rs("zhanghao")=trim(request("zhanghao"))
rs("mima")=md5(trim(request("mima")))
rs("quesion")=trim(request("quesion"))
rs("answer")=(trim(request("answer")))
rs.update
rs.close
Response.Write "<html><body><center><font size=5>祝贺,您注册成功了!<p>"
Response.Write "<a href='index.asp'>返回主页</a>"
Response.Write "</font></center></body></html>"
%>
而不能向里面写数据?
<!--#include file="conn.asp"-->
<!--#include file="md5.asp"-->
<%
email = Request("email")
zhanghao = Request("zhanghao")
mima = Request("mima")
mima1 = Request("mima1")
question = Request("question")
answer = Request("answer")
If email = "" Or zhanghao = "" Or mima= "" Or mima1 = "" Then
Response.Write "<html><body><center><font size=5>请将资料填写完整。</font></center></body></html>"
Response.End
End If
sql="select * from account where zhanghao like '%" &zhanghao& "%'"
set rs=conn.execute(sql)
if not rs.eof then
response.write "用户名已经被使用!"
response.end
end if
Set rs = Server.CreateObject("ADODB.Recordset")
rs.Open "客户", dbconnection, adOpenDynamic, 3
rs.addnew
rs("email")=trim(request("email"))
rs("zhanghao")=trim(request("zhanghao"))
rs("mima")=md5(trim(request("mima")))
rs("quesion")=trim(request("quesion"))
rs("answer")=(trim(request("answer")))
rs.update
rs.close
Response.Write "<html><body><center><font size=5>祝贺,您注册成功了!<p>"
Response.Write "<a href='index.asp'>返回主页</a>"
Response.Write "</font></center></body></html>"
%>