一个购物车的传值问题
各位：
本人在赶个手机网站(asp)，含购物车，手机表中定有“定价(price1)”，“会员价(price2)”，还有该型号手机的不同的颜色价：ColorPri1,ColorPri2...ColorPri6,等字段，除了购买手机之外，还可以购买手机配件，手机配件含“定价(price1)”，“会员价(price2)”。手机与配件同表。现问题是会员登陆后选中某款手机后，如若用户想买该款的其他颜色机，此时就要传该颜色价（若ColorPri1),点“购买”后，可以传该值到购物车首页，该页中传值为此 ：
ColorPri=trim(request.Form( "ColorPri "))
session( "ColorPri ")=ColorPri ----取颜色价
........
if session( "ColorPri ")=trim(rsCheck( "ColorPri1 ")) then '赋给不同价
strprice2 = trim(rsCheck( "ColorPri1 "))
elseif session( "ColorPri ")=trim(rsCheck( "ColorPri2 ")) then
strprice2 = trim(rsCheck( "ColorPri2 "))
elseif session( "ColorPri ")=trim(rsCheck( "ColorPri3 ")) then
strprice2 = trim(rsCheck( "ColorPri3 "))
elseif session( "ColorPri ")=trim(rsCheck( "ColorPri4 ")) then
strprice2 = trim(rsCheck( "ColorPri4 "))
elseif session( "ColorPri ")=trim(rsCheck( "ColorPri5 ")) then
strprice2 = trim(rsCheck( "ColorPri5 "))
elseif session( "ColorPri ")=trim(rsCheck( "ColorPri6 ")) then
strprice2 = trim(rsCheck( "ColorPri6 "))
elseif session( "customer ") <> " " then
strprice2 = Round(rsCheck( "Price2 "),2)
elseif session( "customer ")= " " then
strprice2 = Round(rsCheck( "Price1 "),2)
end if
'---------strpric2为购物车页面的定价字段，Price2为会员价，Price1为定价，Session( "customer ")记录会员名
第二步：再点击：到“收银台”
该页面中获取不同价也加此 判断：
if session( "price ")=Round(rsCheck( "ColorPri1 "),2) then '赋给不同价
strprice2 = Round(rsCheck( "ColorPri1 "),2)
elseif session( "price ")=trim(rsCheck( "ColorPri2 ")) then
strprice2 = trim(rsCheck( "ColorPri2 "))
elseif session( "price ")=trim(rsCheck( "ColorPri3 ")) then
strprice2 = trim(rsCheck( "ColorPri3 "))
elseif session( "price ")=trim(rsCheck( "ColorPri4 ")) then
strprice2 = trim(rsCheck( "ColorPri4 "))
elseif session( "price ")=trim(rsCheck( "ColorPri5 ")) then
strprice2 = trim(rsCheck( "ColorPri5 "))
elseif session( "price ")=trim(rsCheck( "ColorPri6 ")) then
strprice2 = trim(rsCheck( "ColorPri6 "))
elseif session( "customer ") <> " " then
strprice2 = Round(rsCheck( "Price2 "),2)
elseif session( "customer ")= " " then
strprice2 = Round(rsCheck( "Price1 "),2)
end if
此时该“收银台”页面读不了颜色价，显示为读取会员价。请问问题出在哪里，该怎么调整程序呢？
[解决办法]
你首先应该用FOR循环的形式重新写一下上边的判断.否则代码看起来会吓到人
很有可能数据库中没有找到匹配的记录.你先优化一下代码吧~~
for i=1 to 6
if session( "price ")=trim(rsCheck( "ColorPri "&i)) then strprice2 = trim(rsCheck( "ColorPri6 "&i))
next
[解决办法]
用Session来记录？
需要么？确定需要么？
把你的Elseif改写改写吧，看的人累
