📄 findaccount.asp

📁 这是一个点歌系统

💻 ASP

字号:

 <!--#include file=articleconn.asp-->
<%
dim sql
dim rs
dim seekerrs
dim founduser
dim name
dim companyid
dim pwd
dim errmsg
dim founderr
founderr=false
FoundUser=false
	name=trim(request("name"))
	pwd=cstr(Request("pwd"))



set rs=server.createobject("adodb.recordset") 
sql="select * from password where name='"&name&"' and pwd='"&pwd&"'"
rs.open sql,conn,1,3 
if not rs.eof then 

  
 if pwd=rs("pwd") and name=rs("name") then
   session("hs_opt")="ok"
   response.redirect "manage.asp"
end if
else
           response.write "<link rel='stylesheet' type='text/css' href='style.css'>"
      response.write "<body bgcolor='#ffffff'>" 
      response.write "您输入名字和密码不对，请输入正确的名字和密码，方可进入管理页面"
end if
rs.close
conn.close
set rs=nothing
set conn=nothing
%>

⌨️ 快捷键说明

复制代码 Ctrl + C

搜索代码 Ctrl + F

全屏模式 F11

切换主题 Ctrl + Shift + D

显示快捷键 ?

增大字号 Ctrl + =

减小字号 Ctrl + -