asp登陆的代码(asp用户登录代码)
recordsetquotrsopen sql,conn,1,3 if rseof then responseWritequotalert#39用户名或密码错误请重新登录#39historygo1quotresponseend End If rsclose set rs=nothing connclose set conn=nothing responseRedirectquotxiugaiaspquot;1connectionasp里的代码是lt set conn=servercreateobjectquotadodbconnectionquotconnopen quotprovider=data source=quotserverMapPathquotstudentmdbquot 2yanzhengasp里的代码是lt!#include file=quotconnectionaspquot lt dim zhanghao,mima zhanghao=requestquotzhanghao;在表pUser213加个数字字段,比如ziduan,默认值为0 登录成功后就将diduan的值修改为了1 把 if rsquotziduanquot=1 then responsewrite quotquotchr13quotalert#39帐号已经失效#39quotquothistorybackquotquotquotresponseend end if connexecutequotupdate pUser213 set ziduan=1 where y_username=#39quot;只需要在前面这样就行了 if isnullsessionquotusernamequot or sessionquotusernamequot=quotquot then responseredirect quotdlaspquot responseend end if 为了方便管理,你应该将上面写成一个文件,比如checkadminasp然后在每个要调用的页面的顶端写入lt!#include file=quotcheckadminaspquot;会员登陆的时候做一个sessionquotusernamequot记录,把用户登陆的用户名保存在里面,然后在显示的地方做个判断lt if sessionquotusernamequot=quotquot then 登录框 lt%else% 会员信息 lt%end if%。
自己做个登陆页面loginasp,一个FORM,方法设成method=quotpostquot,action=quotcheckloginaspquot,2个TEXTBOX,一个用户名,一个密码 一个按纽 验证页代码checkloginasp lt%@ LANGUAGE=quotVBSCRIPTquot % lt!#include file=quotconnaspquot lt!#include file=quotsessionaspquot lt% dim username,a u;登录密码 lt!登录处理代码 lt!#include file=quotconnaspquot lt if requestquerystringquotactquot=quotdenglquot then if requestquotnamequot=quotquot and requestquotpasswordquot=quotquot then responsewritequot请输入用户名和密码!quotelse set rs=serverCreateObjectquotADODBRecordSetquot;protected void login_Clickobject sender, EventArgs e点击登录触发 if zhText == quotquot如果用户名输入为空,执行if里的语句,弹出对话框‘却确认是否输入了用户名或密码’ quot请确认是否输入了用户名或密码quot else if mmText == quotquot;检查你的数据库链接代码正确不,跳转一般放在登录验证正确后,写上这么一句 responseredirectxxasp。
1,indexasp 用户登陆页面 lt! #include file=quotconnaspquot lt! 悠悠长假期 会员 lt! body,td,th fontfamily 宋体 fontsize 14px 会员注册系统 用户名;登陆页在登陆验证代码略验证完毕后,写以下代码 lt responsecookiesquotusernamequot=rsquotusernamequotresponsecookiesquot等级quot=rsquot等级quotresponseRedirectquotchkaspquot chkasp lt if requestcookiesquotusernamequot=quot管理员quot then responseRedirectquotadminindexaspquotend if if r;responseWritequot=#39loginasp#39quotresponseEndend if rscloseconncloseset conn=nothing 并且在你每个后台的页面加上 lt if sessionquotusernamequot=quotquot or sessionquotpasswordquot=quotquot then Responsewritequotalert#39你是非法用户,请登录!#39quotResponsewrite quotdocument;lt!#include file=quotconnaspquot lt!#include file=quotincTS_SqlInaspquot lt!#include file=quotzjy_md6aspquot lt%dim admin,password,verifycode admin=replacetrimrequestquotadminquot,quot#39quot,quotquotpassword=zjy_md6replacetrimrequestquotpasswordquot,quot#39quot,quotquotverifycode=repla。
登录按钮代码 protected void Button1_Clickobject sender, EventArgs e SqlConnection con = new SqlConnectionquotserver=localhostdatabase=boliuid=sapwd=saquotconOpenstring sql = quotselect * from admin where name=#39quot + TextBox1Text + quot#39 and password=#39quot + TextBox2;建议btnLogin_Click if rblUsertypeText == quot1quotZhiyuanLoginaccountname,passwordif rblUsertypeText == quot2quotAdminLoginaccountname,passwordif rblUsertypeText == quot3quotHuiyuanLoginaccountname, password这段代码使用switch 原代码如果不是第一个判断命中,表示要多执行一个;登录成功后跳转到webform1aspx页 else ResponseWritequotalert#39用户名和密码输入不匹配,请重输#39quot 2WebForm1aspx页代码using Systemusing using SystemLinqusing SystemWebusing using。
很简单,用cookies记录,先写进cookies,用以下语句 responsecookiesquotusernamequot=username responsecookiesquotpasswordquot=password responsecookiesquotusernamequotexpire=now+1 responsecookiesquotpasswordquotexpire=now+1 后两句是设置了cookies的时间记忆期限,这里是记住一天,你想要多长时间都可以自己设置。
ConnOpen strConn 改成set rs = servercreateobjectquotadodbrecordsetquotsql = quotselect * from G_User where G_UserName=#39quot username quot#39quotrsopen sql,conn,1,1。