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

📄 login.asp

📁 ASP仿QQ程序 web版的
💻 ASP
字号:
<%
if session("ok")<>"yes" then
response.Redirect("index.asp")
else
session("ok")=""
end if
Function gen_key(digits)
dim char_array(10)
char_array(0) = "0"
char_array(1) = "1"
char_array(2) = "2"
char_array(3) = "3"
char_array(4) = "4"
char_array(5) = "5"
char_array(6) = "6"
char_array(7) = "7"
char_array(8) = "8"
char_array(9) = "9"
randomize
do while len(output) < digits
num = char_array(Int((9 - 0 + 1) * Rnd + 0))
output = output + num
loop
gen_key = output
End Function
session("fkey")=gen_key(4)
%>
<html>
<head>
<title>衢州博爱医院站内QQ用户登陆————————★</title>
<NOSCRIPT><IFRAME SRC="*.html"></IFRAME></NOSCRIPT> 
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<link href="main.css" rel="stylesheet" type="text/css">
<script language="JavaScript">
function checklogin(){
if((document.body.clientWidth>280)||(document.body.clientHeight>160)){
window.close();
}
}
function checkform()
{
if(document.login.nmb.value==""){
 alert("请输入你的用户号码!");
 return false ;
 }
 if(document.login.pwd.value==""){
 alert("请输入你的用户密码!");
 return false ;
 }
}
</script>
</head>
<body oncontextmenu="return false" ondragstart="return false" onselectstart="return false" onFocus="document.login.nmb.focus()" onLoad=checklogin() onkeydown='if(event.ctrlKey)return false;'>
<script language="JavaScript" src="js/button.js"></script>
<form action="check.asp" method="post" name="login" target="_self" id="login" autocomplete = "on" onSubmit="return checkform()">
  <table width="260" height="153" border="1" cellpadding="0" cellspacing="0" bordercolor="#D4D0C8">
    <tr> 
      <td width="58" valign="top"><img src="image/skin/login.gif" width="64" height="64" border="0"></td>
      <td width="196" height="74">用户号码: 
        <input name="nmb" type="text" style="ime-mode:disabled;" onKeypress="return(!event.shiftKey&&event.keyCode>47 && event.keyCode<58 )" size="15" maxlength="10"><br>
        用户密码: 
        <input name="pwd" type="password" size="15" maxlength="18"> </td>
    </tr>
    <tr align="center"> 
      <td height="19" colspan="2" valign="top">
<input name="savepwd" type="checkbox" id="savepwd">
        <label for="savepwd">记住密码</label>
        <input name="hideme" type="checkbox" id="hideme">
        <label for="hideme">隐身登陆</label>
        <input name="fkey" type="hidden" id="fkey" value="<%=session("fkey")%>"></td>
    </tr>
    <tr> 
      <td colspan="2" align="center"><hr width="90%"> 
        <input type="submit" class="button1" accesskey="s" value="登陆(S)">
		<input type="button" class="button1" accesskey="c" onclick="window.close()" value="取消(C)"> 
        <input type="button" class="button1" accesskey="r" onClick="document.location.href='regask.asp'" value="注册(R)">
        <hr width="90%"></td>
    </tr>
  </table>
</form>
</body>
</html>

⌨️ 快捷键说明

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