chkadmin.asp

来自「实验室设备管理系统目标：通过对多种一维条码的编码进行分析和算法设计在系统中能实现」· ASP 代码 · 共 51 行

ASP
51 行
字号 
<!--#include file=conn.asp-->
<%
	dim sql
	dim rs
	dim username
	dim password
	username=replace(trim(request("username")),"'","")
	password=replace(trim(Request("password")),"'","")

	set rs=server.createobject("adodb.recordset")
	sql="select * from admin where password='"&password&"' and username='"&username&"'"
'	response.write ""&sql&""
'	response.end
	rs.open sql,conn,1,1
 	if not(rs.bof and rs.eof) then
 		if password=rs("password") then
			session("admin")=rs("username")
			session("flag")=rs("flag")
			Response.Redirect "manage.asp"
 		else
			call Error
 		end if
	else
		call Error()
	end if

	sub Error()
		response.write "   <html><head><link rel='stylesheet' href='/include/STYLE.CSS'></head><body>"
	    	response.write "   <br><br><br>"
	    	response.write "    <table align='center' width='300' border='0' cellpadding='4' cellspacing='0' class='border'>"
	    	response.write "      <tr > "
	    	response.write "        <td class='title' colspan='2' height='15'> "
	    	response.write "          <div align='center'>操作: 确认身份失败!</div>"
	    	response.write "        </td>"
	    	response.write "      </tr>"
	    	response.write "      <tr> "
	    	response.write "        <td class='tdbg' colspan='2' height='23'> "
	    	response.write "          <div align='center'><br><br>"
	    	response.write "      用户名或密码错误!!! <br><br>"
	    	response.write "        <a href='javascript:onclick=history.go(-1)'>返回</a>"        
	    	response.write "        <br><br></div></td>"
	    	response.write "      </tr>   </table></body></html>" 
	end sub
	rs.close
	conn.close
	set rs=nothing
	set conn=nothing

%>

chkadmin.asp - 源码说明

本页面展示了「实验室设备管理系统目标：通过对多种一维条码的编码进行分析和算法设计在系统中能实现对多种一维条码的显示。 基础要求：非常熟悉C或C++或JAVA语言、熟悉SQL SERVER的相关知识、VB或Delp」中的 chkadmin.asp 源码文件，采用 ASP 编程语言编写，共 51 行代码。您可以在线阅读完整代码内容，也可以返回资源详情页下载完整源码包进行本地学习和开发。

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

⌨️ 快捷键说明

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