type=quotsubmitquotvalue=quot登錄quot lognoasp關(guān)鍵代碼lt Dim conn #39建立數(shù)據(jù)庫(kù)連接，因?yàn)樘峁┝嗣艽a和用戶，用的是較老方式的Access連接Set conn=Servercreatobjecquotadodbconnectionquotconnopen quotdriver=driver do micros；lt% dim yhm1，pwd1 yhm1=Str_filtertrimrequestFormquotyhm1quot pwd1=md5Str_filtertrimrequestFormquotpwd1quot if yhm1ltquotquot then set rs=serverCreateObjectquotadodbrecordsetquot sql=quotselect yhm，pw；用DW就可以簡(jiǎn)單實(shí)現(xiàn) 1建立連接字符串 連接字符串以及解釋如下connstr=quotdriver=SQL Serverserver=localuid=sapwd=sadatabase=Your databasequot語法介紹1driver=SQL Server始終為這個(gè)形式，不變 2；注冊(cè)2，loginasp 用戶數(shù)據(jù)處理文件lt！ #include file=quotconnaspquot lt%#39打開數(shù)據(jù)庫(kù)判斷用戶是否存在，info為表名，username為字段名set rsc=servercreateobjectquotadodbrecordsetquotsqlc=quotselect * from info where username=#39quot；用不同的SESSION值，比方說用戶和管理員不在同一個(gè)表或者同一個(gè)表，你可以把一個(gè)設(shè)置成SESSIONquotADMINLOGINquot=lt%=RSquotUSERNAMEquot% 一個(gè)設(shè)置成 SESSIONquotUSERquot=lt%=RSquotUSERNAMEquot% 這樣就可以區(qū)分了！同一個(gè)表。

then responsewritequot登錄成功quotdatequotquotuserquot歡迎你quotelse responseWritequotalert#39密碼或用戶名錯(cuò)誤，請(qǐng)重新登錄#39=#39indexasp#39quotend if%。

在你的登錄代碼中，出現(xiàn)sessionquotadminquot ，相同道理也可以出現(xiàn)sessionquotadminnamequot舉例來說吧 lt if 登錄帳號(hào)與密碼成功 then sessionquotadminquot=rsquotadminquotsessionquotadminnamequot=rsquotadminnamequotend if 那麼，在；就判斷登錄的是管理員還是普通用戶了 在數(shù)據(jù)庫(kù)里面加上一個(gè)字段，比如加個(gè)level_int數(shù)字類型，里面是1的話說明是管理員，是0的話是普通用戶根據(jù)這個(gè)字段判斷就行了；1connectionasp里的代碼是lt set conn=servercreateobjectquotadodbconnectionquotconnopen quotprovider=data source=quotserverMapPathquotstudentmdbquot 2yanzhengasp里的代碼是lt！#include；檢查一下數(shù)據(jù)庫(kù)里是不是有同名但不同密碼的用戶如果用SQL SERVER數(shù)據(jù)庫(kù)，看看你的字段數(shù)據(jù)類型是不是char，如果是，會(huì)有多余空格的情況，需要用RTrim函數(shù)處理檢查表單中密碼框的name是否是p1。

User_LoginCheckasp代碼 lt！#include file=quotIncludecnOpenaspquot lt% dim User，Pwd set User = requestFormquotUser_Namequot set Pwd = requestFormquotUser_Pwdquot if User = quotquot or Pwd = quotquot th；得到角色信息，如果你的Role字段存放的數(shù)據(jù)是 User 或者 Admin之類的，那么下面判斷出用戶名的角色后，如果是普通用戶就跳轉(zhuǎn)到會(huì)員界面，管理員就跳到管理員界面ASP的話，假設(shè) strXX 是獲取到的數(shù)據(jù)庫(kù)里面用戶角色，I。

ConnOpen strConn 改成set rs = servercreateobjectquotadodbrecordsetquotsql = quotselect * from G_User where G_UserName=#39quot username quot#39quotrsopen sql，conn，1，1；在indexasp頁(yè)面寫入以下代碼，即可顯示用戶名和等級(jí) lt%=rsquotusernamequot%你好，你的等級(jí)為lt%=rsquot等級(jí)quot% 把我作的登陸頁(yè)作貼出來吧，lt！#include file=quotfmfengaspquot lt lt！ 判斷用戶名賬；用戶密碼正確，運(yùn)行登錄 加入Session strSql = quotselect usertype from userlogin where username = #39quot + loginname + quot#39and userpassword =#39quot + loginpassword + quot#39quotstring usertype=；登錄 lt！ STYLE1 color #FF0000fontweight boldfontsize xlarge STYLE2 fontsize 16px。