|
| Dear Ravi:
You have no ideas what your help means to me. I was adding
Set Orderform = Server.CreateObject("Commerce.Â_Dictionary")
Orderform.[shopper_type] = "1"
in my basket page but no response. I found out if I add the same code in my
payment page then it works but for me its too late. What I need to do is to
manipulate the prices in the basket page and not the payment. I am using ASP
for this site.
Is there anyway to add something to OrderForm in the basket and if no what
other way you can imagine to get a variable to this scriptor:
'The following entry points are available (shown in VBScript format):
function MSCSExecute(config, orderform, context, flags)
if Orderform.[shopper_type] = "1" then
for each item in orderform.items
item.[_product_list_price] = item.[_product_list_price] * .75
next
else
if Orderform.[shopper_type] = "2" then
for each item in orderform.items
item.[_product_list_price] = item.[_product_list_price] * .5
next
else
for each item in orderform.items
item.[_product_list_price] = item.[_product_list_price]
next
end if
end if
MSCSExecute = 1
end function
sub MSCSOpen(config)
end sub
sub MSCSClose()
end sub
This is palaced in my plan pipeline on top of the OrderCheck stage.
In my basket I have access to this but I dont know how to change my code to
use mscsOrderForm:
<%
REM Run the basic plan
Set mscsOrderForm = UtilRunPlan()
Set orderFormItems = mscsOrderForm.Items
nOrderFormItems = orderFormItems.Count
Set mscsBasketErrors = mscsOrderForm.[_Basket_Errors]
nBasketErrors = mscsBasketErrors.Count
%>
Thanks Again
Bobby
|
|