如何获得登陆用户的其它信息?急!!!

Question

strServer=strServer+"<tr><td width='40%' valign='top'>显示客户发出的所有HTTP标题：</td><td>"+Request.ServerVariables["All_Http"]+"</td></tr>"; 
         strServer=strServer+"<tr><td valign='top'>检取ISAPIDLL的metabase路径：</td><td>"+Request.ServerVariables["APPL_MD_PATH"]+"</td></tr>"; 
         strServer=strServer+"<tr><td valign='top'>显示站点物理路径：</td><td>"+Request.ServerVariables["APPL_PHYSICAL_PATH"]+"</td></tr>"; 
         strServer=strServer+"<tr><td valign='top'>路径信息：</td><td>"+Request.ServerVariables["PATH_INFO"]+"</td></tr>"; 
         strServer=strServer+"<tr><td valign='top'>显示请求机器IP地址：</td><td>"+Request.ServerVariables["REMOTE_ADDR"]+"</td></tr>"; 
         strServer=strServer+"<tr><td valign='top'>服务器IP地址：</td><td>"+Request.ServerVariables["LOCAL_ADDR"]+"</td></tr>"; 
         strServer=strServer+"<tr><td valign='top'>显示执行SCRIPT的虚拟路径：</td><td>"+Request.ServerVariables["SCRIPT_NAME"]+"</td></tr>"; 
         strServer=strServer+"<tr><td valign='top'>返回服务器的主机名，DNS别名，或IP地址：</td><td>"+Request.ServerVariables["SERVER_NAME"]+"</td></tr>"; 
         strServer=strServer+"<tr><td valign='top'>返回服务器处理请求的端口：</td><td>"+Request.ServerVariables["SERVER_PORT"]+"</td></tr>"; 
         strServer=strServer+"<tr><td valign='top'>协议的名称和版本：</td><td>"+Request.ServerVariables["SERVER_PROTOCOL"]+"</td></tr>"; 
         strServer=strServer+"<tr><td valign='top'>服务器的名称和版本：</td><td>"+Request.ServerVariables["SERVER_SOFTWARE"]+"</td></tr>"; 

Answer 1

strServer=strServer+"<tr><td width='40%' valign='top'>显示客户发出的所有HTTP标题：</td><td>"+Request.ServerVariables["All_Http"]+"</td></tr>"; 
         strServer=strServer+"<tr><td valign='top'>检取ISAPIDLL的metabase路径：</td><td>"+Request.ServerVariables["APPL_MD_PATH"]+"</td></tr>"; 
         strServer=strServer+"<tr><td valign='top'>显示站点物理路径：</td><td>"+Request.ServerVariables["APPL_PHYSICAL_PATH"]+"</td></tr>"; 
         strServer=strServer+"<tr><td valign='top'>路径信息：</td><td>"+Request.ServerVariables["PATH_INFO"]+"</td></tr>"; 
         strServer=strServer+"<tr><td valign='top'>显示请求机器IP地址：</td><td>"+Request.ServerVariables["REMOTE_ADDR"]+"</td></tr>"; 
         strServer=strServer+"<tr><td valign='top'>服务器IP地址：</td><td>"+Request.ServerVariables["LOCAL_ADDR"]+"</td></tr>"; 
         strServer=strServer+"<tr><td valign='top'>显示执行SCRIPT的虚拟路径：</td><td>"+Request.ServerVariables["SCRIPT_NAME"]+"</td></tr>"; 
         strServer=strServer+"<tr><td valign='top'>返回服务器的主机名，DNS别名，或IP地址：</td><td>"+Request.ServerVariables["SERVER_NAME"]+"</td></tr>"; 
         strServer=strServer+"<tr><td valign='top'>返回服务器处理请求的端口：</td><td>"+Request.ServerVariables["SERVER_PORT"]+"</td></tr>"; 
         strServer=strServer+"<tr><td valign='top'>协议的名称和版本：</td><td>"+Request.ServerVariables["SERVER_PROTOCOL"]+"</td></tr>"; 
         strServer=strServer+"<tr><td valign='top'>服务器的名称和版本：</td><td>"+Request.ServerVariables["SERVER_SOFTWARE"]+"</td></tr>"; 

Answer 2

如果你用的是DataSet,可以
DataTable objDataTable = objDataSet.Tables["user"];
objDataTable.Columns[i].DataType;

Answer 3

