我是用index.aspx 做的LOGIN IN,输入UID,PWD就可以进入,同时读取他的权限数值,还有厂别!并打开main.aspx呵,我发现只能把uid,pwd用session 读到main.aspx 里.别的从数据库里读取的记录是不行的.源码如下:index.aspxdim conn,rs
pwd = trim(request.form("pwd"))
uid = trim(request.form("U_id"))
conn = server.createobject("adodb.connection")
'conn.Open Application("login")
conn = server.createobject("adodb.connection")
conn.open("Provider=OraOLEDB.Oracle.1;User ID=rpmgr;Password=rpmgr;data source=ITDBT")
sql = "select * from user_acl where U_ID ='"+uid+"' and PWD='"+pwd+"' "
rs=server.createobject("adodb.recordset")
rs.open(sql,conn,3,3)
If Not rs.EOF Then
cname = rs("cname").tostring
session("name")=uid
Session("pwd") = pwd
session("fac")=rs("FACILITY").tostring
session("right_t1")=rs("right_t1").tostring
session("right_l1")=rs("right_l1").tostring
session("right_f1")=rs("right_f1").tostring
session("right_m1")=rs("right_m1").tostring
rs.close
conn.close
Response.Redirect("Main.aspx")
Else
Response.Redirect ("Loginsb.aspx")
End If
end if
main.aspx<%=session("pwd")%> ---- 这个可以显示密码
<% =session("right_t1")%>---这个显示sysytem_ComObject不知为何?这个文件以前是asp的,我把后缀变了,并在开头加了一些代码:
<%@ Page Language="VB" Debug="true" AspCompat ="true"%>
pwd = trim(request.form("pwd"))
uid = trim(request.form("U_id"))
conn = server.createobject("adodb.connection")
'conn.Open Application("login")
conn = server.createobject("adodb.connection")
conn.open("Provider=OraOLEDB.Oracle.1;User ID=rpmgr;Password=rpmgr;data source=ITDBT")
sql = "select * from user_acl where U_ID ='"+uid+"' and PWD='"+pwd+"' "
rs=server.createobject("adodb.recordset")
rs.open(sql,conn,3,3)
If Not rs.EOF Then
cname = rs("cname").tostring
session("name")=uid
Session("pwd") = pwd
session("fac")=rs("FACILITY").tostring
session("right_t1")=rs("right_t1").tostring
session("right_l1")=rs("right_l1").tostring
session("right_f1")=rs("right_f1").tostring
session("right_m1")=rs("right_m1").tostring
rs.close
conn.close
Response.Redirect("Main.aspx")
Else
Response.Redirect ("Loginsb.aspx")
End If
end if
main.aspx<%=session("pwd")%> ---- 这个可以显示密码
<% =session("right_t1")%>---这个显示sysytem_ComObject不知为何?这个文件以前是asp的,我把后缀变了,并在开头加了一些代码:
<%@ Page Language="VB" Debug="true" AspCompat ="true"%>
我以前试过在两者之间用session传送值,但是不成功。不知道有没有其他的方法