⭐ 欢迎来到虫虫下载站! | 📦 资源下载 📁 资源专辑 ℹ️ 关于我们
⭐ 虫虫下载站

📄 readbook.asp

📁 《网上图书订购系统》 1.后台数据库:SQL Server 2000 2.在IIS服务器中新建站点
💻 ASP
字号:
<!--#include file="conn/conn.asp"-->
<script language="javascript">
 function newwin(url){
	 window.location.href=url;
	 }
</script>
<%
BookID=trim(request.QueryString("BookID"))
if BookID="" then
  response.write "<center>请选择一个图书"
  response.write "<input type=button onclick='window.close()' value='关 闭'></center>"
else
  set rs=server.CreateObject("adodb.recordset")
  strsql="select * from tb_bookinfo where barcode='"&BookID&"'"
  rs.open strsql,conn,3,3
  if rs.eof then
       response.write "<center>没有该图书信息"
       response.write "<input type=button onclick='window.close()' value='关 闭'></center>"
  else
       sql="select * from tb_fixprice where Barcode='"&BookId&"'"
	   set rs1=server.CreateObject("adodb.recordset")
	   rs1.open sql,conn,3,3
%>
<html>
<head>
<link rel="stylesheet" href="css/style.css" type="text/css">
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title>图书详细信息</title>
</head>
<body> 
<table width="100%" border="0" align="center" cellpadding="0" cellspacing="0"> 
  <tr> 
    <td height="30" style="filter:progid:DXImageTransform.Microsoft.Gradient(startColorStr='#FFCC00', endColorStr='#FFFFFF', gradientType='1')">&nbsp;</td> 
  </tr> 
  <tr> 
    <td> <table width="99%" border="0" align="center" cellpadding="1" cellspacing="1" bgcolor="#9999FF"> 
        <tr> 
          <td rowspan="4" align="center" valign="middle" bgcolor="#FFFFFF" width="15%"> <%If not isnull(rs("cover")) Then%> 
            <img src="showImg.asp?barcode=<%=rs("barcode")%>" width="70" height="99" border="1"> 
            <%Else%> 
            <img src="Images/null.jpg" width="70" height="99" border="0"> 
            <%End If%> </td> 
          <td height="27" colspan="3" align="left" bgcolor="#FFFFFF" class="word">图书名称: <b><%=rs("bookname")%></b></td> 
        </tr> 
        <tr> 
          <td width="37%" height="27" bgcolor="#FFFFFF">条形码:<%=rs("barcode")%></td> 
          <td width="48%" height="27" bgcolor="#FFFFFF">作者:<%=rs("author")%></td> 
        </tr> 
        <tr> 
          <td height="27" colspan="2" bgcolor="#FFFFFF">出版社:<%=rs("bookconcern")%></td> 
        </tr> 
        <tr> 
          <td height="27" bgcolor="#FFFFFF">定价:<font style="text-decoration:line-through;" color="#FF3300"><%=rs("price")%></font>(元)</td> 
          <%
		If rs1.eof or rs1.bof Then
			sellPrice=rs("price")
		 Else
			sellPrice=rs1("SellPrice")
		 End If%> 
          <td width="48%" height="27" bgcolor="#FFFFFF">现价:<%=SellPrice %>(元)</td> 
        </tr> 
        <tr align="left" valign="top"> 
          <td height="105" align="center" valign="middle" bgcolor="#FFFFFF"> 图书简介:</td> 
          <td colspan="2" bgcolor="#FFFFFF" style="padding:10px"><%=rs("memo")%></td> 
        </tr> 
      </table> 
      <br> </td> 
  </tr> 
  <tr> 
    <td height="30" style="filter:progid:DXImageTransform.Microsoft.Gradient(startColorStr='#FFFFFF', endColorStr='#FFCC00', gradientType='1')"><div align="center"> <span class="word"> 
        <input type="button" name="b1" value="放入购物车" onClick="return newwin('buycar_add.asp?bookID=<%=rs("barcode")%>');"style="border:1px solid;border-color:#330099;background-color:#CCCC33"> 
        </span> 
        <input type="button" value="关闭窗口" onClick="window.close();" style="border:1px solid;border-color:#330099;background-color:#CCCC33"> 
      </div></td> 
  </tr> 
</table> 
<%
  end if
  rs.close
  set rs=nothing
  rs1.close
  set rs1=nothing
  conn.close
  set conn=nothing
end if
%> 
</body>
</html>

⌨️ 快捷键说明

复制代码 Ctrl + C
搜索代码 Ctrl + F
全屏模式 F11
切换主题 Ctrl + Shift + D
显示快捷键 ?
增大字号 Ctrl + =
减小字号 Ctrl + -