index2.asp
来自「书店的管理系统。不错的一个源程序。提供给大家。」· ASP 代码 · 共 408 行 · 第 1/2 页
ASP
408 行
<html>
<head>
<title>Untitled Document</title>
<meta http-equiv="目录类型" content="文本/html; 字符集=gb2312">
<style type="text/css">
<!--
.unnamed1 { border-color: #8DCFF4 8DCFF4 8DCFF4; border-top-width: thin; border-right-width: thin; border-bottom-width: thin; border-left-width: thin}
.unnamed2 { font-size: 10pt}
a:active { text-decoration: none}
a:hover { text-decoration: underline}
a:link { text-decoration: none}
-->
</style>
</head>
<%
set con=server.createobject("ADODB.Connection")
con.open Application("str_con")
set res_news=server.createobject("ADODB.Recordset")
set res_news.ActiveConnection = con
res_news.source="select id,news_title from news order by id desc"
res_news.pagesize=10
res_news.cursorlocation=3
res_news.open ,,adOpenStatic
set res_QHnew=server.createobject("ADODB.Recordset")
set res_QHnew.ActiveConnection = con
res_QHnew.source="select A1,A2 from QHnew"
res_QHnew.pagesize=10
res_QHnew.cursorlocation=3
res_QHnew.open ,,adOpenStatic
%>
<body bgcolor="#FFFFFF" topmargin="0" leftmargin="5">
<div align="center"></div>
<table width="100%" border="0" align="center" cellpadding="0" cellspacing="0" height="566">
<tr>
<td bgcolor="#FFE39D" colspan="2" height="806" valign="top">
<div align="center">
<table width="100%" border="0" cellpadding="0" cellspacing="0">
<tr>
<td valign="top" width="7%"><img src="IMAGE/Corner3.gif" width="19" height="19"></td>
<td width="93%">
<div align="left"><br>
<img src="IMAGE/min2.gif" width="170" height="88"></div>
</td>
</tr>
</table>
<form method="POST" name="form1" action="query/query.asp">
<div align="left">
<input type="text" name="tet">
<input type="submit" value="搜索" name="B1" style="font-size: 9pt">
<br>
<font size="2">
<input type="radio" value="1" name="R1" checked>
书名
<input type="radio" value="2" name="R1">
作者 <br>
<input type="radio" value="3" name="R1">
出版社
<input type="radio" value="5" name="R1">
ISBN</font> </div>
<table width="100%" border="0">
<tr bgcolor="#F9CD8A">
<td>
<div align="center"><img src="IMAGE/bb1.gif" width="150" height="23"></div>
</td>
</tr>
</table>
<p align="left">
<%if res_news.RecordCount > 0 then%>
<% For i = 1 to res_news.PageSize %>
<img src="IMAGE/Bj3.gif" width="8" height="11"> <a href="news_detail.asp?id=<%=res_news("id")%>" target="_blank"><font size=2><%=res_news("news_title")%></font></a><br>
<%
res_news.movenext
If res_news.EOF Then
Exit For
End If
Next
end if
%> </p>
<%if res_news.RecordCount > res_news.pagesize then%>
<p align="right"><a href="news_more.asp">全部新闻>>></a><br>
<%end if%>
<table width="100%" border="0">
<tr bgcolor="#F9CD8A">
<td height="17">
<div align="center"><img src="IMAGE/bb2.gif" width="150" height="23"></div>
</td>
</tr>
</table>
<table width="100%" border="0">
<tr>
<td width="9%" background="IMAGE/Line.gif" height="210"> </td>
<td width="91%" height="210">
<p><font size="2"> <a href="../query/query_lb.asp?lb=计算机技术、自动化技术">计算机技术、自动化技术</a><br>
<a href="../query/query_lb.asp?lb=文化、科学、教育、体育">文化、科学、教育、体育</a><br>
<a href="../query/query_lb.asp?lb=建筑科学 ">建筑科学 </a><br>
<a href="../query/query_lb.asp?lb=武术及民族形式体育 ">武术及民族形式体育 </a><br>
<a href="../query/query_lb.asp?lb=信息处理（信息加工） ">信息处理（信息加工） </a><br>
<a href="../query/query_lb.asp?lb=各种汽车 ">各种汽车 </a> <a href="../query/query_lb.asp?lb=交通运输 ">
交通运输 </a><br>
<a href="../query/query_lb.asp?lb=文体活动 ">文体活动 </a><br>
<a href="../query/query_lb.asp?lb=程序语言、算法语言 ">程序语言、算法语言 </a><br>
<a href="../query/query_lb.asp?lb=计算机网络 ">计算机网络 </a><br>
<a href="../query/query_lb.asp?lb=文学 ">文学 </a> <a href="../query/query_lb.asp?lb=汽车保养与修理 ">汽车保养与修理
</a><br>
<a href="../query/query_lb.asp?lb=公路运输 ">公路运输 </a> <a href="../query/query_lb.asp?lb=国际互联网 ">国际互联网
</a><br>
<a href="../query/query_lb.asp?lb=球类运动 ">球类运动 </a><br>
<a href="../query/query_lb.asp?lb=数据库理论与系统 ">数据库理论与系统 </a><br>
<a href="../query/query_lb.asp?lb=程序设计、软件工程 ">程序设计、软件工程 </a><br>
<a href="../query/query_lb.asp?lb=操作系统 ">操作系统 </a> <a href="../query/query_lb.asp?lb=汽车结构部件 ">汽车结构部件
</a><br>
<a href="../query/query_lb.asp?lb=机械、仪表工业 ">机械、仪表工业 </a> </font></p>
</td>
</tr>
</table>
</form>
</div>
</td>
<td width="0%" background="image/bj2.GIF" height="806"> </td>
<td width="76%" height="806" valign="top">
<table width="100%" border="2" align="center" bordercolorlight="#FFFFFF" bordercolordark="#FFFFFF">
<tr>
<td width="50%">
<div align="center"><object classid="clsid:D27CDB6E-AE6D-11cf-96B8-444553540000" codebase="http://download.macromedia.com/pub/shockwave/cabs/flash/swflash.cab#version=4,0,2,0" width="255" height="47">
<param name=movie value="IMAGE/card.swf">
<param name=quality value=high>
<embed src="IMAGE/card.swf" quality=high pluginspage="http://www.macromedia.com/shockwave/download/index.cgi?P1_Prod_Version=ShockwaveFlash" type="application/x-shockwave-flash" width="255" height="47">
</embed>
</object></div>
</td>
<td width="50%">
<div align="center"><a href="test2/UntitledFrame-8.htm" target="new"><img src="IMAGE/card5.gif" width="255" height="50" border="0"></a></div>
</td>
</tr>
</table>
<table width="100%" border="0" cellspacing="0" cellpadding="0">
<tr>
<td>
<div align="left"><img src="IMAGE/bb4.gif" width="150" height="20"></div>
</td>
</tr>
<tr>
<td height="113">
<table width="100%" border="1" cellspacing="0" cellpadding="0" bordercolor="#8DCFF4" height="26">
<tr>
<td height="117">
<table width="100%" border="0" cellspacing="5">
<tr>
<td width="32%" valign="top" height="88">
<p><font size="2">书名： 《口红》<br>
出版社：江苏文艺出版社<br>
作者：池莉 小涢<br>
版式：32开<br>
装帧：平装<br>
定价：19.80元<br>
出版日期:2000.7 </font></p>
</td>
<td width="18%" valign="top" height="88" align="center"><a href="1.htm" target="new"><img src="IMAGE/tbtj1%20.GIF" width="80" height="115" border="0"></a></td>
<td width="34%" valign="top" height="88">
<p><font size="2">书名：《求人36计》<br>
出版社：企业管理出版社出版<br>
作者：功仁<br>
版式：32开<br>
装帧：平装<br>
定价：21.80元<br>
出版日期:2000.2</font> </p>
</td>
<td colspan="3" height="88" width="16%"><a href="2.htm" target="new"><img src="IMAGE/tbtj2%20.GIF" width="80" height="118" border="0"></a></td>
</tr>
</table>
</td>
</tr>
</table>
</td>
</tr>
<tr>
<td>
<div align="left"><a href="index5.asp"><img src="IMAGE/bb5.gif" width="100" height="20" border="0"></a></div>
</td>
</tr>
</table>
<table width="100%" border="0" cellspacing="0" cellpadding="0">
<tr>
<td>
⌨️ 快捷键说明
复制代码Ctrl + C
搜索代码Ctrl + F
全屏模式F11
增大字号Ctrl + =
减小字号Ctrl + -
显示快捷键?