源代码网上书店的设计实现

《源代码网上书店的设计实现》由会员上传分享，免费在线阅读，更多相关内容在教育资源-天天文库。

1、1.Check.ASP<%@LANGUAGE="VBSCRIPT"%><%ProductList=Session("ProductList")Products=Split(Request("cpbm"),",")Fori=0ToUBound(Products)PutToShopBagProducts(i),ProductListNextSession("ProductList")=ProductListHead="以下是您所选购的物品清单"'P

2、roductList=Session("ProductList")IfLen(ProductList)=0ThenResponse.Redirect"Nothing.asp"response.endendif'IfRequest("MySelf")="Yes"Then'ProductList=""'Products=Split(Request("cpbm"),",")'ForI=0ToUBound(Products)'PutToShopBagProducts(I),ProductList'Next'Session("ProductList")=ProductLi

3、st'EndIf'IfLen(ProductList)=0Then'Response.Redirect"Nothing.asp"'response.end'endifsetrs=server.createobject("adodb.recordset")sql="Select*FromProduct"sql=sql&"WhereProduct_IdIn("&ProductList&")"rs.opensql,conn,3,3%>

4、=gb2312">.main{FONT-SIZE:9pt}.main1{FONT-SIZE:14px}//函数名：fucCheckNUM//功能介绍：检查是否为数字//参数说明：要检查的数字//返回值：1为是数字，0为不是数字functionfucCheckNUM(NUM){vari,j,strTemp;strTemp="0123456789";if(NUM.length==0)re

5、turn0for(i=0;i}