我在xh_login.asp输入用户名和密码，然后跳转到xh_cklogin.asp进行判断，根据用户的权限（用户表中的type）选择跳转到哪个新页面
但是输入了用户名和密码后却停在xh_cklogin.asp的空白页面上了，这是怎么回事啊？
请帮忙
xh_cklogin.asp代码如下

<!--#include file="xh_conn.asp"-->
<%

myAccount = trim(request("username"))
myPass = trim(request("Password"))

set Conn = Server.CreateObject("Adodb.Connection")
Connstr = "Driver={SQL Server};Server=cylong;UID=sa;PWD=;Database=生产管理"
Conn.open connstr
CheckSql = "SELECT * FROM 用户 WHERE 用户名 = '"&myAccount&"' AND 密码 = '"&myPass&"'"
set checkRs = Server.CreateObject("Adodb.Recordset")
checkRs.Open CheckSql,Conn,1,1
if checkRs.eof then
response.write "<script language=javascript>alert('对不起密码输入错误');history.back(-1)</script>"
end if

Select Case session("type")
Case "1"
response.redirect "1.asp"
Case "2"
response.redirect "2.asp"
Case "3"
response.redirect "3.asp"
end select
%>

谢谢

[此贴子已经被作者于2005-12-28 0:17:08编辑过]

哪里来的session("type")
应该是rs("type")吧！

Select Case session("type")
Case "1"
response.redirect "1.asp"
Case "2"
response.redirect "2.asp"
Case "3"
response.redirect "3.asp"
end select


在这段代码前加上response.write(session("type")),看看session("type")到底是什么值，才好判断是怎么回事！

把session("type")改为rs("type"），运行显示
Microsoft VBScript 运行时错误 (0x800A01C2)
错误的参数个数或无效的参数属性值: 'rs'

在代码前加上response.write(session("type")),结果还是和以前一样，停在xh_cklogin.asp的空白页面上了。

xh_cklogin.asp代码如下

<!--#include file="xh_conn.asp"-->
<%

myAccount = trim(request("username"))
myPass = trim(request("Password"))

set Conn = Server.CreateObject("Adodb.Connection")
Connstr = "Driver={SQL Server};Server=cylong;UID=sa;PWD=;Database=生产管理"
Conn.open connstr
CheckSql = "SELECT * FROM 用户 WHERE 用户名 = '"&myAccount&"' AND 密码 = '"&myPass&"'"
set checkRs = Server.CreateObject("Adodb.Recordset")
checkRs.Open CheckSql,Conn,1,1
if checkRs.eof then
response.write "<script language=javascript>alert('对不起密码输入错误');history.back(-1)</script>"
else
Session("type")=rs("type")'你少了这个记录Session
end if

Select Case session("type")
Case "1"
response.redirect "1.asp"
Case "2"
response.redirect "2.asp"
Case "3"
response.redirect "3.asp"
end select
%>

<!--#include file="xh_conn.asp"-->
<%

myAccount = trim(request("username"))
myPass = trim(request("Password"))

set Conn = Server.CreateObject("Adodb.Connection")
Connstr = "Driver={SQL Server};Server=cylong;UID=sa;PWD=;Database=生产管理"
Conn.open connstr
CheckSql = "SELECT * FROM 用户 WHERE 用户名 = '"&myAccount&"' AND 密码 = '"&myPass&"'"
set checkRs = Server.CreateObject("Adodb.Recordset")
checkRs.Open CheckSql,Conn,1,1
if checkRs.eof then
response.write "<script language=javascript>alert('对不起密码输入错误');history.back(-1)</script>"
else
type=checkRs("type")'你少了这个记录Session
end if

Select Case type

Case "1"
response.redirect "1.asp"
Case "2"
response.redirect "2.asp"
Case "3"
response.redirect "3.asp"
end select
%>

添加了type=checkRs("type")后，运行显示
错误类型：
Microsoft VBScript 编译器错误 (0x800A0400)
缺少语句
/roylong/admin/xh_cklogin.asp, line 17
type=checkRs("type")


添加了Session("type")=rs("type")后，运行显示
错误类型：
Microsoft VBScript 运行时错误 (0x800A01C2)
错误的参数个数或无效的参数属性值: 'rs'
/roylong/admin/xh_cklogin.asp, 第 17 行

是空白也面那就对了，说明你的session("type")是空值，就不可能执行下面的select语句了！~

那关于给session("type"）赋值
能帮忙修改下我的代码吗？
我才开始学，没什么经验

Select Case session("type")
Case "1"
response.redirect "1.asp"
Case "2"
response.redirect "2.asp"
Case "3"
response.redirect "3.asp"
end select
从这里看:你首先要看,前一页是不是已经定义了session("type")的值.....

从你的情况来看程序运行到这里就停止了,那么肯定session("type")没有赋值,
所以你要找到session("type")赋值的位置,我猜应当在登入页