最新下载
热门教程
- 1
- 2
- 3
- 4
- 5
- 6
- 7
- 8
- 9
- 10
Asp 单页查询数据库!
时间：2022-06-30 10:42:47 编辑：袖梨 来源：一聚教程网
dim rs,sql,x_name,x_pwd,x_count
If Request.Form("do")="ok" Then
If Request.Form("user_name")="" Then
Response.Write("")
Response.End()
Else
x_name = Request.Form("user_name")
End If
'↑ 叛断用户名是否为空!
If Request.Form("user_pwd")="" Then
Response.Write("")
Response.End()
Else
x_pwd = Request.Form("user_pwd")
End If
'↑ 叛断用户密码是否为空!
set rs = Server.Createobject("adodb.recordset")
sql="select * from [user] where user_name='"&x_name&"' and user_pwd='"&x_pwd&"'"
rs.open sql,conn,1,1
if not rs.Eof Then
session("s_name")=rs("user_name")
session("s_shen")=rs("shenfen")
session("s_shi")=rs("shijian")
Response.Redirect "infoin.asp"
Else
Response.Write("")
Response.End()
End If
Else
%>
| -->系统登录 |
相关文章
- boss智能门锁如何设置密码 04-29
- 王者荣耀世界橘右京厉害吗 04-29
- 《青云劫攻略天赋技能，成就无敌仙侠》（解锁潜能，掌握绝学，成就仙侠传奇） 04-29
- 桃源深处有人家藏经室悟证一至七日通关答案 04-29
- 怎么击败《Saros》中的“破碎崛起”先知 Boss 04-29
- 宫小攻略技能推荐2023（玩转宫小，轻松游戏攻略指南） 04-29