📄 loginindex.asp
字号:
<!--#include file="conn.asp"-->
<!--#include file="sn.asp"-->
<!--#include file="webinfo.asp"-->
<!--#include file="fun.asp"-->
<!--#include file="CodeGen.asp"-->
<html>
<head>
<script language=javascript>
function checklogin()
{
if (document.logina.user.value=="") {alert("请输入账号");return false;}
if (document.logina.password.value=="") {alert("请输入密码");return false;}
if (document.logina.yzm.value=="") {alert("请输入验证码");return false;}
document.logina.submit();
}
</script>
<link rel="stylesheet" href="indexlogin.css" type="text/css">
<title>请先登陆:<%=webname%></title>
</head>
<body background="images/loginbg.JPG" leftmargin="0" topmargin="0" marginwidth="0" marginheight="0" bgcolor="#eeeeee" onkeydown="if(event.keyCode==122){event.keyCode=0;return false}">
<% if isinstall=0 then
response.write "<script>alert('请先运行install.asp进行系统初始化安装\n\n安装码在sn.txt文件中\n\n虽然你删除这一段判断代码本页面可以正常执行\n\n但是数据库没有初始化\n\n可能会影响该软件在结算模块功能\n\n上的正确性!因为结算是以你的服务器时间为判断标准的!');location.href='install.asp';</script>"
end if
%>
<table width="100%" height="760" border="0">
<tr>
<td height="93" align="center"><font color=#ffaa00 size=7><BR></BR><%=webname%> 登陆</font>
<br><div align=right><font color=#ffff00 SIZE=4><%=webver%></font></div></td>
</tr>
<tr>
<td valign=top>重要公告:
<marquee scrolldelay=0 scrollamount=3 onMouseOver="this.scrollDelay=200" onMouseOut="this.scrollDelay=30" width=80%>
<%call annouce()%>
</marquee></td>
</tr>
<tr>
<td height="231" align="center">
<% IF SESSION("NAME")=EMPTY THEN%>
<br><br>
<form action="manager/logindo.asp" method=post name=logina>
<table height="195" border=0 >
<tr>
<td align=center colspan=2>
<input type=radio name=action value=adminloginin onclick='document.logina.fog.disabled=1;'>
<font color="#ffffff"><B>管理员</B></font><font color=#ffffff>
<input type=radio checked name=action value=loginin onclick='document.logina.fog.disabled=0'>
工作人员</font>
</td>
</tr>
<tr >
<td align="center" >账 号:</td><td ><input type="text" name="user" size="10" class="loginzhbox"></td>
<td align="center">密 码:</td><td><input type="password" name="password" size="10" class="loginzhbox"> </td>
</tr>
<tr ><td align="center">验证码:</td><td><input type="text" name="yzm" size=10 class=loginyzmbox ></td>
<td align="center" >请输入:</td><td align=center >
<img src="VerifyCode.asp" title="验证码,看不清楚?请点击刷新验证码" style="cursor:pointer" onclick="this.src='VerifyCode.asp?'+Math.random();document.logina.yzm.value='444';" id='VerifyCodeimg'>
</td>
</tr>
<tr>
<td colspan=2 align=center >
<input type=button value=登陆 class=loginbtnbox onclick='javascript:checklogin();'>
<input type=reset class=loginbtnbox value=重置>
<input type=button class=loginbtnbox name=fog value=忘记 onclick=window.open("userpass.asp?action=get")>
<%if zizhusign=1 then%>
<input type=button class=loginbtnbox value=注册 onclick=window.open("zizhusign.asp")>
<%end if%>
</td>
</tr>
</table>
</form>
<%else
response.write "<br><font size=6 color=red>"&session("name")&"<br><br><Br>欢迎登陆到本系统!</font>"
if (session("qx")=5 or session("qx")=0)then
response.write "<br><br>[<a href='qd.asp'>进入操作</a> | <a href='manager/logindo.asp?action=loginout' >退出系统</a></a>]</td>"
elseif (session("qx")<4 and session("qx")>0) then
response.write "<br><br>[<a href='manager/adminindex.asp'>进入操作</a> | <a href='manager/logindo.asp?action=loginout' >退出系统</a></a>]</td>"
end if
end if%>
</td>
</tr>
<tr>
<td align=center valign=top>
分辨率1024X768最佳<br>
Made By ASOFT © 2004-2007, ASOFT All Rights Saved .
<table width=100%>
<tr>
<td height="58" align="center" valign="middle" > <font color="#222222">当前版本:<a href="mailto:ctplr@163.com" class=wht title="和制作者联系"><%=webver%></a>
| 授权给<a href=<%=weburl%> class=wht ><%=webname%> </a>使用! | 站长<a href="mailto:<%=email%>" title="联系站长" class=wht ><%=webmaster%></a>欢迎您!
</td>
</tr>
</table>
</td>
</tr>
</table>
</body>
</html>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -