📄 index.asp
字号:
<!--#include file="conn.asp" -->
<html ><head ><TITLE>网上图书馆</TITLE>
<LINK href="style.css" type=text/css rel=stylesheet>
</HEAD>
<BODY leftMargin=0 topMargin=0 marginheight="0" marginwidth="0">
<%
'提交的操作
action =request.querystring("action")
'默认操作是填写登录信息
if action ="" or isnull(action) Then
Session("Name")="" '记录读者姓名
Session("ReaderID")=""
%>
<form method=post action =index.asp?action=y>
<TABLE height="100%" cellSpacing=0 cellPadding=0 width="100%" border=0>
<TBODY>
<TR>
<TD vAlign=top>
<TABLE height="100%" cellSpacing=0 cellPadding=0 width="100%" border=0>
<TBODY>
<TR>
<TD vAlign=bottom bgColor=#2589df height="40%">
<TABLE height=140 cellSpacing=0 cellPadding=0 width="100%"
background=top-back.jpg border=0>
<TBODY>
<TR>
<TD vAlign=bottom align=middle>
<TABLE height=140 cellSpacing=0 cellPadding=0 width=725
background=top-back.jpg border=0>
<TBODY>
<TR>
<TD vAlign=bottom align=right>
<IMG height=39
src="image/tu-1.jpg" width=359></TD>
<TD vAlign=bottom align=right>
<IMG height=59
src="image/top.jpg" width=374></TD></TR>
<TR>
<TD>
<IMG height=54 src="image/tu-2.jpg"
width=359></TD>
<TD vAlign=bottom align=left rowSpan=2>
<TABLE cellSpacing=0 cellPadding=0 width="100%" border=0>
<TBODY>
<TR>
<TD vAlign=bottom align=left width=73><A href="select.asp">
<IMG
height=27 src="image/duzhe.jpg" width=73
border=0></A></TD>
<TD align=right>
<TABLE cellSpacing=0 cellPadding=0 border=0>
<TBODY>
<TR>
<TD class=doc> </TD></TR>
<TR>
<TD> </TD></TR>
<TR>
<TD> </TD></TR></TBODY></TABLE></TD></TR></TBODY></TABLE></TD></TR>
<TR>
<TD>
<IMG height=27 src="image/tu-3.jpg"
width=359></TD></TR></TBODY></TABLE></TD></TR></TBODY></TABLE></TD></TR>
<TR>
<TD vAlign=top align=middle>
<TABLE cellSpacing=0 cellPadding=0 width=733 border=0>
<TBODY>
<TR>
<TD vAlign=top colSpan=4>
<IMG height=20
src="image/tu-4.jpg" width=351></TD>
<TD vAlign=top align=right width=94>
</TD>
<TD class=doc vAlign=top width=93 rowSpan=6>
<TABLE cellSpacing=0 cellPadding=0 width="100%" border=0>
<TBODY>
<TR>
<TD vAlign=top align=right width=5>
</TD>
<TD class=doc vAlign=top> </TD></TR></TBODY></TABLE></TD>
<TD vAlign=top align=right width=189 rowSpan=6>
<TABLE cellSpacing=0 cellPadding=0 width="100%" border=0>
<TBODY>
<TR>
<TD vAlign=top align=right colspan="2"> </TD></TR>
<TR>
<TD vAlign=top align=right bgcolor="#2589DF" colspan="2">
<p align="center"><font color="#FFFFFF">请登录系统</font></TD></TR>
<TR>
<TD vAlign=top align=right bgcolor="#2589DF" width="42%">
<p align="center"><font color="#FFFFFF">借书证号</font></TD>
<TD vAlign=top align=right bgcolor="#2589DF" width="58%">
<p align="center">
<input type=text name="ReaderID" size="12"> </TD></TR>
<TR>
<TD vAlign=top align=right bgcolor="#2589DF" width="42%">
<p align="center"><font color="#FFFFFF">密 码</font></TD>
<TD vAlign=top align=right bgcolor="#2589DF" width="58%">
<p align="center">
<input type="password" name="Password" width =20 size="12"> </TD></TR>
<TR>
<TD vAlign=top align=right bgcolor="#2589DF" width="42%">
<p align="center"><input type="submit" value="登 录" name="B1" > </TD>
<TD vAlign=top align=right bgcolor="#2589DF" width="58%">
<p align="center"><input type=reset value="取 消" name="B2"> </TD></TR>
</TBODY></TABLE></TD></TR>
<TR>
<TD vAlign=top colSpan=5 height=2>
<IMG height=22
src="image/tu-5.jpg" width=303><A
href="http://162.105.138.207/tese/tese_spdb.htm"><IMG
height=22 src="image/tese.jpg" width=103
border=0></A></TD></TR>
<TR>
<TD vAlign=top colSpan=4>
<IMG height=30
src="image/tu-6.jpg" width=335></TD>
<TD class=doc vAlign=top width=94 rowSpan=4>
<TABLE cellSpacing=0 cellPadding=0 width="100%" border=0>
<TBODY>
<TR>
<TD vAlign=top align=right width=5>
</TD>
<TD class=doc vAlign=top><BR></TD></TR></TBODY></TABLE></TD></TR>
<TR>
<TD vAlign=top colSpan=4>
<IMG height=29
src="image/tu-7.jpg" width=271><A
href="http://162.105.138.207/jiansuo/jiansuo.htm"><IMG
height=29 src="image/jiansuo.jpg" width=64
border=0></A></TD></TR>
<TR>
<TD vAlign=top width=85 rowSpan=2><A
href="http://162.105.138.207/yonghu/yonghu.htm">
<IMG height=31
src="image/yonghu.jpg" width=85 border=0></A>
<TABLE cellSpacing=0 cellPadding=0 width="100%" border=0>
<TBODY>
<TR>
<TD vAlign=top align=right width=30>
</TD>
<TD class=doc vAlign=top> </TD></TR></TBODY></TABLE></TD>
<TD vAlign=top width=90><a href=index.asp>
<IMG height=50 src="image/ruguan.jpg" width=98 border=0></A></TD>
<TD vAlign=top width=88><A
href="http://162.105.138.207/zixun/zixun.htm">
<IMG height=42
src="image/zixun.jpg" width=88 border=0></A></TD>
<TD class=doc vAlign=top width=95 rowSpan=2>
<TABLE cellSpacing=0 cellPadding=0 width="80%" border=0>
<TBODY>
<TR>
<TD vAlign=top align=right width=15>
</TD>
<TD class=doc vAlign=top width=62> </TD></TR></TBODY></TABLE></TD></TR>
<TR>
<TD class=doc vAlign=top width=90>
<TABLE cellSpacing=0 cellPadding=0 width="100%" border=0>
<TBODY>
<TR>
<TD vAlign=top align=right width=30>
</TD>
<TD class=doc vAlign=top><BR></TD></TR></TBODY></TABLE></TD>
<TD class=doc vAlign=top width=88>
<TABLE cellSpacing=0 cellPadding=0 width="100%" border=0>
<TBODY>
<TR>
<TD vAlign=top align=right width=10>
</TD>
<TD class=doc vAlign=top> </TD></TR></TBODY></TABLE></TD></TR></TBODY></TABLE></TD></TR></TBODY></TABLE></TD></TR>
</TBODY></TABLE></form>
<% Else
If action ="y" then
If Request("ReaderID")<>"" Then
sql="select * from reader where ReaderID='" & Request("ReaderID") & "' And Password='" & Request("Password") & "'" '查询语句
set rs=conn.Execute(sql) '执行查询
If rs.Eof Then '查询结果为空
Session("Name")=""
Session("ReaderID")=""
Response.Write("<Script > window.alert('借书证号或用密码错误??');window.location.href='index.asp';</Script>")
Else
Session("Name")=rs("Name") '记录读者姓名
Session("ReaderID")=Request("ReaderID") '记录读者借书证号
Response.Write("<Script Language=javascript> window.open('welcome.asp?RID=" & Session("ReaderID") & "&RN=" & Session("Name") & "','_self');</Script>")
End If
rs.close
End IF
End If
End IF
%>
</BODY></HTML>⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -