帮我解释一下asp购物车代码，谢谢拉！！！

<%
strCpbm = Request("cpbm")
if ((len(trim(strCpbm)) = 0) or (strCpbm = "undefined")) then
strCheck = "no"
end if

ProductList = Session("ProductList")
Products = Split(Request("cpbm"), ", ")
For I=0 To UBound(Products)
PutToShopBag Products(I), ProductList
Next
Session("ProductList") = ProductList

Head="以下是您所选购的物品清单"
ProductList = Session("ProductList")
If Len(ProductList) =0 Then
Response.Redirect "nothing.asp"
response.end
end if

If Request("MySelf") = "Yes" Then
ProductList = ""
Products = Split(Request("cpbm"), ", ")
For I=0 To UBound(Products)
PutToShopBag Products(I), ProductList
Next
Session("ProductList") = ProductList
End If
If Len(ProductList) = 0

帮我解释一下asp购物车代码，谢谢拉！！！ 帮我解释一下ASP代码 能帮我解释一下这段ASP代码嘛?谢谢! 帮我解释一下这段ASP代码,急急!!!!!! 帮我解释一下这两个asp代码的作用！ 请帮我解释一下asp代码分别各部分的作用！ 高分悬赏，帮我逐行解释一下ASP代码 谁能进来帮我解释一下这段ASP代码. 谁能帮我解释一下asp代码 ASP代码 哪为高手帮我解释一下这段代码