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

📄 qq_dl.asp

📁 国产亿人多用户在线聊天系统
💻 ASP
字号:
<!--#include file="conn.asp"-->
<html>
<head>
<link rel="stylesheet" href="style.css" type="text/css">
<title>
用户登陆
</title>
</head>
<%yhm=request.form("yhm")
pass=request.form("pass")
dz=request.querystring("dz")
pass=setpwd(pass)
zl = "全部"

if yhm<>"" and dz="sc" then
	set rs=server.createobject("adodb.recordset")
	exec="select * from admin where yhm='"+yhm+"'"
	rs.open exec,conn,1,1
	if not rs.eof then
		grmm=rs("pass")
		xb=rs("xb")
		jb=rs("jb")
		if pass<>grmm then	response.redirect "qq_dl.asp"
	else
		response.redirect "qq_dl.asp"
	end if
	session("qqyhm")=yhm
	session("qqpass")=pass
	session("qqjb")=jb
	session("qqnc")=rs("nc")
	session("qqxb")=rs("xb")
	application.lock 
	xm = "<font color=#663333>" + session("qqnc") + "</font>"
	application(zl) = "<tr bgcolor=#E3E9F1 height=25 style='table-layout:fixed;word-break:break-all'><td align=left>" + xm + "(" + cstr(time) + "):" + ys + "大家好!我刚上来!</font><br>" + application(zl) 
	application.unlock 
	response.redirect "qq.asp"
end if

if dz="yk" then
	session("qqjb") = "1"
	session("qqyhm") = "游客" + replace(cstr(time),":","")
	session("qqnc") = "临时"
	application.lock 
	xm = "<font color=#663333>" + session("qqnc") + "</font>"
	application(zl) = "<tr bgcolor=#E3E9F1 height=25 style='table-layout:fixed;word-break:break-all'><td align=left>" + xm + "(" + cstr(time) + "):" + ys + "大家好!我刚上来!</font><br>" + application(zl) 
	application.unlock 
	response.redirect "qq.asp"
end if%>
<body>
<!--#include file="qq_wjt.asp"-->
<br>
<center>
<form name="from" method="post" action="qq_dl.asp?dz=sc">
<table align="center">
	<tr height="25"><td>用户名</td>
	<td><input type=text name=yhm size="10"></td>
	</tr>
	<tr height="25"><td>密码</td>
	<td><input type="password" name="pass" size="10"> </td>
	</tr>
</table>
<table cellpadding="4" cellspacing="0" align="center">
	<tr height="25">
	<td align="center">
	<input type="button" onclick="javascript:window.location='qq_dl.asp?dz=yk';" value="游   客">
	&nbsp;&nbsp;&nbsp;
	<input type=submit onclick="javascript:return dl(yhm.value,pass.value);" value="登   陆">
	&nbsp;&nbsp;&nbsp;
	<input type=button onclick="javascript:window.location='qq_zc.asp';" value="注   册"></td>
	</tr>
</table>
  </center>
</form>
</center>
</body>
</htm>
<script language='javascript'>
function dl(yhm,pass)
{
	if (yhm=="")
	{alert('输入用户名!');
	document.from.yhm.focus();
	return false;}
	if (pass=="")
	{alert('输入密码!');
	document.from.pass.focus();
	return false;}}
</script>

⌨️ 快捷键说明

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