⭐ 欢迎来到虫虫下载站! | 📦 资源下载 📁 资源专辑 ℹ️ 关于我们
⭐ 虫虫下载站

📄 chkadmin.asp

📁 实现一个用JSP、Servlet技术实现的小型物流网站系统。实现功能如下:管理员通过登录该系统
💻 ASP
字号:
<%dbdns="../../"%>
<!--#include file="../../inc/conn.asp"-->
<!--#include file="../cook.asp"-->
<%if fla1<>1 then
response.write "<script>alert('操作权限出错,您没有权限操作些功能');history.go(-1);</Script>"
Response.End 
end if

	nick=replace(trim(request("user")),"'","")
	password=replace(trim(Request("pass")),"'","")

	set rs=server.createobject("adodb.recordset")
	sql="select * from SMT_yp where SMT_pass='"&password&"' and SMT_user='"&nick&"'"
	rs.open sql,conn,1,1
 	if not(rs.bof and rs.eof) then
		session("useradmin")=rs("SMT_user")
		session("id")=rs("SMT_id") 
        session("coname")=""
        response.write "<script>window.open('"&application("cityurl")&"user/main.asp','_blank');history.go(-1)</script>"
	else
	response.write "<script>alert('用户登录出错,下面是产生错误的可能原因:\n\n·用户名或密码错误,请重新输入');history.go(-1);</Script>"
	Response.End 
	end if
	
	rs.close
	conn.close
	set rs=nothing
	set conn=nothing
%>

⌨️ 快捷键说明

复制代码 Ctrl + C
搜索代码 Ctrl + F
全屏模式 F11
切换主题 Ctrl + Shift + D
显示快捷键 ?
增大字号 Ctrl + =
减小字号 Ctrl + -