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

📄 my.asp

📁 单版面小型论坛 单版面小型论坛
💻 ASP
字号:
<%dim VIP, name
name=Request.Cookies("name")("VIPManages")
%>
<%
set conn=server.createobject("adodb.connection")
DBPath = Server.MapPath("db.mdb")
conn.Open "driver={Microsoft Access Driver (*.mdb)};dbq=" & DBPath
Set rs = Server.CreateObject("ADODB.Recordset")
SQL="Select * from id Where name='"&name&"'"
rs.open sql, conn, 1, 1
%>
<%
if rs.bof and rs.eof then
vip="error"
end if
if Request.Cookies("name")("VIPManages")="" then
vip="error1"
end if
%>
<%Select case vip
case "error"%>
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<link rel="stylesheet" href="css.css">
<title>my bbs</title>
</head>
<body leftmargin="0" Topmargin="0" marginwidth="0" marginheight="0" background="images/greystrip.gIf">
<!--#include file="top2.asp"-->
<br>
<table border="1" cellspacing="0" cellpadding="0" width="416" align="center" height="10" bordercolor="#7C96B8" bordercolordark="#FFFFFF">
<TR>
<td colspan="1" height="20" background="images/mmTo.gIf" width="416" bgcolor="#7C96B8"><DIV style="FILTER: dropshadow(color=#FFFFFF, offx=1, offy=1, positive=1); WIDTH: 100%; CURSOR: hAND; POSITION: relative">
<p align="center"><font color="#336699">登 陆 失 败</font></p>
</div>
</td>
</TR>
<TR>
<td height="50">
<p align="center"><font color="#336699"><a id="backforumlink" href="index.asp">非法的操作,请返回首页!</a></font></p>
<SCRIPT language="javascript" type="text/javascript">setTimeout("location.href = backforumlink.href",3000);</SCRIPT>
</td>
</TR>
</table>
</body>
</html>
</td>
</TR>
</table>
</body>
</html>
<%case "error1"%>
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<link rel="stylesheet" href="css.css">
<title>my bbs</title>
</head>
<body leftmargin="0" Topmargin="0" marginwidth="0" marginheight="0" background="images/greystrip.gIf">
<!--#include file="top2.asp"-->
<br>
<table border="1" cellspacing="0" cellpadding="0" width="416" align="center" height="10" bordercolor="#7C96B8" bordercolordark="#FFFFFF">
<TR>
<td colspan="1" height="20" background="images/mmTo.gIf" width="416" bgcolor="#7C96B8"><DIV style="FILTER: dropshadow(color=#FFFFFF, offx=1, offy=1, positive=1); WIDTH: 100%; CURSOR: hAND; POSITION: relative">
<p align="center"><font color="#336699">登 陆 失 败</font></p>
</div>
</td>
</TR>
<TR>
<td height="50">
<p align="center"><font color="#336699"><a id="backforumlink" href="index.asp">用户名或密码错误,请返回首页!</a></font></p>
<SCRIPT language="javascript" type="text/javascript">setTimeout("location.href = backforumlink.href",3000);</SCRIPT>
</td>
</TR>
</table>
</body>
</html>
<%case Else%>

⌨️ 快捷键说明

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