编程论坛 → ASP技术论坛

帮忙查看下这段程序错误在哪里？

lxd0980 发布于 2011-04-07 15:34， 872 次点击

<%@LANGUAGE="VBSCRIPT" CODEPAGE="936"%>

<%
  dim id , name, pwd, phone
  id=trim(Request.Form("id"))
  name =trim(Request.Form("name"))
  pwd=trim(Request.Form("pwd"))
  phone=trim(Request.Form("phone"))

set rs=server.createobject("adodb.recordset")
    sql="select * from users where  name='"& name (Request("name"))&"' "
    rs.open sql,conn,1,1

If not rs.eof Then

alert ("用户名已存在！")

Response.end

Else

rs.addnew
rs("id")=trim(request("id"))
rs("naem")=trim(request("name"))
rs("pwd")=trim(request("pwd"))
rs("phone")=trim(request("phone"))

rs.update

alert("注册成功！"）

rs.close
set rs=nothing
  %>

不管输入不输入，总是显示：

只有本站会员才能查看附件，请登录

8 回复

#2

sky2222011-04-07 15:43

以下是引用lxd0980在2011-4-7 15:34:11的发言：

sql,conn,1,1

不管输入不输入，总是显示：

response.Write "<script>alert('注册成功！');history.back()</script>"
sql,conn,1,3

[ 本帖最后由 sky222 于 2011-4-7 15:45 编辑 ]

#3

tandezhong2011-04-07 16:01

回复楼主 lxd0980

alert("注册成功！"）
改成 response.write "<script>alert("注册成功！")</script>"

#4

a7688419692011-04-07 16:02

sql,conn,1,1 是只读，你改成sql,conn,3,2试试

#5

ywyql_842011-04-07 16:51

sql="select * from users where name='"& name (Request("name"))&"' "

把(Request("name"))去掉

#6

lxd09802011-04-07 22:25

照样还是那样了！

#7

dzt00012011-04-07 22:35

alert("注册成功！"）
右括号是全角，写代码要注意了！！！

#8

hams2011-04-08 08:06

不错，全角半角要认真写清楚

#9

twtrwr2011-04-08 11:03

，，，这个括号也看的到，，，牛，，佩服

1