在本地测试可以，上传至服务器不行，ASP购物车代码

[zjx1302]

<%
'获取购物车的产品数量
dim Product_Num,Producttemp
Session.Timeout = 30
Product_Num=0
if session("Product_Num")="" then
	session("Product_Num")=0
else
	Product_Num=session("Product_Num")
end if


'*****************程序执行到下面这条块时没有执行下去，页面没有提示任何的错误，在本地测试可以，上传至服务器不行，不知道为什么？************
'添加产品至购物车中
if request.querystring("proid")<>"" then
	'判断该产品是否已经添加至购物车中
	for i=0 to Product_Num
		if session("ProductID_"&i)=clng(request.querystring("Proid")) then
			Producttemp=1 
			exit for
		end if
	next
	if producttemp<>1 then '如果是新的产品则添加至购物车中
		session("Product_Num")=clng(Product_Num+1)
		session("ProductID_"&session("Product_Num"))=clng(request.querystring("Proid"))
		session("Quantity_"&session("Product_Num"))=1
		session("size_"&session("Product_Num"))=""
	end if 
end if


'删除购物车中指定的产品
if request.querystring("action")="del" then
	for i=0 to Product_Num
		if session("ProductID_"&i)=clng(request.querystring("Proid")) then
			session("ProductID_"&i)=""
			session("Quantity_"&i)=""
			session("size_"&i)=""	
		end if
	next
end if

'删除购物车中所有的产品
if request.querystring("action")="DelAll" then
	for i=0 to Product_Num
		session("ProductID_"&i)=""
		session("Quantity_"&i)=""
		session("size_"&i)=""	
	next
	Session.Abandon() '清除所有的会话信息
end if


%>

网站地址：butshopping.com
页面为右上角的checkout按钮进入shoppingcart.asp页面


请搞手们帮忙看看是什么原因，为什么本地可以，上传至服务器页面就打不开，也不提示错误只是空白的一片。

[不耐烦]

不执行....

request.querystring("proid") 看看有没有值 符合不符合要求...

[toury]

有内容啊，选的货物显示出来了

[qifuyong]

(1).不显示错误可以用response.write 调试输出变量看request.querystring("proid")结果怎么样..
(2).总感觉把request.querystring("proid") 改成request("proid") 更加符合VBScript 些..
仅供参考...

[xiaojielanbaihe]

没看出来有什么问题