📄 11618821989907_3.html
字号:
<li id="legv2-16"><a href="javascript:if(confirm('http://tech.ddvip.com/program/other/index.html \n\n该文件无法用 Teleport Pro 下载, 因为 它是一个域或路径外部被设置为它的启始地址的地址。 \n\n你想在服务器上打开它?'))window.location='http://tech.ddvip.com/program/other/index.html'" tppabs="http://tech.ddvip.com/program/other/index.html">其它</a></li> </ul> </div> </div> <div id="tech_content_tl" class="tlad"></div><!-- 内容部分 --><div class="content"> <div class="location"> <a href="javascript:if(confirm('http://www.ddvip.com/ \n\n该文件无法用 Teleport Pro 下载, 因为 它是一个域或路径外部被设置为它的启始地址的地址。 \n\n你想在服务器上打开它?'))window.location='http://www.ddvip.com/'" tppabs="http://www.ddvip.com/" target="_balnk">豆豆网</a> > <a href="javascript:if(confirm('http://tech.ddvip.com/index.html \n\n该文件无法用 Teleport Pro 下载, 因为 它是一个域或路径外部被设置为它的启始地址的地址。 \n\n你想在服务器上打开它?'))window.location='http://tech.ddvip.com/index.html'" tppabs="http://tech.ddvip.com/index.html">技术应用</a> > <a href="javascript:if(confirm('http://tech.ddvip.com/program/index.html \n\n该文件无法用 Teleport Pro 下载, 因为 它是一个域或路径外部被设置为它的启始地址的地址。 \n\n你想在服务器上打开它?'))window.location='http://tech.ddvip.com/program/index.html'" tppabs="http://tech.ddvip.com/program/index.html">程序设计</a> > <a href="javascript:if(confirm('http://tech.ddvip.com/web/asp/index.html \n\n该文件无法用 Teleport Pro 下载, 因为 它是一个域或路径外部被设置为它的启始地址的地址。 \n\n你想在服务器上打开它?'))window.location='http://tech.ddvip.com/web/asp/index.html'" tppabs="http://tech.ddvip.com/web/asp/index.html">asp</a> > 正文 </div> <div class="content_left"> <div class="article"> <div class="article_title"> <h1>ASP入门基础教程-实例 网上图书管理系统</h1> <div class="title_bottom"><script language="javascript" src="../a_dir_d/title_bottom.js" tppabs="http://tech.ddvip.com/a_dir_d/title_bottom.js"></script></div> <p><a href="javascript:if(confirm('http://tech.ddvip.com/ \n\n该文件无法用 Teleport Pro 下载, 因为 它是一个域或路径外部被设置为它的启始地址的地址。 \n\n你想在服务器上打开它?'))window.location='http://tech.ddvip.com/'" tppabs="http://tech.ddvip.com/">http://tech.ddvip.com</a> 2006年10月27日 <a href="javascript:if(confirm('http://bbs.ddvip.com/ \n\n该文件无法用 Teleport Pro 下载, 因为 它是一个域或路径外部被设置为它的启始地址的地址。 \n\n你想在服务器上打开它?'))window.location='http://bbs.ddvip.com/'" tppabs="http://bbs.ddvip.com/">社区交流</a></p> </div> <div class="article_content"> <div class="title_bottom_cpr"><script src="../a_dir_d/ad_title_bottom.js" tppabs="http://tech.ddvip.com/a_dir_d/ad_title_bottom.js"></script></div> <!--ID="929"--><div class="searchhot">关键字：<a href="javascript:if(confirm('http://tech.ddvip.com/search.php?key=ASP技巧 \n\n该文件无法用 Teleport Pro 下载, 因为 它是一个域或路径外部被设置为它的启始地址的地址。 \n\n你想在服务器上打开它?'))window.location='http://tech.ddvip.com/search.php?key=ASP技巧'" tppabs="http://tech.ddvip.com/search.php?key=ASP技巧" target="_blank">ASP技巧</a> <a href="javascript:if(confirm('http://tech.ddvip.com/search.php?key=ASP脚本 \n\n该文件无法用 Teleport Pro 下载, 因为 它是一个域或路径外部被设置为它的启始地址的地址。 \n\n你想在服务器上打开它?'))window.location='http://tech.ddvip.com/search.php?key=ASP脚本'" tppabs="http://tech.ddvip.com/search.php?key=ASP脚本" target="_blank">ASP脚本</a> <a href="javascript:if(confirm('http://tech.ddvip.com/search.php?key=Server \n\n该文件无法用 Teleport Pro 下载, 因为 它是一个域或路径外部被设置为它的启始地址的地址。 \n\n你想在服务器上打开它?'))window.location='http://tech.ddvip.com/search.php?key=Server'" tppabs="http://tech.ddvip.com/search.php?key=Server" target="_blank">Server</a> <a href="javascript:if(confirm('http://tech.ddvip.com/search.php?key=ODBC \n\n该文件无法用 Teleport Pro 下载, 因为 它是一个域或路径外部被设置为它的启始地址的地址。 \n\n你想在服务器上打开它?'))window.location='http://tech.ddvip.com/search.php?key=ODBC'" tppabs="http://tech.ddvip.com/search.php?key=ODBC" target="_blank">ODBC</a> <a href="javascript:if(confirm('http://tech.ddvip.com/search.php?key=ASP连接数据库 \n\n该文件无法用 Teleport Pro 下载, 因为 它是一个域或路径外部被设置为它的启始地址的地址。 \n\n你想在服务器上打开它?'))window.location='http://tech.ddvip.com/search.php?key=ASP连接数据库'" tppabs="http://tech.ddvip.com/search.php?key=ASP连接数据库" target="_blank">ASP连接数据库</a> <a href="javascript:if(confirm('http://tech.ddvip.com/search.php?key=ASP入门 \n\n该文件无法用 Teleport Pro 下载, 因为 它是一个域或路径外部被设置为它的启始地址的地址。 \n\n你想在服务器上打开它?'))window.location='http://tech.ddvip.com/search.php?key=ASP入门'" tppabs="http://tech.ddvip.com/search.php?key=ASP入门" target="_blank">ASP入门</a> </div> <div class="article_z"><h2> 本文详细介绍ASP入门基础教程-实例 网上图书管理系统 </h2> </div> <div class="article_ad"><script language="javascript" src="../a_dir_d/ads_250x250.js" tppabs="http://tech.ddvip.com/a_dir_d/ads_250x250.js"></script></div> <div id='clickeye_content'> <div class="article_c" id="fontsize"> <p> 本页面是一个程序处理页。其主要功能有：</p><p> 1、通过 Session("BookIDList") 变量在打开网页时清空 BookIDList 中的值，因为刚打开网页 Session("BookIDList") 为空；</p><p> 2、将由Request对象获得的“图书ID”存入变量 BookIDList 中；</p><p> 3、将变量 BookIDList 中的值赋给 Session 对象中的 BookIDList变量，以便在"buycar_see.asp"页面中使用；</p><p> 4、将页面'转到"查看购物车"页面 "buycar_see.asp"。</p><p> 注：InStr 函数返回的是一个位置值，此位置是一个搜索字符串在另一个被搜索字符串中的出现的位置。其格式如下：</p><code>InStr([IngStartPos] , strString1 , strString2 [, compare])</code><p> 参数：IngStartPos ：从strString1 中开始对 strString2 进行搜索的位置；</p><p> strString1 ：字符串，在这个字符串中搜索 strString2 ；</p><p> strString2 ：所需搜索的字符串；</p><p> Compare ：一个数值数据，用来指定所采用的搜索比较方式；如果此参数被忽略，则缺省值为0（即vbBinaryCompare),招待的是二进制比较。</p><code><%@ language="VBScript"%><br /><%<br />BookIDList = Session("BookIDList") '此句的功能是打开网页时清空 BookIDList 中的值。<br />If Len(BookIDList) = 0 Then '如果第一次提交购物车中的图书，<br />BookIDList = "'" & request("bookID") & "'"<br />'则将由Request对象获得的“图书ID”存入变量 BookIDList 中。<br />ElseIf InStr( BookIDList, request("bookID")) <= 0 Then<br />'如果不是第一次提交购物车的图书，而且，当前提交的图书在这之前没有提交过，<br />BookIDList = BookIDList & ", '" & request("bookID") & "'"<br />'则将本次提交的”图书ID“存入变量 BookIDList 的尾部，并用逗号与前面的值分开。<br />End If<br />Session("BookIDList") = BookIDList<br />'将变量 BookIDList 中的值赋给 Session 对象中的 BookIDList变量。<br />Response.Redirect "buycar_see.asp" '转到查看购物车页面<br />'InStr 函数返回的是一个位置值，此位置是一个搜索字符串在另一个被搜索字符串中的出现的位置。<br />%><br />Buycar_see.asp 查看购物车。 本页面以表格的形式将您所选图书显示出来，在此可以由您修改所购图书的数量，然后自动计算金额和合计总金额。并通过四个超连接，分别连接到登录收银台页面（Checkout.asp）、主页面（index.asp)、从购物车中移去所选图书页面（move.asp)和清空购物车页面（Clear.asp)。<br />注： 函数:返回表达式，此表达式已被转换为 Double 子类型的 Variant。<br /><!-- #include file="connections/conn.asp" --><br /><!--如果点击了“到收银台结帐”按钮，则转向“checkout.asp”页面。--><br /><% if request.Form("jiezhang")="到收银台结账" then<br />response.Redirect("checkout.asp")<br />end if<br />If Len(session("BookIDList")) <> 0 Then<br />'如果 session("BookIDList") 的长度不为零，即其不为空，则执行下面的SQL语句。<br />sql = "Select * From DB_bookinfo Where BookID In (" &_<br />session("bookIDList") & ") Order By BookID"<br />'从 DB_bookinfo 表中查询”图书ID“与在session("bookIDList")变量保存的值中相匹配的记录，并以”图书ID“排序<br />Set rs = conn.Execute( sql )<br />'执行上面的 SQL 语句，并返回一个记录集。<br />else<br />'如果session("BookIDList") 的长度不为零，即其不为空，则跳转到 ”buycar_empty.asp"页面。<br />Response.Redirect "buycar_empty.asp"<br />end if<br />%><br /><!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN"><br /><html><br /><head><br /><meta http-equiv="Content-Type" content="text/html; charset=gb2312"><br /><title>查看购物车</title><br /><link href="style.css" rel="stylesheet"><br /><script language="JavaScript"><br />//自定义一个名为 stand()自定义函数。<br />function stand(){<br />//当点击了“"继续选择图书"按时，跳转到index.asp页面。<br />window.location.href="./index.asp";}<br /></script><br /><style type="text/css"><br /><!--<br />.style3 {color: #ECF5FF}<br />--><br /></style><br /></head><br /><body leftmargin="0" topmargin="10" background="images/bg1.jpg"><br /><center><br /><table width="640" height="134" border="0" cellpadding="-1" cellspacing="-1"><br /><tr><br /><td background="images/bg.jpg"><img src="images/buycar_top.gif" width="640" height="130"></td><br /></tr><br /></table><br /><table width="640" height="306" border="0" cellpadding="-1" cellspacing="-1"><br /><tr><br /><td valign="top" background="images/bg.jpg"><br /><div align="center"><br /><form name="form1" method="post" action="buycar_see.asp"><br /><table width="97%" height="52" border="1" align="center" cellpadding="0"<br />cellspacing="0" bordercolordark="#0099FF" bordercolorlight="#FFFFFF"<br />bordercolor="#FFFFFF"><br /><!--在内层表格的第一第显示出记录集中所选字段名。--><br /><tr><br /><td width="14%" height="16"><div align="center">书号</div></td><br /><td width="41%"><div align="center">书名</div></td><br /><td width="15%"><div align="center">单价</div></td><br /><td width="9%"><div align="center">数量</div></td><br /><td width="14%"><div align="center">金额</div></td><br /><td width="7%"><div align="center">移去</div></td><br /></tr><br /><% i=0<br />sum=0<br />session("sl")=""<br />session("checkBook")=""<br />%><br /><!--使用while 的循环语句，将购物车中的图书记录一一列出来。--><br /><% while not rs.eof%><br /><tr><br /><td height="16">&nbsp;<%=rs("BookID")%></td><br /><td>&nbsp;<%=rs("BookName")%></td><br /><% i=i+1 %><br /><% sl = CInt(Request( "sl"&i)) 's1 用来存储所选图书数量。”s1“ & i 表示“数量”输入框名。<br />If sl <= 0 Then sl = 1 '当跳转到此页面，将数量值赋1.<br />Sum = Sum + CDbl(rs("Price")) * sl '计算总金额<br />%><br /><td><div align="center"><br /><!--此单元格显示单价值--><br /><input name=<%= "price"&i%> type="text" class="Sytle_auto"<br />id="price" value=<%=rs("price")%><br />size="6" readonly="yes"><br />(元)</div></td><br /><td><div align="center"><br /><!--此单元格显示数量--><br /><input name=<%= "sl"&i%> type="text" class="Sytle_auto_s" id="sl"<br />onChange="JScript:form1.submit();" value=<%= sl%> size="4"><br /><!--当改变输入框的内容时，则form1的提交按钮将进行提交。--><br /></div></td><br /><td><div align="center"><br /><!--此单元格显示金额--><br /><input name=<%= "je"&i%> type="text" class="Sytle_auto"<br />id="je" value=<%=rs("price")*sl%> size="6" readonly="yes"><br />(元)</div></td><br /><!--此单元格在图片上做一个超连接，将页面转到move.asp指定参数的页面。--><br /><td><div align="center"><a href="move.asp?clickBookID=<%=rs("BookID")%>"><br /><img src="images/move.gif" width="18" height="17" border="0"></a></div></td><br /></tr><br /><%<br />if len(session("sl"))=0 then '如果只提交一种图书，则将该图书的数量赋给变量session("s1")<br />session("sl")=sl<br />else<br />session("sl")=session("sl")&", "&sl '如果提交了两种或两种以上的图书。则将各种图书的数量赋给变量session("s1")<br />end if<br />if len(session("checkBook"))=0 then '如果只提交一种图书，则将该图书ID赋给变量session("checkBook")<br />session("checkBook")="'"& rs("BookID")& "'"<br />else '如果提交了两种或两种以上的图书。则将各种图书ID赋给变量session("checkBook")<br />session("checkBook")=session("CheckBook")&", '"& rs("BookID")& "'"<br />end if<br />rs.movenext '移动到下一条记录。<br />wend %><br /></table><br /><table width="97%" height="40" border="0" cellpadding="-1"<br />cellspacing="-1" class="Sytle_auto"><br /><tr><br /><td><div align="right">合计金额：<br /><!--此单元格用来合计金额，只读输入框--><br /><input name="sum" type="text" class="Sytle_auto" id="sum2"<br />value=<%= sum %> size="10" readonly="yes"><br />（元）</div></td><br /></tr><br /></table><br /><table width="97%" height="39" border="0" cellpadding="-1" cellspacing="-1"><br /><tr><br /><td width="79%"><div align="center"><br /><input type="submit" name="jiezhang" value="到收银台结账"> <!--当点击此提交按钮时，转到checkout.asp页面。--><br /><input type="button" name="goon" value="继续选择图书" onClick="stand()"><br /><!--当单击此按钮时，调用stand()函数。转向index.asp页面--><br /><a href="clear.asp"> &nbsp;</a></div></td><br /><td width="5%"><div align="center"><a href="clear.asp"> <!--当点击此提交按钮时，转到buycar_see.asp页面。--><br /><img src="images/emptybuycar.gif" width="20" height="20" border="0"></a></div></td><br /><td width="16%"><a href="clear.asp">清空购物车 </a></td><br /></tr><br /></table><br /></form><br /></div></td><br /></tr><br /></table><br /></center><br /></body><br /></html></code><p> Move.asp 从购物车中移去所选图书。 本页面是从购物车中移去您不想要的图书。它的主要功能有：</p> </div> </div> <!-- 分页 --> <div class="page"><a href="11618821989907_2.html" tppabs="http://tech.ddvip.com/2006-10/11618821989907_2.html">上一页</a><a href="11618821989907.html" tppabs="http://tech.ddvip.com/2006-10/11618821989907.html">1</a><a href="11618821989907_2.html" tppabs="http://tech.ddvip.com/2006-10/11618821989907_2.html">2</a><span class="current">3</span><a href="11618821989907_4.html" tppabs="http://tech.ddvip.com/2006-10/11618821989907_4.html">4</a><a href="11618821989907_5.html" tppabs="http://tech.ddvip.com/2006-10/11618821989907_5.html">5</a><a href="11618821989907_6.html" tppabs="http://tech.ddvip.com/2006-10/11618821989907_6.html">6</a><a href="11618821989907_7.html" tppabs="http://tech.ddvip.com/2006-10/11618821989907_7.html">7</a><a href="11618821989907_8.html" tppabs="http://tech.ddvip.com/2006-10/11618821989907_8.html">8</a><a href="11618821989907_9.html" tppabs="http://tech.ddvip.com/2006-10/11618821989907_9.html">9</a><a href="11618821989907_10.html" tppabs="http://tech.ddvip.com/2006-10/11618821989907_10.html">10</a><a href="11618821989907_4.html" tppabs="http://tech.ddvip.com/2006-10/11618821989907_4.html">下一页</a></div> <!-- 分页end --><p style="color:#000000; font-size:12px; text-align:right; padding-right:4px;">作者：含笑 责编：豆豆技术应用</p> <div id="art_content_end_468x60"><script src="../a_dir_d/ads_468x60.js" tppabs="http://tech.ddvip.com/a_dir_d/ads_468x60.js"></script></div> </div> <div class="related"> <div class="relatedtop">与“ASP入门基础教程-实例 网上图书管理系统”相关的文章</div> <ul> <li>暂无相关文章</li> </ul> </div> <div class="clear"></div> <div class="related"> <div class="relatedtop">本栏目更新</div> <ul> <li><a href="javascript:if(confirm('http://tech.ddvip.com/2008-09/122111675163590.html \n\n该文件无法用 Teleport Pro 下载, 因为 它是一个域或路径外部被设置为它的启始地址的地址。 \n\n你想在服务器上打开它?'))window.location='http://tech.ddvip.com/2008-09/122111675163590.html'" tppabs="http://tech.ddvip.com/2008-09/122111675163590.html">实例讲解Access数据库在线压缩的实现方法</a></li>⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -