📄 pollword.asp
字号:
<%
user=request.form("user")
password=request.form("password")
if user<>"" and password<>"" then
set conn=server.createobject("ADODB.CONNECTION")
conn.open "DBQ="+server.mappath("poll.mdb")+";DRIVER={Microsoft Access Driver (*.mdb)};"
set rs=server.createobject("adodb.recordset")
sql="SELECT * from admin where user='"&user&"' and password='"&password&"'"
rs.open sql,conn,1,1
if rs.recordcount>0 then
response.redirect "pollman.asp"
else
Response.Write "<br><p align=center>请输入正确的帐号或密码！</p>"
end if
end if
%>
<html>
<head>
<title>调查修编</title>
<style>
<!--
table { font-family: 宋体; font-size: 12px }
-->
</style>
</head>
<body topmargin="0" leftmargin="0" scroll="no" bgcolor="#000000" background="bg.gif">
<form action="pollword.asp" method="POST" >
<div align="center">
<center>
<table bgColor="#000000" border="0" cellPadding="0" cellSpacing="0">
</table>
</center>
</div>
<table border="0" width="778" background="bg.gif" cellspacing="0" cellpadding="0" height="60%">
<tr>
<td width="91%">
<div align="center">
<center>
<table border="1" width="47%" cellspacing="0" cellpadding="0" bordercolorlight="#FFFFFF" bordercolordark="#84D7A0" bgcolor="#84D7A0" height="130">
<tr>
<td width="100%" align="center" bgcolor="#E8E8FF" height="28">调查修编</td>
</tr>
<tr>
<td width="100%" align="center" bgcolor="#E8E8FF" height="34">帐号：<input type="text" name="user" size="20"></td>
</tr>
<tr>
<td width="100%" align="center" bgcolor="#E8E8FF" height="35">口令：<input type="password" name="password" size="20"></td>
</tr>
<tr>
<td width="100%" bgcolor="#E8E8FF" height="35">
<p align="center"><input type="submit" value="确定登陆" name="B1">
<input type="reset" value="全部重写" name="B2"></td>
</tr>
</table>
</center>
</div>
</tr>
</table>
</form>
</body>
</html>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -