chkadmin.asp

来自「·用JAVA实现的对动态树状信息的管理。操作员可以通过IE浏览器查看整个树形结构」· ASP 代码 · 共 52 行

ASP
52 行
字号 
<!--#include file=dbpath.asp-->
<%
	dim sql
	dim objrs
	dim admin
	dim password
	admin=replace(trim(request("admin")),"'","‘")
	password=replace(trim(Request("password")),"'","‘")

	set objrs=server.createobject("adodb.recordset")
	sql="select * from admin where password='"&password&"' and admin='"&admin&"'"
	objrs.open sql,objconn,1,1
 	if not(objrs.bof and objrs.eof) then
 		if password=objrs("password") then
			session("admin")=objrs("admin")
			Response.Redirect "admin_index.asp"
 		else
			call Error
 		end if
	else
		call Error()
	end if

	sub Error()
response.write " <LINK rel='stylesheet' type='text/css' href='../links.css'> "
response.write " <TITLE>Administrator Login</TITLE> "
response.write " <BODY> "
response.write " <BR><BR><BR>  "   
response.write " <TABLE align='center' width='300' border='1' cellpadding='0' cellspacing='0' bordercolor='#000000' bordercolordark='#FFFFFF'> "      
response.write " <TR>  "
response.write " <TD colspan='2' height='15' background='../images/background.gif'>"     
response.write " <DIV align='center'>登入失败！</DIV> "
response.write " </TD> "
response.write " </TR> "   
response.write " <TR> "
response.write " <TD colspan='2' height='23'> "   
response.write " <DIV align='center'><BR><BR>密码错误！<BR> "
response.write " <BR><A href='login.asp'>重新登入！</A><BR> "
response.write " <BR> "
response.write " </DIV> "
response.write " </TD> "
response.write " </TR> " 
response.write " </TABLE> " 
	end sub
	objrs.close
	objconn.close
	set objrs=nothing
	set objconn=nothing

%>

chkadmin.asp - 源码说明

本页面展示了「·用JAVA实现的对动态树状信息的管理。操作员可以通过IE浏览器查看整个树形结构信息」中的 chkadmin.asp 源码文件，采用 ASP 编程语言编写，共 52 行代码。您可以在线阅读完整代码内容，也可以返回资源详情页下载完整源码包进行本地学习和开发。

虫虫开发者社区收录了大量与Java相关的技术资源，包括源代码、技术文档、电路图等，是电子工程师和嵌入式开发者的专业学习平台。

⌨️ 快捷键说明

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