📄 head.asp
字号:
<html>
<head>
<title><%=SystemWebSite%></title>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<meta name="generator" content="<%=SystemSearchKey%>">
<meta name=keywords content="<%=SystemSearchKey%>">
<link rel="stylesheet" href="admin/style.css" type="text/css">
<SCRIPT language=javascript>
function save_onclick()
{
var strTemp = document.forms.username.value;
if (strTemp.length == "" )
{
alert("请输入用户名！");
document.forms.username.focus();
return false;
}
var strTemp = document.forms.password.value;
if (strTemp.length == "" )
{
alert("请输入密码！");
document.forms.password.focus();
return false;
}
var strTemp = document.forms.yan.value;
if (strTemp.length == "" )
{
alert("请输入验证码！");
document.forms.yan.focus();
return false;
}
}
</SCRIPT>
<script language="JavaScript" type="text/JavaScript">
<!--
function MM_findObj(n, d) { //v4.01
var p,i,x; if(!d) d=document; if((p=n.indexOf("?"))>0&&parent.frames.length) {
d=parent.frames[n.substring(p+1)].document; n=n.substring(0,p);}
if(!(x=d[n])&&d.all) x=d.all[n]; for (i=0;!x&&i<d.forms.length;i++) x=d.forms[i][n];
for(i=0;!x&&d.layers&&i<d.layers.length;i++) x=MM_findObj(n,d.layers[i].document);
if(!x && d.getElementById) x=d.getElementById(n); return x;
}
function MM_setTextOfTextfield(objName,x,newText) { //v3.0
var obj = MM_findObj(objName); if (obj) obj.value = newText;
}
//-->
</script>
<SCRIPT language=JavaScript>
<!-- HIDE
function Affiche(chatwindow) { var MainWindow = window.open (chatwindow,
"_blank","toolbar=no,location=no,menubar=no,scrollbars=no,width=400,height=450,resizeable=no,status=no");}
// STOP HIDING FROM OTHER BROWSERS -->
</SCRIPT>
</head>
<BODY topmargin=0 leftmargin=0 rightmargin=0 bottommargin=0>
<table width="760" border="0" align="center" cellpadding="0" cellspacing="0">
<tr>
<td><img src="images/bx.gif" width="760" height="100"></td>
</tr>
</table>
<table width="760" border="0" cellspacing="0" cellpadding="0" align="center">
<tr bgcolor="#D50000">
<td height="24" width="1%" bgcolor="#D50000" align="center"></td>
<td width="30%" bgcolor="#D50000">
<a href="day.htm" target="_blank"><font color="#ffffff"><b><script language="JavaScript" src="js/date.js" type="text/javascript"></script><script>document.write(+nian)</script>年<script>document.write(+yue)</script>月<script>document.write(+ri)</script>日 星期<script>document.write(""+week)</script></b></font></a>
</td>
<td height="25" align="right"><strong>
<a href="yanzheng.asp"><font color="#FFFFFF">用户注册</font></a><font color="#FFFFFF"> | <a href="index.asp" ><font color="#FFFFFF">报修列表</font></a> | </font><a href="baoxiu.asp" ><font color="#FFFF66">报修登记</font></a><font color="#FFFFFF"> | <a href="logout.asp"><font color="#FFFFFF">注销登录</font></a></font></strong> </td>
<td width="1%" align="right"> </td>
</tr>
</table>
<TABLE cellSpacing=0 cellPadding=0 width=760 align=center border=0>
<TBODY>
<TR>
<TD height="30" background=IMAGES/T_15.jpg><MARQUEE onmouseover=this.stop() onmouseout=this.start()
scrollAmount=2
scrollDelay=5>
<%
set rsa=server.createobject("adodb.recordset")
sql="select top "&ggshu&" afficheid,affichename,affichecontent,affichetime from affiche order by afficheid DESC"
rsa.open sql,conn,1,1
do while not rsa.eof
%>
<img src="images/d.gif" width="19" height="18" border="0" /><a href="#" onClick="Affiche('ViewAffiche.asp?id=<%=rsa("afficheid")%>')" alt="点击查看公告详细内容">
<%if len(rsa("affichename"))>60 then
response.write left(rsa("affichename"),60)&"..."
else
response.write rsa("affichename")
end if%>
</a> [<%=year(rsa("affichetime"))%>-<%=month(rsa("affichetime"))%>-<%=day(rsa("affichetime"))%>]
<%
rsa.movenext
loop
if rsa.eof and rsa.bof then
response.write "暂时没有公告发布!"
end if
rsa.close
set rsa=nothing
%>
</MARQUEE></TD>
</TR>
</TBODY>
</TABLE>
<%
Function getcode1()
Dim test
On Error Resume Next
Set test=Server.CreateObject("Adodb.Stream")
Set test=Nothing
If Err Then
Dim zNum
Randomize timer
zNum = cint(8999*Rnd+1000)
Session("verifycode") = zNum
getcode1= Session("verifycode")
Else
getcode1= "<img src=""getcode.asp"">"
End If
End Function
%>
<%
set rs_user=server.createobject("adodb.recordset")
sql="select * from user_reg where user_name='"&session("baoxiuuser_name")&"'"
rs_user.open sql,conn,3,2
%>
<table width="760" border="0" align="center" cellpadding="5" cellspacing="1" bgcolor="#666666">
<tr>
<td bgcolor="#FFFFFF"><table border=0 cellpadding=0 cellspacing=0 rules=cols width="100%" align="center" height="25">
<tr bgcolor="#FFFFFF">
<td height="25" ><span class="style1"><strong>
<%if session("baoxiuuser_name")<>"" then%>
<%if rs_user("purview")=1 then%>管理员<%else%>报修用户<%end if%><%=session("baoxiuuser_name")%>
<%response.write"：您好,请把你要申报内容填写清楚！"
else
%>
</strong></span>
<table width="100%" border="0" cellspacing="0" cellpadding="0">
<form method="post" action="login.asp" name="forms" onSubmit="return save_onclick()">
<tr>
<td align="left">
用户名：
<input name="username" id="username" style="font-size: 9pt; background-color:#CDF0F9" size="10" font face="宋体">
密码：
<input name="password" type="password" id="password" style="font-size: 9pt; background-color:#CDF0F9" size="10" font face="宋体">
验证码：
<input name="verifycode" type="text" style="font-size: 9pt; background-color:#CDF0F9" size="5" maxlength="5" font face="宋体">
<font color=white><b><%=getcode1()%></b></font>
<input name="Submit" type="submit" value="登陆">
<input name="Submit" type="reset" value="重置">
</td>
</tr>
</form>
</table>
<%end if%>
</td>
<td class=content9 bgcolor="#FFFFFF" height="25"><p align="right"><a href="baoxiu.asp" style="text-decoration: none" >报修申请>>></a></td>
</tr>
</table></td>
</tr>
</table>⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -