")>0 or Instr(UserName,"0 or Instr(UserName,"=")>0 or Instr(UserName,"%")>0 or Instr"/> ")>0 or Instr(UserName,""/>
首页 > QQ登录界面代码

QQ登录界面代码

2017-10-25 3页 doc 14KB 94阅读

用户头像

is_682974

暂无简介

举报
QQ登录界面代码QQ登录界面代码 login.asp: 用户名:密 码: coon.asp: 外加after_login.asp登录验证页面: alert('会员登陆失败!\n\n错误原因:会员 帐号和密码未填。');history.back();") Response.end End If if Instr(UserName,">")>0 or Instr(UserName,"0 or Instr(UserName,"=")>0 or Instr(UserName,"%")>0 or Instr(UserN...
QQ登录界面代码
QQ登录界面代码 login.asp:
用户名:密 码:
coon.asp: <% connstr = "DBQ=" + server.mappathuser.mdb") + ";DRIVER={Microsoft Access Driver (*.mdb)}" Set conn=Server.createobject("ADODB.CONNECTION") conn.Open connstr %> 外加after_login.asp登录验证页面: <% Dim UserName,PassWord UserName=replace(trim(Request.Form("Username")),"'","‘") PassWord=replace(trim(Request.Form("PassWord")),"'","‘") If UserName="" or PassWord="" Then Response.Write ("") Response.end End If if Instr(UserName,">")>0 or Instr(UserName,"<")>0 or Instr(UserName,"=")>0 or Instr(UserName,"%")>0 or Instr(UserName,chr(32))>0 or Instr(UserName,"?")>0 or Instr(UserName,"&")>0 or Instr(UserName,";")>0 or Instr(UserName,",")>0 or Instr(UserName,"'")>0 or Instr(UserName,chr(34))>0 or Instr(UserName,chr(9))>0 or Instr(UserName," ")>0 or Instr(UserName,"$")>0 then Response.Write ("") Response.end else UserName=Trim(UserName) end if set rs=server.createobject("adodb.recordset") sql="select * from [user] where UserName='"&UserName&"'" rs.open sql,conn,1,3 if rs.eof then Response.Write ("") Response.end else if rs("PassWord")<>PassWord then rs.close set rs=nothing Response.Write ("") Response.end else session("UserName")=UserName'登录成功传递一个session值以便以后调用用户相关 session.timeout=300 end if end if rs.close set rs=nothing CloseDatabase %>
/
本文档为【QQ登录界面代码】,请使用软件OFFICE或WPS软件打开。作品中的文字与图均可以修改和编辑, 图片更改请在作品中右键图片并更换,文字修改请直接点击文字进行修改,也可以新增和删除文档中的内容。
[版权声明] 本站所有资料为用户分享产生,若发现您的权利被侵害,请联系客服邮件isharekefu@iask.cn,我们尽快处理。 本作品所展示的图片、画像、字体、音乐的版权可能需版权方额外授权,请谨慎使用。 网站提供的党政主题相关内容(国旗、国徽、党徽..)目的在于配合国家政策宣传,仅限个人学习分享使用,禁止用于任何广告和商用目的。

历史搜索

    清空历史搜索