郁闷.麻烦大家帮我看一下代码错在哪里.(原来是IIS问题)

Secret · 发表于 2009-9-14 08:02:57

管理提醒：本帖被醉雪枫叶执行锁定操作(2007-08-09)<%@language=vbscript%>
<html>
<body>
<%
set conn=server.create("adodb.connection")
conn.open"用户","sa",""
%>
<%
  dim strname,strpassword,strcheckpassword
  strname=request.form("name")
  strpassword=request.form("password")
  strcheckpassword=request.form("strcheckpassword")
  if strname="" then response.write "your account can not be none"
%>
  <a href=javascript:history.back()>上一页</a>
<%
  respond.end
  if strpassword=": then response.write "your password can not be none"
%>
  <a href=javascript:history.back()>上一页</a>
<%
  response.end
  if strpassword=strcheckpassword then response.write"your password and the checkpassword  are not the same.please check it."
%>
  <a href=javascript:history.back()>上一页</a>
<%
response.end
%>
<%
dim strsql
strsql="select*from 用户 where name=""&strname&""
set rs=conn.execute(strsql)
if not(rs.bof and rs.eof) then
  response.write" your account have existed"
end if
  rs.close
  set rs=nothing
%>
<%
  dim strtable
  strtable="用户"
  set rs=server.createobject("adodb.recordset")
  rs.open strtable,conn,1,3
  rs.addnew
  rs("name")="strname"
  rs("password")="strpassword"
  rs.update
  rs.close
  set rs=nothing
  response.write"congratulations,you have succeeded in applying"
%>
</body>
</html>
[ 此贴被稻草人的凝望在2007-08-08 13:07重新编辑 ]

孔隆 · 发表于 2010-2-11 13:05:07

顶．支持，路过．．．．．

		自动登录	找回密码
密码			注册