📄 home.asp.bak
字号:
<%
'************************************************************************************************
' 文件名: home.asp
' Copyright(c) 2001-2002 上海阿尔卡特网络支援系统有限公司
'
' 创建人 : 周秋舫
' 日 期 : 2002-05-13
' 修改历史 :
' ****年**月**日 ****** 修改内容:**************************************************
' 功能描述 : 用户登录前首页面
' 提供用户输入用户名和密码进行系统登录
' 版 本 :
'************************************************************************************************
option explicit
Response.CacheControl = "no-cache"
Response.AddHeader "Pragma", "no-cache"
Response.Expires = -1
%>
<!-- #include file="../include/common.inc" -->
<!-- #include file="../include/commonpage.inc" -->
<!-- #include file="../include/loginAction.inc" -->
<!-- #include file="../include/home.inc" -->
<%
If IsLogin then
Server.Transfer("../include/main.asp")
End if
dim conn:set conn=DBConnection
dim rs:set rs=OpenRS(conn,"select * from t_account")
If Request.ServerVariables("REQUEST_METHOD") = "POST" then
call LoginAction(GetParam("loginname"), GetParam("password"))
End If
%>
<html>
<head>
<title>上海信息大楼 Shanghai Information Tower</title>
<meta http-equiv="Content-Type" content="text/html;charset=gb2312">
<link rel="stylesheet" href="../include/home.css" type="text/css">
</head>
<body leftmargin="0" topmargin="0" marginwidth="0" marginheight="0" text="#FFFFFF" link="#FFFFFF" vlink="#FFFFFF" background="../images/bg/bg0.jpg">
<br>
<%Response.Write OuterTableHeader%>
<table width="750" border="0" cellspacing="0" cellpadding="0" height="250" background="../images/bg/main.gif">
<tr>
<td valign="top">
<table width="700" border="0" cellspacing="0" cellpadding="1" align="center">
<tr>
<td width="375"><a href="index.html"><img src="../images/bg/Sp.gif" width="353" height="90" border="0"></a></td>
<td width="325"> </td>
</tr>
<tr>
<td width="375"><%call FormLoginPanel%></td>
<td width="325"><marquee direction="up" scrollamount="1" border="0" width="300" height="125" OnMouseOver="this.stop();" OnMouseOut="this.start();"><b><a target=_blank href="../news/news.asp">物业管理系统正在开发中。。。</a></b></marquee></td>
</tr>
</table>
</td>
</tr>
</table>
<table width="750" border="0" cellspacing="0" cellpadding="0" background="../images/bg/txbg.gif" height="100%">
<tr>
<td valign="top" align="right">
<table width="150" border="0" cellspacing="0" cellpadding="1" background="../images/bg/bnbg.gif">
<tr>
<td> </td>
</tr>
</table>
</td>
</tr>
<tr>
<td valign="top">
<table width="725" border="0" cellspacing="0" cellpadding="5" align="center">
<tr>
<td class="font" width="75" valign="top" align="right"><font color="#000000"><br>
<b><img src="../images/bg/ar-g.gif" width="8" height="8"> 大楼简介<br>
<img src="../images/bg/ar-g.gif" width="8" height="8"> 物业简介<br>
<img src="../images/bg/ar-g.gif" width="8" height="8"> 业主简介<br>
<img src="../images/bg/ar-g.gif" width="8" height="8"> 租户情况<br>
<img src="../images/bg/ar-g.gif" width="8" height="8"> 客户投诉</b></font></td>
<td class="font" width="450" valign="top"><font color="#000000">
<b><img src="../images/bg/ar-y.gif" width="10" height="10"> 物业简介</b><br>
租用车位的租户，请同时填写“上海信息大楼租户IC卡申领表”
持卡租户信息如有变动，请及时填写“上海信息大楼租户IC卡变更表”<br>
IC卡内可不断充值，供在本大楼消费场所使用<br>
租户申领IC卡，请填写“上海信息大楼租户IC卡申领表” <br>
IC卡如有遗失，请及时通知管理中心<br>
办理补卡手续<br>
IC卡(月租卡)补卡费用为人民币300元/张<br>
IC卡严禁借于他人使用</font></td>
<td class="font" width="225" valign="top"><font color="#000000"><b><img src="../images/bg/ar-b.gif" width="10" height="10">
小调查</b></font></td>
</tr>
</table>
</td>
</tr>
</table>
<table width="750" border="0" cellspacing="0" cellpadding="0" background="../images/bg/btmtx.gif" height="125">
<tr><td align=right><a target=_blank href="../help/index.htm" style="color:navy;text-decoration:none"><img border=0 src="../images/help.gif"> 点击这里进入帮助系统</a> </td></tr>
<tr>
<td valign="bottom">
<table width="500" border="0" cellspacing="0" cellpadding="5" align="center">
<tr>
<td>上海市电信公司信息世界分公司<br>
<font face="Arial, Helvetica, sans-serif">©All rights reserved by Shanghai Telecommunication company information world Branch</font></td>
</tr>
<tr>
<td><img src="../images/bg/Sp.gif" width="25" height="5"></td>
</tr>
</table>
</td>
</tr>
</table>
<%Response.Write OuterTableTailer
Disconnect(conn)
%>
<!--/td>
<td width="10"> </td>
</tr>
</table-->
</body>
</html>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -