我现在把shop/shoppingcart.asp文件中的  Sub addBundleSale    购物车页添加捆绑 这个子程序中的


I f ProID不等于0 a0n0d  pid<>0 a0n0d ProductList不等于空  then 这句话去掉 ProductList不等于空


就可以了，但不知会不会有其它影响

记号，一会看一下。。。。。。

经测试，8.03 解决方法应该是这样才对：

请打开shop/shoppingcart.asp找到259行

   If ProID=0 Then  Proid=Conn.Execute("Select top 1 ProID From KS_ShopBundleSale Where ProID in(" & Session("ProductList") & ")")(0)  '如果没有传商品ID过来,随机找一条有捆绑销售的产品


将其改为如下代码即可
  
     If ProID=0 Then  Proid=Conn.Execute("Select top 1 ProID From KS_ShopBundleSale Where ProID in(select proid from ks_shoppingcart where username='" & GetUserID &"')")(0)  '如果没有传商品ID过来,随机找一条有捆绑销售的产品
     RS.Open "Select I.Tid,I.Fname,I.ID,I.Title,I.Price,I.PhotoUrl,B.KBPrice,B.Proid From KS_Product I Inner Join KS_ShopBundleSale b on i.id=b.kbproid Where B.proid=" & proid,conn,1,1

若不是这样，会有新的报错。

（仅本人测试结果，不代表所有人测试结果，请自行测试验正）