<%@LANGUAGE="VBSCRIPT" CODEPAGE="1252"%> <% ' WA eCart Clear Cart if (cStr(Request.Form("WA_eCart1_Clear")) <> "" OR cStr(Request.Form("WA_eCart1_Clear.x")) <> "") then set WA_eCart1 = WA_eCart_ClearCart(WA_eCart1) Redirect_redirStr=""'_redirStr if (Redirect_redirStr <> "") then WA_eCart1_redirStr = Redirect_redirStr end if WA_eCart1_cartAction = "ClearCart" end if %> <% ' WA eCart AddToCart if (cStr(Request.Form("WA_eCart1_1_ATC")) <> "" OR cStr(Request.Form("WA_eCart1_1_ATC.x")) <> "") then ATC_itemID = cStr(Request.Form("WA_eCart1_1_ID_Add")) ATC_AddIfIn = 0 ATC_RedirectAfter = "" ATC_RedirectIfIn = "" ATC_itemName = "Basic Membership"' column binding ATC_itemDescription = ""' column binding ATC_itemWeight = cDbl("0")' column binding ATC_itemQuantity = cDbl("1")' column binding ATC_itemPrice = cDbl("110.00")' column binding if (IsNumeric(ATC_itemQuantity) AND ATC_itemQuantity <> 0) then set WA_eCart1 = WA_eCart1_AddToCart(ATC_AddIfIn, ATC_RedirectIfIn, ATC_itemID, ATC_itemName, ATC_itemDescription, ATC_itemWeight, ATC_itemQuantity, ATC_itemPrice) if (ATC_RedirectAfter <> "" AND WA_eCart1_redirStr = "") then WA_eCart1_redirStr = ATC_RedirectAfter end if Session("WAEC_ContinueRedirect") = cStr(Request.ServerVariables("Script_Name")) & "?" & cStr(Request.QueryString()) end if end if %> <% ' WA eCart AddToCart if (cStr(Request.Form("WA_eCart1_4_ATC")) <> "" OR cStr(Request.Form("WA_eCart1_4_ATC.x")) <> "") then ATC_itemID = cStr(Request.Form("WA_eCart1_4_ID_Add")) ATC_AddIfIn = 2 ATC_RedirectAfter = "" ATC_RedirectIfIn = "" ATC_itemName = "JOS Subscription"' column binding ATC_itemDescription = ""' column binding ATC_itemWeight = cDbl("0")' column binding ATC_itemQuantity = cDbl("1")' column binding ATC_itemPrice = cDbl("57.00")' column binding if (IsNumeric(ATC_itemQuantity) AND ATC_itemQuantity <> 0) then set WA_eCart1 = WA_eCart1_AddToCart(ATC_AddIfIn, ATC_RedirectIfIn, ATC_itemID, ATC_itemName, ATC_itemDescription, ATC_itemWeight, ATC_itemQuantity, ATC_itemPrice) if (ATC_RedirectAfter <> "" AND WA_eCart1_redirStr = "") then WA_eCart1_redirStr = ATC_RedirectAfter end if Session("WAEC_ContinueRedirect") = cStr(Request.ServerVariables("Script_Name")) & "?" & cStr(Request.QueryString()) end if end if %> <% ' WA eCart AddToCart if (cStr(Request.Form("WA_eCart1_5_ATC")) <> "" OR cStr(Request.Form("WA_eCart1_5_ATC.x")) <> "") then Session("sChargeShip")="Y" ATC_itemID = cStr(Request.Form("WA_eCart1_5_ID_Add")) ATC_AddIfIn = 0 ATC_RedirectAfter = "" ATC_RedirectIfIn = "" ATC_itemName = "DVD Full Set - Member"' column binding ATC_itemDescription = ""' column binding ATC_itemWeight = cDbl("1")' column binding ATC_itemQuantity = cDbl("1")' column binding ATC_itemPrice = cDbl("225.00")' column binding if (IsNumeric(ATC_itemQuantity) AND ATC_itemQuantity <> 0) then set WA_eCart1 = WA_eCart1_AddToCart(ATC_AddIfIn, ATC_RedirectIfIn, ATC_itemID, ATC_itemName, ATC_itemDescription, ATC_itemWeight, ATC_itemQuantity, ATC_itemPrice) if (ATC_RedirectAfter <> "" AND WA_eCart1_redirStr = "") then WA_eCart1_redirStr = ATC_RedirectAfter end if Session("WAEC_ContinueRedirect") = cStr(Request.ServerVariables("Script_Name")) & "?" & cStr(Request.QueryString()) end if end if %> <% ' WA eCart AddToCart if (cStr(Request.Form("WA_eCart1_6_ATC")) <> "" OR cStr(Request.Form("WA_eCart1_6_ATC.x")) <> "") then Session("sChargeShip")="Y" ATC_itemID = cStr(Request.Form("WA_eCart1_6_ID_Add")) ATC_AddIfIn = 0 ATC_RedirectAfter = "" ATC_RedirectIfIn = "" ATC_itemName = "DVD Full Set Non-Member"' column binding ATC_itemDescription = ""' column binding ATC_itemWeight = cDbl("1")' column binding ATC_itemQuantity = cDbl("1")' column binding ATC_itemPrice = cDbl("375.00")' column binding if (IsNumeric(ATC_itemQuantity) AND ATC_itemQuantity <> 0) then set WA_eCart1 = WA_eCart1_AddToCart(ATC_AddIfIn, ATC_RedirectIfIn, ATC_itemID, ATC_itemName, ATC_itemDescription, ATC_itemWeight, ATC_itemQuantity, ATC_itemPrice) if (ATC_RedirectAfter <> "" AND WA_eCart1_redirStr = "") then WA_eCart1_redirStr = ATC_RedirectAfter end if Session("WAEC_ContinueRedirect") = cStr(Request.ServerVariables("Script_Name")) & "?" & cStr(Request.QueryString()) end if end if %> <% ' WA eCart AddToCart if (cStr(Request.Form("WA_eCart1_7_ATC")) <> "" OR cStr(Request.Form("WA_eCart1_7_ATC.x")) <> "") then Session("sChargeShip")="Y" ATC_itemID = cStr(Request.Form("WA_eCart1_7_ID_Add")) ATC_AddIfIn = 0 ATC_RedirectAfter = "" ATC_RedirectIfIn = "" ATC_itemName = "DVD 2002 - Member"' column binding ATC_itemDescription = ""' column binding ATC_itemWeight = cDbl("1")' column binding ATC_itemQuantity = cDbl("1")' column binding ATC_itemPrice = cDbl("45.00")' column binding if (IsNumeric(ATC_itemQuantity) AND ATC_itemQuantity <> 0) then set WA_eCart1 = WA_eCart1_AddToCart(ATC_AddIfIn, ATC_RedirectIfIn, ATC_itemID, ATC_itemName, ATC_itemDescription, ATC_itemWeight, ATC_itemQuantity, ATC_itemPrice) if (ATC_RedirectAfter <> "" AND WA_eCart1_redirStr = "") then WA_eCart1_redirStr = ATC_RedirectAfter end if Session("WAEC_ContinueRedirect") = cStr(Request.ServerVariables("Script_Name")) & "?" & cStr(Request.QueryString()) end if end if %> <% ' WA eCart AddToCart if (cStr(Request.Form("WA_eCart1_8_ATC")) <> "" OR cStr(Request.Form("WA_eCart1_8_ATC.x")) <> "") then Session("sChargeShip")="Y" ATC_itemID = cStr(Request.Form("WA_eCart1_8_ID_Add")) ATC_AddIfIn = 0 ATC_RedirectAfter = "" ATC_RedirectIfIn = "" ATC_itemName = "DVD 2002 Non-Member"' column binding ATC_itemDescription = ""' column binding ATC_itemWeight = cDbl("1")' column binding ATC_itemQuantity = cDbl("1")' column binding ATC_itemPrice = cDbl("75.00")' column binding if (IsNumeric(ATC_itemQuantity) AND ATC_itemQuantity <> 0) then set WA_eCart1 = WA_eCart1_AddToCart(ATC_AddIfIn, ATC_RedirectIfIn, ATC_itemID, ATC_itemName, ATC_itemDescription, ATC_itemWeight, ATC_itemQuantity, ATC_itemPrice) if (ATC_RedirectAfter <> "" AND WA_eCart1_redirStr = "") then WA_eCart1_redirStr = ATC_RedirectAfter end if Session("WAEC_ContinueRedirect") = cStr(Request.ServerVariables("Script_Name")) & "?" & cStr(Request.QueryString()) end if end if %> <% ' WA eCart AddToCart if (cStr(Request.Form("WA_eCart1_9_ATC")) <> "" OR cStr(Request.Form("WA_eCart1_9_ATC.x")) <> "") then Session("sChargeShip")="Y" ATC_itemID = cStr(Request.Form("WA_eCart1_9_ID_Add")) ATC_AddIfIn = 0 ATC_RedirectAfter = "" ATC_RedirectIfIn = "" ATC_itemName = "DVD 2003 - Member"' column binding ATC_itemDescription = ""' column binding ATC_itemWeight = cDbl("1")' column binding ATC_itemQuantity = cDbl("1")' column binding ATC_itemPrice = cDbl("45.00")' column binding if (IsNumeric(ATC_itemQuantity) AND ATC_itemQuantity <> 0) then set WA_eCart1 = WA_eCart1_AddToCart(ATC_AddIfIn, ATC_RedirectIfIn, ATC_itemID, ATC_itemName, ATC_itemDescription, ATC_itemWeight, ATC_itemQuantity, ATC_itemPrice) if (ATC_RedirectAfter <> "" AND WA_eCart1_redirStr = "") then WA_eCart1_redirStr = ATC_RedirectAfter end if Session("WAEC_ContinueRedirect") = cStr(Request.ServerVariables("Script_Name")) & "?" & cStr(Request.QueryString()) end if end if %> <% ' WA eCart AddToCart if (cStr(Request.Form("WA_eCart1_10_ATC")) <> "" OR cStr(Request.Form("WA_eCart1_10_ATC.x")) <> "") then Session("sChargeShip")="Y" ATC_itemID = cStr(Request.Form("WA_eCart1_10_ID_Add")) ATC_AddIfIn = 0 ATC_RedirectAfter = "" ATC_RedirectIfIn = "" ATC_itemName = "DVD 2003 - Non-member"' column binding ATC_itemDescription = ""' column binding ATC_itemWeight = cDbl("1")' column binding ATC_itemQuantity = cDbl("1")' column binding ATC_itemPrice = cDbl("75.00")' column binding if (IsNumeric(ATC_itemQuantity) AND ATC_itemQuantity <> 0) then set WA_eCart1 = WA_eCart1_AddToCart(ATC_AddIfIn, ATC_RedirectIfIn, ATC_itemID, ATC_itemName, ATC_itemDescription, ATC_itemWeight, ATC_itemQuantity, ATC_itemPrice) if (ATC_RedirectAfter <> "" AND WA_eCart1_redirStr = "") then WA_eCart1_redirStr = ATC_RedirectAfter end if Session("WAEC_ContinueRedirect") = cStr(Request.ServerVariables("Script_Name")) & "?" & cStr(Request.QueryString()) end if end if %> <% ' WA eCart AddToCart if (cStr(Request.Form("WA_eCart1_15_ATC")) <> "" OR cStr(Request.Form("WA_eCart1_15_ATC.x")) <> "") then Session("sChargeShip")="Y" ATC_itemID = cStr(Request.Form("WA_eCart1_15_ID_Add")) ATC_AddIfIn = 0 ATC_RedirectAfter = "" ATC_RedirectIfIn = "" ATC_itemName = "DVD 2007 - Member"' column binding ATC_itemDescription = ""' column binding ATC_itemWeight = cDbl("1")' column binding ATC_itemQuantity = cDbl("1")' column binding ATC_itemPrice = cDbl("45.00")' column binding if (IsNumeric(ATC_itemQuantity) AND ATC_itemQuantity <> 0) then set WA_eCart1 = WA_eCart1_AddToCart(ATC_AddIfIn, ATC_RedirectIfIn, ATC_itemID, ATC_itemName, ATC_itemDescription, ATC_itemWeight, ATC_itemQuantity, ATC_itemPrice) if (ATC_RedirectAfter <> "" AND WA_eCart1_redirStr = "") then WA_eCart1_redirStr = ATC_RedirectAfter end if Session("WAEC_ContinueRedirect") = cStr(Request.ServerVariables("Script_Name")) & "?" & cStr(Request.QueryString()) end if end if %> <% ' WA eCart AddToCart if (cStr(Request.Form("WA_eCart1_16_ATC")) <> "" OR cStr(Request.Form("WA_eCart1_16_ATC.x")) <> "") then Session("sChargeShip")="Y" ATC_itemID = cStr(Request.Form("WA_eCart1_16_ID_Add")) ATC_AddIfIn = 0 ATC_RedirectAfter = "" ATC_RedirectIfIn = "" ATC_itemName = "DVD 2007 - Non-member"' column binding ATC_itemDescription = ""' column binding ATC_itemWeight = cDbl("1")' column binding ATC_itemQuantity = cDbl("1")' column binding ATC_itemPrice = cDbl("75.00")' column binding if (IsNumeric(ATC_itemQuantity) AND ATC_itemQuantity <> 0) then set WA_eCart1 = WA_eCart1_AddToCart(ATC_AddIfIn, ATC_RedirectIfIn, ATC_itemID, ATC_itemName, ATC_itemDescription, ATC_itemWeight, ATC_itemQuantity, ATC_itemPrice) if (ATC_RedirectAfter <> "" AND WA_eCart1_redirStr = "") then WA_eCart1_redirStr = ATC_RedirectAfter end if Session("WAEC_ContinueRedirect") = cStr(Request.ServerVariables("Script_Name")) & "?" & cStr(Request.QueryString()) end if end if %> <% ' WA eCart AddToCart if (cStr(Request.Form("WA_eCart1_17_ATC")) <> "" OR cStr(Request.Form("WA_eCart1_17_ATC.x")) <> "") then Session("sChargeShip")="Y" ATC_itemID = cStr(Request.Form("WA_eCart1_17_ID_Add")) ATC_AddIfIn = 0 ATC_RedirectAfter = "" ATC_RedirectIfIn = "" ATC_itemName = "DVD 2004 - Member"' column binding ATC_itemDescription = ""' column binding ATC_itemWeight = cDbl("1")' column binding ATC_itemQuantity = cDbl("1")' column binding ATC_itemPrice = cDbl("45.00")' column binding if (IsNumeric(ATC_itemQuantity) AND ATC_itemQuantity <> 0) then set WA_eCart1 = WA_eCart1_AddToCart(ATC_AddIfIn, ATC_RedirectIfIn, ATC_itemID, ATC_itemName, ATC_itemDescription, ATC_itemWeight, ATC_itemQuantity, ATC_itemPrice) if (ATC_RedirectAfter <> "" AND WA_eCart1_redirStr = "") then WA_eCart1_redirStr = ATC_RedirectAfter end if Session("WAEC_ContinueRedirect") = cStr(Request.ServerVariables("Script_Name")) & "?" & cStr(Request.QueryString()) end if end if %> <% ' WA eCart AddToCart if (cStr(Request.Form("WA_eCart1_18_ATC")) <> "" OR cStr(Request.Form("WA_eCart1_18_ATC.x")) <> "") then Session("sChargeShip")="Y" ATC_itemID = cStr(Request.Form("WA_eCart1_18_ID_Add")) ATC_AddIfIn = 0 ATC_RedirectAfter = "" ATC_RedirectIfIn = "" ATC_itemName = "VHS 2004 - Member"' column binding ATC_itemDescription = ""' column binding ATC_itemWeight = cDbl("1")' column binding ATC_itemQuantity = cDbl("1")' column binding ATC_itemPrice = cDbl("45.00")' column binding if (IsNumeric(ATC_itemQuantity) AND ATC_itemQuantity <> 0) then set WA_eCart1 = WA_eCart1_AddToCart(ATC_AddIfIn, ATC_RedirectIfIn, ATC_itemID, ATC_itemName, ATC_itemDescription, ATC_itemWeight, ATC_itemQuantity, ATC_itemPrice) if (ATC_RedirectAfter <> "" AND WA_eCart1_redirStr = "") then WA_eCart1_redirStr = ATC_RedirectAfter end if Session("WAEC_ContinueRedirect") = cStr(Request.ServerVariables("Script_Name")) & "?" & cStr(Request.QueryString()) end if end if %> <% ' WA eCart AddToCart if (cStr(Request.Form("WA_eCart1_20_ATC")) <> "" OR cStr(Request.Form("WA_eCart1_20_ATC.x")) <> "") then Session("sChargeShip")="Y" ATC_itemID = cStr(Request.Form("WA_eCart1_20_ID_Add")) ATC_AddIfIn = 0 ATC_RedirectAfter = "" ATC_RedirectIfIn = "" ATC_itemName = "VHS 2004 - Non-Member"' column binding ATC_itemDescription = ""' column binding ATC_itemWeight = cDbl("1")' column binding ATC_itemQuantity = cDbl("1")' column binding ATC_itemPrice = cDbl("75.00")' column binding if (IsNumeric(ATC_itemQuantity) AND ATC_itemQuantity <> 0) then set WA_eCart1 = WA_eCart1_AddToCart(ATC_AddIfIn, ATC_RedirectIfIn, ATC_itemID, ATC_itemName, ATC_itemDescription, ATC_itemWeight, ATC_itemQuantity, ATC_itemPrice) if (ATC_RedirectAfter <> "" AND WA_eCart1_redirStr = "") then WA_eCart1_redirStr = ATC_RedirectAfter end if Session("WAEC_ContinueRedirect") = cStr(Request.ServerVariables("Script_Name")) & "?" & cStr(Request.QueryString()) end if end if %> <% ' WA eCart AddToCart if (cStr(Request.Form("WA_eCart1_21_ATC")) <> "" OR cStr(Request.Form("WA_eCart1_21_ATC.x")) <> "") then Session("sChargeShip")="Y" ATC_itemID = cStr(Request.Form("WA_eCart1_21_ID_Add")) ATC_AddIfIn = 0 ATC_RedirectAfter = "" ATC_RedirectIfIn = "" ATC_itemName = "DVD 2005 - Member"' column binding ATC_itemDescription = ""' column binding ATC_itemWeight = cDbl("1")' column binding ATC_itemQuantity = cDbl("1")' column binding ATC_itemPrice = cDbl("45.00")' column binding if (IsNumeric(ATC_itemQuantity) AND ATC_itemQuantity <> 0) then set WA_eCart1 = WA_eCart1_AddToCart(ATC_AddIfIn, ATC_RedirectIfIn, ATC_itemID, ATC_itemName, ATC_itemDescription, ATC_itemWeight, ATC_itemQuantity, ATC_itemPrice) if (ATC_RedirectAfter <> "" AND WA_eCart1_redirStr = "") then WA_eCart1_redirStr = ATC_RedirectAfter end if Session("WAEC_ContinueRedirect") = cStr(Request.ServerVariables("Script_Name")) & "?" & cStr(Request.QueryString()) end if end if %> <% ' WA eCart AddToCart if (cStr(Request.Form("WA_eCart1_22_ATC")) <> "" OR cStr(Request.Form("WA_eCart1_22_ATC.x")) <> "") then Session("sChargeShip")="Y" ATC_itemID = cStr(Request.Form("WA_eCart1_22_ID_Add")) ATC_AddIfIn = 0 ATC_RedirectAfter = "" ATC_RedirectIfIn = "" ATC_itemName = "VHS 2005 Member"' column binding ATC_itemDescription = ""' column binding ATC_itemWeight = cDbl("1")' column binding ATC_itemQuantity = cDbl("1")' column binding ATC_itemPrice = cDbl("45.00")' column binding if (IsNumeric(ATC_itemQuantity) AND ATC_itemQuantity <> 0) then set WA_eCart1 = WA_eCart1_AddToCart(ATC_AddIfIn, ATC_RedirectIfIn, ATC_itemID, ATC_itemName, ATC_itemDescription, ATC_itemWeight, ATC_itemQuantity, ATC_itemPrice) if (ATC_RedirectAfter <> "" AND WA_eCart1_redirStr = "") then WA_eCart1_redirStr = ATC_RedirectAfter end if Session("WAEC_ContinueRedirect") = cStr(Request.ServerVariables("Script_Name")) & "?" & cStr(Request.QueryString()) end if end if %> <% ' WA eCart AddToCart if (cStr(Request.Form("WA_eCart1_24_ATC")) <> "" OR cStr(Request.Form("WA_eCart1_24_ATC.x")) <> "") then Session("sChargeShip")="Y" ATC_itemID = cStr(Request.Form("WA_eCart1_24_ID_Add")) ATC_AddIfIn = 0 ATC_RedirectAfter = "" ATC_RedirectIfIn = "" ATC_itemName = "VHS 2005 Non-member"' column binding ATC_itemDescription = ""' column binding ATC_itemWeight = cDbl("1")' column binding ATC_itemQuantity = cDbl("1")' column binding ATC_itemPrice = cDbl("75.00")' column binding if (IsNumeric(ATC_itemQuantity) AND ATC_itemQuantity <> 0) then set WA_eCart1 = WA_eCart1_AddToCart(ATC_AddIfIn, ATC_RedirectIfIn, ATC_itemID, ATC_itemName, ATC_itemDescription, ATC_itemWeight, ATC_itemQuantity, ATC_itemPrice) if (ATC_RedirectAfter <> "" AND WA_eCart1_redirStr = "") then WA_eCart1_redirStr = ATC_RedirectAfter end if Session("WAEC_ContinueRedirect") = cStr(Request.ServerVariables("Script_Name")) & "?" & cStr(Request.QueryString()) end if end if %> <% ' WA eCart AddToCart if (cStr(Request.Form("WA_eCart1_25_ATC")) <> "" OR cStr(Request.Form("WA_eCart1_25_ATC.x")) <> "") then Session("sChargeShip")="Y" ATC_itemID = cStr(Request.Form("WA_eCart1_25_ID_Add")) ATC_AddIfIn = 0 ATC_RedirectAfter = "" ATC_RedirectIfIn = "" ATC_itemName = "DVD 2006 - Member"' column binding ATC_itemDescription = ""' column binding ATC_itemWeight = cDbl("1")' column binding ATC_itemQuantity = cDbl("1")' column binding ATC_itemPrice = cDbl("45.00")' column binding if (IsNumeric(ATC_itemQuantity) AND ATC_itemQuantity <> 0) then set WA_eCart1 = WA_eCart1_AddToCart(ATC_AddIfIn, ATC_RedirectIfIn, ATC_itemID, ATC_itemName, ATC_itemDescription, ATC_itemWeight, ATC_itemQuantity, ATC_itemPrice) if (ATC_RedirectAfter <> "" AND WA_eCart1_redirStr = "") then WA_eCart1_redirStr = ATC_RedirectAfter end if Session("WAEC_ContinueRedirect") = cStr(Request.ServerVariables("Script_Name")) & "?" & cStr(Request.QueryString()) end if end if %> <% ' WA eCart AddToCart if (cStr(Request.Form("WA_eCart1_26_ATC")) <> "" OR cStr(Request.Form("WA_eCart1_26_ATC.x")) <> "") then Session("sChargeShip")="Y" ATC_itemID = cStr(Request.Form("WA_eCart1_26_ID_Add")) ATC_AddIfIn = 0 ATC_RedirectAfter = "" ATC_RedirectIfIn = "" ATC_itemName = "VHS 2006 Member"' column binding ATC_itemDescription = ""' column binding ATC_itemWeight = cDbl("1")' column binding ATC_itemQuantity = cDbl("1")' column binding ATC_itemPrice = cDbl("45.00")' column binding if (IsNumeric(ATC_itemQuantity) AND ATC_itemQuantity <> 0) then set WA_eCart1 = WA_eCart1_AddToCart(ATC_AddIfIn, ATC_RedirectIfIn, ATC_itemID, ATC_itemName, ATC_itemDescription, ATC_itemWeight, ATC_itemQuantity, ATC_itemPrice) if (ATC_RedirectAfter <> "" AND WA_eCart1_redirStr = "") then WA_eCart1_redirStr = ATC_RedirectAfter end if Session("WAEC_ContinueRedirect") = cStr(Request.ServerVariables("Script_Name")) & "?" & cStr(Request.QueryString()) end if end if %> <% ' WA eCart AddToCart if (cStr(Request.Form("WA_eCart1_28_ATC")) <> "" OR cStr(Request.Form("WA_eCart1_28_ATC.x")) <> "") then Session("sChargeShip")="Y" ATC_itemID = cStr(Request.Form("WA_eCart1_28_ID_Add")) ATC_AddIfIn = 0 ATC_RedirectAfter = "" ATC_RedirectIfIn = "" ATC_itemName = "VHS 2006 - Non-Member " & Chr(36) & "75"' column binding ATC_itemDescription = ""' column binding ATC_itemWeight = cDbl("1")' column binding ATC_itemQuantity = cDbl("1")' column binding ATC_itemPrice = cDbl("75.00")' column binding if (IsNumeric(ATC_itemQuantity) AND ATC_itemQuantity <> 0) then set WA_eCart1 = WA_eCart1_AddToCart(ATC_AddIfIn, ATC_RedirectIfIn, ATC_itemID, ATC_itemName, ATC_itemDescription, ATC_itemWeight, ATC_itemQuantity, ATC_itemPrice) if (ATC_RedirectAfter <> "" AND WA_eCart1_redirStr = "") then WA_eCart1_redirStr = ATC_RedirectAfter end if Session("WAEC_ContinueRedirect") = cStr(Request.ServerVariables("Script_Name")) & "?" & cStr(Request.QueryString()) end if end if %> <% ' WA eCart AddToCart if (cStr(Request.Form("WA_eCart1_29_ATC")) <> "" OR cStr(Request.Form("WA_eCart1_29_ATC.x")) <> "") then ATC_itemID = cStr(Request.Form("WA_eCart1_29_ID_Add")) ATC_AddIfIn = 4 ATC_RedirectAfter = "" ATC_RedirectIfIn = "" ATC_itemName = "Donation"' column binding ATC_itemDescription = ""' column binding ATC_itemWeight = cDbl("0")' column binding ATC_itemQuantity = cDbl("1")' column binding ATC_itemPrice = "" & cStr(Request.Form("WA_eCart1_29_Price_Add")) & ""' column binding if (IsNumeric(ATC_itemQuantity) AND ATC_itemQuantity <> 0) then set WA_eCart1 = WA_eCart1_AddToCart(ATC_AddIfIn, ATC_RedirectIfIn, ATC_itemID, ATC_itemName, ATC_itemDescription, ATC_itemWeight, ATC_itemQuantity, ATC_itemPrice) if (ATC_RedirectAfter <> "" AND WA_eCart1_redirStr = "") then WA_eCart1_redirStr = ATC_RedirectAfter end if Session("WAEC_ContinueRedirect") = cStr(Request.ServerVariables("Script_Name")) & "?" & cStr(Request.QueryString()) end if end if %> <% ' WA eCart AddToCart if (cStr(Request.Form("WA_eCart1_30_ATC")) <> "" OR cStr(Request.Form("WA_eCart1_30_ATC.x")) <> "") then ATC_itemID = cStr(Request.Form("WA_eCart1_30_ID_Add")) ATC_AddIfIn = 0 ATC_RedirectAfter = "" ATC_RedirectIfIn = "" ATC_itemName = "Pre-Conference Institute"' column binding ATC_itemDescription = ""' column binding ATC_itemWeight = cDbl("0")' column binding ATC_itemQuantity = "" & cStr(Request.Form("WA_eCart1_30_Quantity_Add")) & ""' column binding ATC_itemPrice = cDbl("65")' column binding if (IsNumeric(ATC_itemQuantity) AND ATC_itemQuantity <> 0) then set WA_eCart1 = WA_eCart1_AddToCart(ATC_AddIfIn, ATC_RedirectIfIn, ATC_itemID, ATC_itemName, ATC_itemDescription, ATC_itemWeight, ATC_itemQuantity, ATC_itemPrice) if (ATC_RedirectAfter <> "" AND WA_eCart1_redirStr = "") then WA_eCart1_redirStr = ATC_RedirectAfter end if Session("WAEC_ContinueRedirect") = cStr(Request.ServerVariables("Script_Name")) & "?" & cStr(Request.QueryString()) end if end if %> <% ' WA eCart AddToCart if (cStr(Request.Form("WA_eCart1_27_ATC")) <> "" OR cStr(Request.Form("WA_eCart1_27_ATC.x")) <> "") then Session("sChargeShip")="Y" ATC_itemID = cStr(Request.Form("WA_eCart1_27_ID_Add")) ATC_AddIfIn = 0 ATC_RedirectAfter = "" ATC_RedirectIfIn = "" ATC_itemName = "DVD 2006 Non-member"' column binding ATC_itemDescription = ""' column binding ATC_itemWeight = cDbl("1")' column binding ATC_itemQuantity = cDbl("1")' column binding ATC_itemPrice = cDbl("75.00")' column binding if (IsNumeric(ATC_itemQuantity) AND ATC_itemQuantity <> 0) then set WA_eCart1 = WA_eCart1_AddToCart(ATC_AddIfIn, ATC_RedirectIfIn, ATC_itemID, ATC_itemName, ATC_itemDescription, ATC_itemWeight, ATC_itemQuantity, ATC_itemPrice) if (ATC_RedirectAfter <> "" AND WA_eCart1_redirStr = "") then WA_eCart1_redirStr = ATC_RedirectAfter end if Session("WAEC_ContinueRedirect") = cStr(Request.ServerVariables("Script_Name")) & "?" & cStr(Request.QueryString()) end if end if %> <% ' WA eCart AddToCart if (cStr(Request.Form("WA_eCart1_23_ATC")) <> "" OR cStr(Request.Form("WA_eCart1_23_ATC.x")) <> "") then Session("sChargeShip")="Y" ATC_itemID = cStr(Request.Form("WA_eCart1_23_ID_Add")) ATC_AddIfIn = 0 ATC_RedirectAfter = "" ATC_RedirectIfIn = "" ATC_itemName = "DVD 2005 Non-member"' column binding ATC_itemDescription = ""' column binding ATC_itemWeight = cDbl("1")' column binding ATC_itemQuantity = cDbl("1")' column binding ATC_itemPrice = cDbl("75.00")' column binding if (IsNumeric(ATC_itemQuantity) AND ATC_itemQuantity <> 0) then set WA_eCart1 = WA_eCart1_AddToCart(ATC_AddIfIn, ATC_RedirectIfIn, ATC_itemID, ATC_itemName, ATC_itemDescription, ATC_itemWeight, ATC_itemQuantity, ATC_itemPrice) if (ATC_RedirectAfter <> "" AND WA_eCart1_redirStr = "") then WA_eCart1_redirStr = ATC_RedirectAfter end if Session("WAEC_ContinueRedirect") = cStr(Request.ServerVariables("Script_Name")) & "?" & cStr(Request.QueryString()) end if end if %> <% ' WA eCart AddToCart if (cStr(Request.Form("WA_eCart1_19_ATC")) <> "" OR cStr(Request.Form("WA_eCart1_19_ATC.x")) <> "") then Session("sChargeShip")="Y" ATC_itemID = cStr(Request.Form("WA_eCart1_19_ID_Add")) ATC_AddIfIn = 0 ATC_RedirectAfter = "" ATC_RedirectIfIn = "" ATC_itemName = "DVD 2004 - Non-Member"' column binding ATC_itemDescription = ""' column binding ATC_itemWeight = cDbl("1")' column binding ATC_itemQuantity = cDbl("1")' column binding ATC_itemPrice = cDbl("75.00")' column binding if (IsNumeric(ATC_itemQuantity) AND ATC_itemQuantity <> 0) then set WA_eCart1 = WA_eCart1_AddToCart(ATC_AddIfIn, ATC_RedirectIfIn, ATC_itemID, ATC_itemName, ATC_itemDescription, ATC_itemWeight, ATC_itemQuantity, ATC_itemPrice) if (ATC_RedirectAfter <> "" AND WA_eCart1_redirStr = "") then WA_eCart1_redirStr = ATC_RedirectAfter end if Session("WAEC_ContinueRedirect") = cStr(Request.ServerVariables("Script_Name")) & "?" & cStr(Request.QueryString()) end if end if %> <% ' WA eCart AddToCart if (cStr(Request.Form("WA_eCart1_14_ATC")) <> "" OR cStr(Request.Form("WA_eCart1_14_ATC.x")) <> "") then Session("sChargeShip")="Y" ATC_itemID = cStr(Request.Form("WA_eCart1_14_ID_Add")) ATC_AddIfIn = 0 ATC_RedirectAfter = "" ATC_RedirectIfIn = "" ATC_itemName = "VHS 2003 - Non-member"' column binding ATC_itemDescription = ""' column binding ATC_itemWeight = cDbl("1")' column binding ATC_itemQuantity = cDbl("1")' column binding ATC_itemPrice = cDbl("75.00")' column binding if (IsNumeric(ATC_itemQuantity) AND ATC_itemQuantity <> 0) then set WA_eCart1 = WA_eCart1_AddToCart(ATC_AddIfIn, ATC_RedirectIfIn, ATC_itemID, ATC_itemName, ATC_itemDescription, ATC_itemWeight, ATC_itemQuantity, ATC_itemPrice) if (ATC_RedirectAfter <> "" AND WA_eCart1_redirStr = "") then WA_eCart1_redirStr = ATC_RedirectAfter end if Session("WAEC_ContinueRedirect") = cStr(Request.ServerVariables("Script_Name")) & "?" & cStr(Request.QueryString()) end if end if %> <% ' WA eCart AddToCart if (cStr(Request.Form("WA_eCart1_13_ATC")) <> "" OR cStr(Request.Form("WA_eCart1_13_ATC.x")) <> "") then Session("sChargeShip")="Y" ATC_itemID = cStr(Request.Form("WA_eCart1_13_ID_Add")) ATC_AddIfIn = 0 ATC_RedirectAfter = "" ATC_RedirectIfIn = "" ATC_itemName = "DVD 2002 - Member"' column binding ATC_itemDescription = ""' column binding ATC_itemWeight = cDbl("1")' column binding ATC_itemQuantity = cDbl("1")' column binding ATC_itemPrice = cDbl("45.00")' column binding if (IsNumeric(ATC_itemQuantity) AND ATC_itemQuantity <> 0) then set WA_eCart1 = WA_eCart1_AddToCart(ATC_AddIfIn, ATC_RedirectIfIn, ATC_itemID, ATC_itemName, ATC_itemDescription, ATC_itemWeight, ATC_itemQuantity, ATC_itemPrice) if (ATC_RedirectAfter <> "" AND WA_eCart1_redirStr = "") then WA_eCart1_redirStr = ATC_RedirectAfter end if Session("WAEC_ContinueRedirect") = cStr(Request.ServerVariables("Script_Name")) & "?" & cStr(Request.QueryString()) end if end if %> <% ' WA eCart AddToCart if (cStr(Request.Form("WA_eCart1_12_ATC")) <> "" OR cStr(Request.Form("WA_eCart1_12_ATC.x")) <> "") then Session("sChargeShip")="Y" ATC_itemID = cStr(Request.Form("WA_eCart1_12_ID_Add")) ATC_AddIfIn = 0 ATC_RedirectAfter = "" ATC_RedirectIfIn = "" ATC_itemName = "VHS Full Set - Non-member"' column binding ATC_itemDescription = ""' column binding ATC_itemWeight = cDbl("1")' column binding ATC_itemQuantity = cDbl("1")' column binding ATC_itemPrice = cDbl("300.00")' column binding if (IsNumeric(ATC_itemQuantity) AND ATC_itemQuantity <> 0) then set WA_eCart1 = WA_eCart1_AddToCart(ATC_AddIfIn, ATC_RedirectIfIn, ATC_itemID, ATC_itemName, ATC_itemDescription, ATC_itemWeight, ATC_itemQuantity, ATC_itemPrice) if (ATC_RedirectAfter <> "" AND WA_eCart1_redirStr = "") then WA_eCart1_redirStr = ATC_RedirectAfter end if Session("WAEC_ContinueRedirect") = cStr(Request.ServerVariables("Script_Name")) & "?" & cStr(Request.QueryString()) end if end if %> <% ' WA eCart AddToCart if (cStr(Request.Form("WA_eCart1_11_ATC")) <> "" OR cStr(Request.Form("WA_eCart1_11_ATC.x")) <> "") then Session("sChargeShip")="Y" ATC_itemID = cStr(Request.Form("WA_eCart1_11_ID_Add")) ATC_AddIfIn = 0 ATC_RedirectAfter = "" ATC_RedirectIfIn = "" ATC_itemName = "VHS Full Set - Member"' column binding ATC_itemDescription = ""' column binding ATC_itemWeight = cDbl("1")' column binding ATC_itemQuantity = cDbl("1")' column binding ATC_itemPrice = cDbl("180")' column binding if (IsNumeric(ATC_itemQuantity) AND ATC_itemQuantity <> 0) then set WA_eCart1 = WA_eCart1_AddToCart(ATC_AddIfIn, ATC_RedirectIfIn, ATC_itemID, ATC_itemName, ATC_itemDescription, ATC_itemWeight, ATC_itemQuantity, ATC_itemPrice) if (ATC_RedirectAfter <> "" AND WA_eCart1_redirStr = "") then WA_eCart1_redirStr = ATC_RedirectAfter end if Session("WAEC_ContinueRedirect") = cStr(Request.ServerVariables("Script_Name")) & "?" & cStr(Request.QueryString()) end if end if %> <% ' WA eCart AddToCart if (cStr(Request.Form("WA_eCart1_2_ATC")) <> "" OR cStr(Request.Form("WA_eCart1_2_ATC.x")) <> "") then ATC_itemID = cStr(Request.Form("WA_eCart1_2_ID_Add")) ATC_AddIfIn = 0 ATC_RedirectAfter = "" ATC_RedirectIfIn = "" ATC_itemName = "Student Membership"' column binding ATC_itemDescription = ""' column binding ATC_itemWeight = cDbl("0")' column binding ATC_itemQuantity = cDbl("1")' column binding ATC_itemPrice = cDbl("30.00")' column binding if (IsNumeric(ATC_itemQuantity) AND ATC_itemQuantity <> 0) then set WA_eCart1 = WA_eCart1_AddToCart(ATC_AddIfIn, ATC_RedirectIfIn, ATC_itemID, ATC_itemName, ATC_itemDescription, ATC_itemWeight, ATC_itemQuantity, ATC_itemPrice) if (ATC_RedirectAfter <> "" AND WA_eCart1_redirStr = "") then WA_eCart1_redirStr = ATC_RedirectAfter end if Session("WAEC_ContinueRedirect") = cStr(Request.ServerVariables("Script_Name")) & "?" & cStr(Request.QueryString()) end if end if %> <% ' WA eCart AddToCart if (cStr(Request.Form("WA_eCart1_3_ATC")) <> "" OR cStr(Request.Form("WA_eCart1_3_ATC.x")) <> "") then ATC_itemID = cStr(Request.Form("WA_eCart1_3_ID_Add")) ATC_AddIfIn = 2 ATC_RedirectAfter = "" ATC_RedirectIfIn = "" ATC_itemName = "Associate Membership"' column binding ATC_itemDescription = ""' column binding ATC_itemWeight = cDbl("0")' column binding ATC_itemQuantity = cDbl("1")' column binding ATC_itemPrice = cDbl("60.00")' column binding if (IsNumeric(ATC_itemQuantity) AND ATC_itemQuantity <> 0) then set WA_eCart1 = WA_eCart1_AddToCart(ATC_AddIfIn, ATC_RedirectIfIn, ATC_itemID, ATC_itemName, ATC_itemDescription, ATC_itemWeight, ATC_itemQuantity, ATC_itemPrice) if (ATC_RedirectAfter <> "" AND WA_eCart1_redirStr = "") then WA_eCart1_redirStr = ATC_RedirectAfter end if Session("WAEC_ContinueRedirect") = cStr(Request.ServerVariables("Script_Name")) & "?" & cStr(Request.QueryString()) end if end if %> <% 'WA eCart Redirect Check Out if (cStr(Request.Form("WA_eCart1_Checkout")) <> "" OR cStr(Request.Form("WA_eCart1_Checkout.x")) <> "") then Redirect_redirStr="viewcart.asp"'_redirStr if (Redirect_redirStr <> "") then if (cStr(Request.QueryString()) <> "") then if (InStr(Redirect_redirStr, "?") <= 0) then Redirect_redirStr = Redirect_redirStr & "?" & Request.QueryString() else Redirect_redirStr = Redirect_redirStr & "&" & Request.QueryString() end if end if WA_eCart1_redirStr = Redirect_redirStr end if WA_eCart1_cartAction = "Checkout" end if %> <% ' WA eCart AddToCart if (cStr(Request.Form("WA_eCart1_37_ATC")) <> "" OR cStr(Request.Form("WA_eCart1_37_ATC.x")) <> "") then ATC_itemID = cStr(Request.Form("WA_eCart1_37_ID_Add")) ATC_AddIfIn = 0 ATC_RedirectAfter = "" ATC_RedirectIfIn = "" ATC_itemName = "Student Conference Registration"' column binding ATC_itemDescription = ""' column binding ATC_itemWeight = cDbl("0")' column binding ATC_itemQuantity = cDbl("1")' column binding ATC_itemPrice = cDbl("260.00")' column binding if (IsNumeric(ATC_itemQuantity) AND ATC_itemQuantity <> 0) then set WA_eCart1 = WA_eCart1_AddToCart(ATC_AddIfIn, ATC_RedirectIfIn, ATC_itemID, ATC_itemName, ATC_itemDescription, ATC_itemWeight, ATC_itemQuantity, ATC_itemPrice) if (ATC_RedirectAfter <> "" AND WA_eCart1_redirStr = "") then WA_eCart1_redirStr = ATC_RedirectAfter end if Session("WAEC_ContinueRedirect") = cStr(Request.ServerVariables("Script_Name")) & "?" & cStr(Request.QueryString()) end if end if %> <% ' WA eCart AddToCart if (cStr(Request.Form("WA_eCart1_38_ATC")) <> "" OR cStr(Request.Form("WA_eCart1_38_ATC.x")) <> "") then ATC_itemID = cStr(Request.Form("WA_eCart1_38_ID_Add")) ATC_AddIfIn = 0 ATC_RedirectAfter = "" ATC_RedirectIfIn = "" ATC_itemName = "Student Early Registration"' column binding ATC_itemDescription = ""' column binding ATC_itemWeight = cDbl("0")' column binding ATC_itemQuantity = cDbl("1")' column binding ATC_itemPrice = cDbl("210.00")' column binding if (IsNumeric(ATC_itemQuantity) AND ATC_itemQuantity <> 0) then set WA_eCart1 = WA_eCart1_AddToCart(ATC_AddIfIn, ATC_RedirectIfIn, ATC_itemID, ATC_itemName, ATC_itemDescription, ATC_itemWeight, ATC_itemQuantity, ATC_itemPrice) if (ATC_RedirectAfter <> "" AND WA_eCart1_redirStr = "") then WA_eCart1_redirStr = ATC_RedirectAfter end if Session("WAEC_ContinueRedirect") = cStr(Request.ServerVariables("Script_Name")) & "?" & cStr(Request.QueryString()) end if end if %> <% ' WA eCart AddToCart if (cStr(Request.Form("WA_eCart1_36_ATC")) <> "" OR cStr(Request.Form("WA_eCart1_36_ATC.x")) <> "") then ATC_itemID = cStr(Request.Form("WA_eCart1_36_ID_Add")) ATC_AddIfIn = 0 ATC_RedirectAfter = "" ATC_RedirectIfIn = "" ATC_itemName = "Non-Member Conference Registration"' column binding ATC_itemDescription = ""' column binding ATC_itemWeight = cDbl("0")' column binding ATC_itemQuantity = cDbl("1")' column binding ATC_itemPrice = cDbl("360.00")' column binding if (IsNumeric(ATC_itemQuantity) AND ATC_itemQuantity <> 0) then set WA_eCart1 = WA_eCart1_AddToCart(ATC_AddIfIn, ATC_RedirectIfIn, ATC_itemID, ATC_itemName, ATC_itemDescription, ATC_itemWeight, ATC_itemQuantity, ATC_itemPrice) if (ATC_RedirectAfter <> "" AND WA_eCart1_redirStr = "") then WA_eCart1_redirStr = ATC_RedirectAfter end if Session("WAEC_ContinueRedirect") = cStr(Request.ServerVariables("Script_Name")) & "?" & cStr(Request.QueryString()) end if end if %> <% ' WA eCart AddToCart if (cStr(Request.Form("WA_eCart1_35_ATC")) <> "" OR cStr(Request.Form("WA_eCart1_35_ATC.x")) <> "") then ATC_itemID = cStr(Request.Form("WA_eCart1_35_ID_Add")) ATC_AddIfIn = 0 ATC_RedirectAfter = "" ATC_RedirectIfIn = "" ATC_itemName = "Member Conference Registration"' column binding ATC_itemDescription = ""' column binding ATC_itemWeight = cDbl("0")' column binding ATC_itemQuantity = cDbl("1")' column binding ATC_itemPrice = cDbl("310.00")' column binding if (IsNumeric(ATC_itemQuantity) AND ATC_itemQuantity <> 0) then set WA_eCart1 = WA_eCart1_AddToCart(ATC_AddIfIn, ATC_RedirectIfIn, ATC_itemID, ATC_itemName, ATC_itemDescription, ATC_itemWeight, ATC_itemQuantity, ATC_itemPrice) if (ATC_RedirectAfter <> "" AND WA_eCart1_redirStr = "") then WA_eCart1_redirStr = ATC_RedirectAfter end if Session("WAEC_ContinueRedirect") = cStr(Request.ServerVariables("Script_Name")) & "?" & cStr(Request.QueryString()) end if end if %> <% ' WA eCart AddToCart if (cStr(Request.Form("WA_eCart1_34_ATC")) <> "" OR cStr(Request.Form("WA_eCart1_34_ATC.x")) <> "") then ATC_itemID = cStr(Request.Form("WA_eCart1_34_ID_Add")) ATC_AddIfIn = 0 ATC_RedirectAfter = "" ATC_RedirectIfIn = "" ATC_itemName = "Non-Member Early Registration"' column binding ATC_itemDescription = ""' column binding ATC_itemWeight = cDbl("0")' column binding ATC_itemQuantity = cDbl("1")' column binding ATC_itemPrice = cDbl("310.00")' column binding if (IsNumeric(ATC_itemQuantity) AND ATC_itemQuantity <> 0) then set WA_eCart1 = WA_eCart1_AddToCart(ATC_AddIfIn, ATC_RedirectIfIn, ATC_itemID, ATC_itemName, ATC_itemDescription, ATC_itemWeight, ATC_itemQuantity, ATC_itemPrice) if (ATC_RedirectAfter <> "" AND WA_eCart1_redirStr = "") then WA_eCart1_redirStr = ATC_RedirectAfter end if Session("WAEC_ContinueRedirect") = cStr(Request.ServerVariables("Script_Name")) & "?" & cStr(Request.QueryString()) end if end if %> <% ' WA eCart AddToCart if (cStr(Request.Form("WA_eCart1_33_ATC")) <> "" OR cStr(Request.Form("WA_eCart1_33_ATC.x")) <> "") then ATC_itemID = cStr(Request.Form("WA_eCart1_33_ID_Add")) ATC_AddIfIn = 0 ATC_RedirectAfter = "" ATC_RedirectIfIn = "" ATC_itemName = "Member Early Registration"' column binding ATC_itemDescription = ""' column binding ATC_itemWeight = cDbl("0")' column binding ATC_itemQuantity = cDbl("1")' column binding ATC_itemPrice = cDbl("260.00")' column binding if (IsNumeric(ATC_itemQuantity) AND ATC_itemQuantity <> 0) then set WA_eCart1 = WA_eCart1_AddToCart(ATC_AddIfIn, ATC_RedirectIfIn, ATC_itemID, ATC_itemName, ATC_itemDescription, ATC_itemWeight, ATC_itemQuantity, ATC_itemPrice) if (ATC_RedirectAfter <> "" AND WA_eCart1_redirStr = "") then WA_eCart1_redirStr = ATC_RedirectAfter end if Session("WAEC_ContinueRedirect") = cStr(Request.ServerVariables("Script_Name")) & "?" & cStr(Request.QueryString()) end if end if %> <% ' WA eCart AddToCart if (cStr(Request.Form("WA_eCart1_39_ATC")) <> "" OR cStr(Request.Form("WA_eCart1_39_ATC.x")) <> "") then Session("sChargeShip")="Y" ATC_itemID = cStr(Request.Form("WA_eCart1_39_ID_Add")) ATC_AddIfIn = 0 ATC_RedirectAfter = "" ATC_RedirectIfIn = "" ATC_itemName = "DVD 2008 - Member"' column binding ATC_itemDescription = ""' column binding ATC_itemWeight = cDbl("1")' column binding ATC_itemQuantity = cDbl("1")' column binding ATC_itemPrice = cDbl("45.00")' column binding if (IsNumeric(ATC_itemQuantity) AND ATC_itemQuantity <> 0) then set WA_eCart1 = WA_eCart1_AddToCart(ATC_AddIfIn, ATC_RedirectIfIn, ATC_itemID, ATC_itemName, ATC_itemDescription, ATC_itemWeight, ATC_itemQuantity, ATC_itemPrice) if (ATC_RedirectAfter <> "" AND WA_eCart1_redirStr = "") then WA_eCart1_redirStr = ATC_RedirectAfter end if Session("WAEC_ContinueRedirect") = cStr(Request.ServerVariables("Script_Name")) & "?" & cStr(Request.QueryString()) end if end if %> <% ' WA eCart AddToCart if (cStr(Request.Form("WA_eCart1_40_ATC")) <> "" OR cStr(Request.Form("WA_eCart1_40ATC.x")) <> "") then Session("sChargeShip")="Y" ATC_itemID = cStr(Request.Form("WA_eCart1_40_ID_Add")) ATC_AddIfIn = 0 ATC_RedirectAfter = "" ATC_RedirectIfIn = "" ATC_itemName = "DVD 2008 - Non-member"' column binding ATC_itemDescription = ""' column binding ATC_itemWeight = cDbl("1")' column binding ATC_itemQuantity = cDbl("1")' column binding ATC_itemPrice = cDbl("75.00")' column binding if (IsNumeric(ATC_itemQuantity) AND ATC_itemQuantity <> 0) then set WA_eCart1 = WA_eCart1_AddToCart(ATC_AddIfIn, ATC_RedirectIfIn, ATC_itemID, ATC_itemName, ATC_itemDescription, ATC_itemWeight, ATC_itemQuantity, ATC_itemPrice) if (ATC_RedirectAfter <> "" AND WA_eCart1_redirStr = "") then WA_eCart1_redirStr = ATC_RedirectAfter end if Session("WAEC_ContinueRedirect") = cStr(Request.ServerVariables("Script_Name")) & "?" & cStr(Request.QueryString()) end if end if %> <% ' WA eCart Redirect if (WA_eCart1_redirStr <> "") then Response.Redirect(WA_eCart1_redirStr) end if %> SSO - Shop Online o















Online Shopping has moved.

If you are not automatically redirected, please click here.
 

HomeAbout SSO:USACurrent News & EventsGovernance & Board of Directors
Ruth Zemke Lecture in OSPrior Conference ProceedingsOS Around the WorldListserv

Copyright 2005 Society for the Study of Occupation:USA, All Rights Reserved

Web Site by Datatrack, Inc.