下面的代码是没有判断用户类型而指向一个访问页面的.我想让某个类型的用户只访问某个页面.请问如何改下面的代码???
<%
MM_LoginAction = Request.ServerVariables("URL")
If Request.QueryString<>"" Then MM_LoginAction = MM_LoginAction + "?" + Request.QueryString
MM_valUsername=CStr(Request.Form("textfield"))
If MM_valUsername <> "" Then
  MM_fldUserAuthorization=""
  MM_flag="ADODB.Recordset"
  set MM_rsUser = Server.CreateObject(MM_flag)
  MM_rsUser.ActiveConnection = MM_bjqycx_STRING
  MM_rsUser.Source = "SELECT Userid, UserPwd, UserType"
  If MM_fldUserAuthorization <> "" Then MM_rsUser.Source = MM_rsUser.Source & "," & MM_fldUserAuthorization
  MM_rsUser.Source = MM_rsUser.Source & " FROM User WHERE Userid='" & Replace(MM_valUsername,"'","''") &"' AND UserPwd='" & Replace(Request.Form("textfield2"),"'","''") & "'"
  MM_rsUser.Open
  If Not MM_rsUser.EOF Or Not MM_rsUser.BOF Then 
    ' username and password match - this is a valid user
    Session("MM_Username") = MM_valUsername
    If (MM_fldUserAuthorization <> "") Then
      Session("MM_UserAuthorization") = CStr(MM_rsUser.Fields.Item(MM_fldUserAuthorization).Value)
    Else
      Session("MM_UserAuthorization") = ""
    End If
    if CStr(Request.QueryString("accessdenied")) <> "" And false Then
      MM_redirectLoginSuccess = Request.QueryString("accessdenied")
    End If
    MM_rsUser.Close
    Response.Redirect("Lcmuser/index.asp")
  else Response.Redirect("management/fail.asp")
  End If
End If
%>

Answer 4

你应该在user表中再加一个用户类型字段，再用switch-case语句中选择性的
用Response.Redirect跳转页面

Answer 5

不知道我有没有理解你的意思，
直接把用户ID保存到Session里面，在别的页面直接读取Session就可以了。

Answer 6

用户类型不是可以从数据库中得到吗？
switch(/*读出来的用户类型字段*/)
{
case "用户类型1":
    Response.Redirect("1.htm");
    break;
case "用户类型2":
    Response.Redirect("2.htm");
    break;
    ...
    ...
default:
    Response.Redirect("default.htm");
    break;
}

Answer 7

使用Request.ServerVariables（参数）就可以得到更多的客户信息

Answer 8

好象还没明白我的意思.数据库access是这样的:
user表:userid,userpwd,usertype.
我的目的是用户实现输入userid,userpwd来登陆.
我如何知道用户输入userid后,取得他的usertype,来给定他的登陆页面,也就是一种类型的用户只登陆某一页面.
我是想知道如何得到他的usertype,来做判断.多谢呀.

Answer 9

好象还没明白我的意思.数据库access是这样的:
user表:userid,userpwd,usertype.
我的目的是用户实现输入userid,userpwd来登陆.
我如何知道用户输入userid后,取得他的usertype,来给定他的登陆页面,也就是一种类型的用户只登陆某一页面.
我是想知道如何得到他的usertype,来做判断.多谢呀.下面的代码是没有判断用户类型而指向一个访问页面的.我想让某个类型的用户只访问某个页面.请问如何改下面的代码???
<%
MM_LoginAction = Request.ServerVariables("URL")
If Request.QueryString<>"" Then MM_LoginAction = MM_LoginAction + "?" + Request.QueryString
MM_valUsername=CStr(Request.Form("textfield"))
If MM_valUsername <> "" Then
  MM_fldUserAuthorization=""
  MM_flag="ADODB.Recordset"
  set MM_rsUser = Server.CreateObject(MM_flag)
  MM_rsUser.ActiveConnection = MM_bjqycx_STRING
  MM_rsUser.Source = "SELECT Userid, UserPwd, UserType"
  If MM_fldUserAuthorization <> "" Then MM_rsUser.Source = MM_rsUser.Source & "," & MM_fldUserAuthorization
  MM_rsUser.Source = MM_rsUser.Source & " FROM User WHERE Userid='" & Replace(MM_valUsername,"'","''") &"' AND UserPwd='" & Replace(Request.Form("textfield2"),"'","''") & "'"
  MM_rsUser.Open
  If Not MM_rsUser.EOF Or Not MM_rsUser.BOF Then 
    ' username and password match - this is a valid user
    Session("MM_Username") = MM_valUsername
    If (MM_fldUserAuthorization <> "") Then
      Session("MM_UserAuthorization") = CStr(MM_rsUser.Fields.Item(MM_fldUserAuthorization).Value)
    Else
      Session("MM_UserAuthorization") = ""
    End If
    if CStr(Request.QueryString("accessdenied")) <> "" And false Then
      MM_redirectLoginSuccess = Request.QueryString("accessdenied")
    End If
    MM_rsUser.Close
    Response.Redirect("Lcmuser/index.asp")
  else Response.Redirect("management/fail.asp")
  End If
End If
%>
目的是:select case XXXXXXXXXXXXX
      case "液晶显示用户":
      Response.Redirect("Lcmuser/index.asp")
      case "SMT用户":
      Response.Redirect("Smtuser/index.asp")
      case "综合用户":
      Response.Redirect("super/index.asp")
    end select可是这个XXXXXXXXXXXX如何取得呀,大家帮我看看

Answer 10

你都有了userid，根据userid再查询数据库不就得到userType了。。
select userType from user where userid='userid'
执行这条语句就得到了三