这个代码怎么错了？ - ASP

别问我是谁

电梯直达

1^#

发表于 2010-1-10 09:07:41 | 只看该作者回帖奖励

|倒序浏览 |阅读模式

各位大虾，我做的是注册页面，其中有一个判断是超级用户还是普通用户，我是这样写的：
rs.addnew
rs("name")=name
rs("password")=password
if qq="管理员" then
rs("user_type")=1
else
rs("user_type")=0
rs.update
rs.close
conn.close
set rs=nothing
set conn=nothing
end if
session("name")=name
session("password")=password
response.write "恭喜你注册成功！你的用户名是："
response.write session("name")
response.write "<br>"
response.write "你的密码是："
response.write session("password")
response.write "<br>"
response.write "<a href='index.asp'>转到首页</a>"
end if
这个是其中一部分代码，但是就是当我选择管理员单选按钮时根本写不进去数据库，但是按普通的那个单选按钮就能写进去，但当我直接这样写：

if qq="管理员" then
rs.addnew
rs("name")=name
rs("password")=password
rs("user_type")=1
能写进管理员是肯定的，但又当点普通用户时出现问题了，你们说我要怎么写？谢谢

收藏0

使用道具举报

我為ぷぃ情醉

2^#

发表于 2010-1-10 09:07:45 | 只看该作者

程序代码：
Dim i,s
i=10
If i Mod 2=1 Then
  s="奇数"
Else
  s="偶数"
  Msgbox s
End If

回复支持反对

使用道具举报

人杰地灵

3^#

发表于 2010-1-10 09:07:49 | 只看该作者

谢谢楼上的哥们，我按你的方法解决了，真的很感谢，非常感谢，嗨，昨天都在提醒自己要细心，今天我又是怎么了，还是粗心，嗨，这样真累啊，是不是啊大哥大姐门，所以大家都以后注意点哦，信心第一！！！！！来到这里真好，有那么多兄弟姐妹帮忙，没有什么办不了的，以后大家有什么问题，尽管问，我知道的肯定全部奉告！！！！友谊万岁友谊万岁友谊万岁友谊万岁友谊万岁友谊万岁友谊万岁友谊万岁友谊万岁友谊万岁友谊万岁友谊万岁友谊万岁友谊万岁友谊万岁友谊万岁友谊万岁友谊万岁友谊万岁友谊万岁友谊万岁友谊万岁友谊万岁友谊万岁友谊万岁友谊万岁友谊万岁友谊万岁友谊万岁友谊万岁友谊万岁友谊万岁友谊万岁友谊万岁友谊万岁友谊万岁友谊万岁友谊万岁友谊万岁友谊万岁友谊万岁友谊万岁友谊万岁友谊万岁友谊万岁友谊万岁友谊万岁友谊万岁友谊万岁友谊万岁友谊万岁友谊万岁友谊万岁友谊万岁友谊万岁友谊万岁友谊万岁友谊万岁友谊万岁友谊万岁友谊万岁友谊万岁友谊万岁友谊万岁友谊万岁友谊万岁友谊万岁友谊万岁友谊万岁友谊万岁友谊万岁友谊万岁友谊万岁友谊万岁友谊万岁友谊万岁友谊万岁友谊万岁友谊万岁友谊万岁友谊万岁友谊万岁友谊万岁友谊万岁友谊万岁友谊万岁友谊万岁友谊万岁友谊万岁友谊万岁友谊万岁友谊万岁友谊万岁友谊万岁友谊万岁友谊万岁友谊万岁友谊万岁友谊万岁友谊万岁友谊万岁友谊万岁友谊万岁友谊万岁友谊万岁友谊万岁友谊万岁友谊万岁友谊万岁友谊万岁友谊万岁友谊万岁友谊万岁友谊万岁友谊万岁友谊万岁友谊万岁友谊万岁友谊万岁友谊万岁友谊万岁友谊万岁友谊万岁友谊万岁友谊万岁友谊万岁友谊万岁友谊万岁友谊万岁友谊万岁友谊万岁友谊万岁友谊万岁友谊万岁友谊万岁友谊万岁友谊万岁友谊万岁友谊万岁友谊万岁友谊万岁

回复支持反对

使用道具举报

我只在乎你

4^#

发表于 2010-1-10 09:07:53 | 只看该作者

update语句，我没有用update语句啊，我就是直接写进去啊，我发现就是不能写进第一句，也就是if qq="管理员" then
rs("user_type")=1 else , 就这句执行不了，当选到管理员就写不进去，但选普通用户就能写，你们说怎么了？

回复支持反对

使用道具举报

西门庆

5^#

发表于 2010-1-10 09:07:57 | 只看该作者

看看你的update语句在哪里执行的。

回复支持反对

使用道具举报

け星☆辰ご

6^#

发表于 2010-1-10 09:08:01 | 只看该作者

if qq="管理员" then
rs("user_type")=1
else
rs("user_type")=0
rs.update
rs.close
conn.close
set rs=nothing
set conn=nothing
end if
这里有问题，end if应在这里：
if qq="管理员" then
rs("user_type")=1
else
rs("user_type")=0
end if

rs.update
rs.close
conn.close
set rs=nothing
set conn=nothing

回复支持反对

使用道具举报

→莲佳

7^#

发表于 2010-1-10 09:08:06 | 只看该作者

我觉得这样不行，我想想，呵呵，不行，我刚试过了

回复支持反对

使用道具举报

成哥

8^#

发表于 2010-3-14 15:05:04 | 只看该作者

我现在终于明白我缺乏的是什么了，正是楼主那种对真理的执着追求和楼主那种对理想的艰苦实践所产生的厚重感。

回复支持反对

使用道具举报

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