ASP Programming
 
Forums: » Register « |  User CP |  Games |  Calendar |  Members |  FAQs |  Sitemap |  Support | 
User Name:
Password:
Remember me
Go Back   Dev Shed Forums > Programming Languages - More > ASP Programming
Reload this Page

If possible, then please re-write my code. Thanks!

Discuss If possible, then please re-write my code. Thanks! in the ASP Programming forum on Dev Shed.
If possible, then please re-write my code. Thanks! ASP Programming forum discussing Active Server Pages coding techniques and problem solving methods. Use VBScript or Jscript to make dynamic web applications.

Record onscreen activity, your voice & webcam video. Turn everyday presentations into HD-quality videos.

For perfectly clear screencasts every time.
At the IBM® developerWorks Developer Knowledge Center you'll find resources for FREE ekits, Tutorials, Webcasts, Trial Downloads and more.


We cover the world of technology like no one else, constantly updating you with the best information available on open source software, Microsoft technologies, hardware and news from around the world.

Try Camtasia Studio today!
Visit the IBM® Developer Knowledge Center today!
Sign up today!

Reply
Add This Thread To:
  Del.icio.us   Digg   Google   Spurl   Blink   Furl   Simpy   Y! MyWeb 
« Previous Thread | Next Thread »  
Thread Tools Search this Thread Rate Thread Display Modes
 
Unread Dev Shed Forums Sponsor:
  #1  
Old July 3rd, 2009, 03:47 PM
cecilia_2004 cecilia_2004 is offline
Contributing User
Dev Shed Newbie (0 - 499 posts)
  
Join Date: Feb 2004
Posts: 249 cecilia_2004 User rank is Corporal (100 - 500 Reputation Level)cecilia_2004 User rank is Corporal (100 - 500 Reputation Level)cecilia_2004 User rank is Corporal (100 - 500 Reputation Level)cecilia_2004 User rank is Corporal (100 - 500 Reputation Level) 
Time spent in forums: 4 Days 1 h 47 m 28 sec
Reputation Power: 7
If possible, then please re-write my code. Thanks!
Hi everyone,

My code (below) is too long if I have 100 shipping options.

If possible, then please re-write my code.

Thanks,

Cecilia


Code:
<FORM id=form3 name=form1>
Shipping Method: <SELECT NAME="lanuages" onchange='location.href="ShoppingCart.asp?Display=true&ShippingCost="+this.form.lanuages.options[this.form.lanuages.selectedIndex].value + "&CreditCart=" + <%= Request("CreditCart") %>+ "&Category_02_Id=" + <%= Request("Category_02_Id") %>+"&Category_03_Id=" + <%= Request("Category_03_Id") %>+"&Category_04_Id=" + <%= Request("Category_04_Id") %>;'>

<%

If Request("ShippingCost") = 1 Then

Response.Write "<option SELECTED value=""" & 1 & """>Ground (Continental U.S. Only) - UPS FREE</option>" & _
"<option value=""" & 15.95 & """>Guam, American Samoa - U.S. Postal $15.95</option>" & _
"<option value=""" & 15.96 & """>U.S. Virgin Islands - U.S. Postal $15.96</option>" & _
"<option value=""" & 8.95 & """>Hawaii, Alaska, Puerto Rico - U.S. Postal $8.95</option>" & _
"<option value=""" & 25.95 & """>Hawaii, Alaska, Puerto Rico - UPS $25.95</option>" & _
"<option value=""" & 20.95 & """>Canada, Mexico - U.S. Postal - $20.95</option>" & _
"<option value=""" & 59.95 & """>Canada, Mexico - UPS - $59.95</option>" & _
"<option value=""" & 25.96 & """>International (1-5 pair) - U.S. Postal $25.96</option>" & _
"<option value=""" & 49.95 & """>International (6-10 pair) - U.S. Postal $49.95</option>" & _
"<option value=""" & 159.95 & """>International (over 10 pair) - U.S. Postal $159.95 </option>" & _
"<option value=""" & 2 & """>PO BOX/ APO - U.S. Postal only - FREE</option>"

End If


If Request("ShippingCost") = 15.95 Then

Response.Write "<option value=""" & 1 & """>Ground (Continental U.S. Only) - UPS FREE</option>" & _
"<option SELECTED value=""" & 15.95 & """>Guam, American Samoa - U.S. Postal $15.95</option>" & _
"<option value=""" & 15.96 & """>U.S. Virgin Islands - U.S. Postal $15.96</option>" & _
"<option value=""" & 8.95 & """>Hawaii, Alaska, Puerto Rico - U.S. Postal $8.95</option>" & _
"<option value=""" & 25.95 & """>Hawaii, Alaska, Puerto Rico - UPS $25.95</option>" & _
"<option value=""" & 20.95 & """>Canada, Mexico - U.S. Postal - $20.95</option>" & _
"<option value=""" & 59.95 & """>Canada, Mexico - UPS - $59.95</option>" & _
"<option value=""" & 25.96 & """>International (1-5 pair) - U.S. Postal $25.96</option>" & _
"<option value=""" & 49.95 & """>International (6-10 pair) - U.S. Postal $49.95</option>" & _
"<option value=""" & 159.95 & """>International (over 10 pair) - U.S. Postal $159.95 </option>" & _
"<option value=""" & 2 & """>PO BOX/ APO - U.S. Postal only - FREE</option>"

End If

If Request("ShippingCost") = 15.96 Then

Response.Write "<option value=""" & 1 & """>Ground (Continental U.S. Only) - UPS FREE</option>" & _
"<option value=""" & 15.95 & """>Guam, American Samoa - U.S. Postal $15.95</option>" & _
"<option SELECTED value=""" & 15.96 & """>U.S. Virgin Islands - U.S. Postal $15.96</option>" & _
"<option value=""" & 8.95 & """>Hawaii, Alaska, Puerto Rico - U.S. Postal $8.95</option>" & _
"<option value=""" & 25.95 & """>Hawaii, Alaska, Puerto Rico - UPS $25.95</option>" & _
"<option value=""" & 20.95 & """>Canada, Mexico - U.S. Postal - $20.95</option>" & _
"<option value=""" & 59.95 & """>Canada, Mexico - UPS - $59.95</option>" & _
"<option value=""" & 25.96 & """>International (1-5 pair) - U.S. Postal $25.96</option>" & _
"<option value=""" & 49.95 & """>International (6-10 pair) - U.S. Postal $49.95</option>" & _
"<option value=""" & 159.95 & """>International (over 10 pair) - U.S. Postal $159.95 </option>" & _
"<option value=""" & 2 & """>PO BOX/ APO - U.S. Postal only - FREE</option>"

End If

If Request("ShippingCost") = 8.95 Then

Response.Write "<option value=""" & 1 & """>Ground (Continental U.S. Only) - UPS FREE</option>" & _
"<option value=""" & 15.95 & """>Guam, American Samoa - U.S. Postal $15.95</option>" & _
"<option value=""" & 15.96 & """>U.S. Virgin Islands - U.S. Postal $15.96</option>" & _
"<option SELECTED value=""" & 8.95 & """>Hawaii, Alaska, Puerto Rico - U.S. Postal $8.95</option>" & _
"<option value=""" & 25.95 & """>Hawaii, Alaska, Puerto Rico - UPS $25.95</option>" & _
"<option value=""" & 20.95 & """>Canada, Mexico - U.S. Postal - $20.95</option>" & _
"<option value=""" & 59.95 & """>Canada, Mexico - UPS - $59.95</option>" & _
"<option value=""" & 25.96 & """>International (1-5 pair) - U.S. Postal $25.96</option>" & _
"<option value=""" & 49.95 & """>International (6-10 pair) - U.S. Postal $49.95</option>" & _
"<option value=""" & 159.95 & """>International (over 10 pair) - U.S. Postal $159.95 </option>" & _
"<option value=""" & 2 & """>PO BOX/ APO - U.S. Postal only - FREE</option>"

End If

If Request("ShippingCost") = 25.95 Then

Response.Write "<option value=""" & 1 & """>Ground (Continental U.S. Only) - UPS FREE</option>" & _
"<option value=""" & 15.95 & """>Guam, American Samoa - U.S. Postal $15.95</option>" & _
"<option value=""" & 15.96 & """>U.S. Virgin Islands - U.S. Postal $15.96</option>" & _
"<option value=""" & 8.95 & """>Hawaii, Alaska, Puerto Rico - U.S. Postal $8.95</option>" & _
"<option SELECTED value=""" & 25.95 & """>Hawaii, Alaska, Puerto Rico - UPS $25.95</option>" & _
"<option value=""" & 20.95 & """>Canada, Mexico - U.S. Postal - $20.95</option>" & _
"<option value=""" & 59.95 & """>Canada, Mexico - UPS - $59.95</option>" & _
"<option value=""" & 25.96 & """>International (1-5 pair) - U.S. Postal $25.96</option>" & _
"<option value=""" & 49.95 & """>International (6-10 pair) - U.S. Postal $49.95</option>" & _
"<option value=""" & 159.95 & """>International (over 10 pair) - U.S. Postal $159.95 </option>" & _
"<option value=""" & 2 & """>PO BOX/ APO - U.S. Postal only - FREE</option>"

End If

If Request("ShippingCost") = 20.95 Then

Response.Write "<option value=""" & 1 & """>Ground (Continental U.S. Only) - UPS FREE</option>" & _
"<option value=""" & 15.95 & """>Guam, American Samoa - U.S. Postal $15.95</option>" & _
"<option value=""" & 15.96 & """>U.S. Virgin Islands - U.S. Postal $15.96</option>" & _
"<option value=""" & 8.95 & """>Hawaii, Alaska, Puerto Rico - U.S. Postal $8.95</option>" & _
"<option value=""" & 25.95 & """>Hawaii, Alaska, Puerto Rico - UPS $25.95</option>" & _
"<option SELECTED value=""" & 20.95 & """>Canada, Mexico - U.S. Postal - $20.95</option>" & _
"<option value=""" & 59.95 & """>Canada, Mexico - UPS - $59.95</option>" & _
"<option value=""" & 25.96 & """>International (1-5 pair) - U.S. Postal $25.96</option>" & _
"<option value=""" & 49.95 & """>International (6-10 pair) - U.S. Postal $49.95</option>" & _
"<option value=""" & 159.95 & """>International (over 10 pair) - U.S. Postal $159.95 </option>" & _
"<option value=""" & 2 & """>PO BOX/ APO - U.S. Postal only - FREE</option>"

End If

If Request("ShippingCost") = 59.95 Then

Response.Write "<option value=""" & 1 & """>Ground (Continental U.S. Only) - UPS FREE</option>" & _
"<option value=""" & 15.95 & """>Guam, American Samoa - U.S. Postal $15.95</option>" & _
"<option value=""" & 15.96 & """>U.S. Virgin Islands - U.S. Postal $15.96</option>" & _
"<option value=""" & 8.95 & """>Hawaii, Alaska, Puerto Rico - U.S. Postal $8.95</option>" & _
"<option value=""" & 25.95 & """>Hawaii, Alaska, Puerto Rico - UPS $25.95</option>" & _
"<option value=""" & 20.95 & """>Canada, Mexico - U.S. Postal - $20.95</option>" & _
"<option SELECTED value=""" & 59.95 & """>Canada, Mexico - UPS - $59.95</option>" & _
"<option value=""" & 25.96 & """>International (1-5 pair) - U.S. Postal $25.96</option>" & _
"<option value=""" & 49.95 & """>International (6-10 pair) - U.S. Postal $49.95</option>" & _
"<option value=""" & 159.95 & """>International (over 10 pair) - U.S. Postal $159.95 </option>" & _
"<option value=""" & 2 & """>PO BOX/ APO - U.S. Postal only - FREE</option>"

End If

If Request("ShippingCost") = 25.96 Then

Response.Write "<option value=""" & 1 & """>Ground (Continental U.S. Only) - UPS FREE</option>" & _
"<option value=""" & 15.95 & """>Guam, American Samoa - U.S. Postal $15.95</option>" & _
"<option value=""" & 15.96 & """>U.S. Virgin Islands - U.S. Postal $15.96</option>" & _
"<option value=""" & 8.95 & """>Hawaii, Alaska, Puerto Rico - U.S. Postal $8.95</option>" & _
"<option value=""" & 25.95 & """>Hawaii, Alaska, Puerto Rico - UPS $25.95</option>" & _
"<option value=""" & 20.95 & """>Canada, Mexico - U.S. Postal - $20.95</option>" & _
"<option value=""" & 59.95 & """>Canada, Mexico - UPS - $59.95</option>" & _
"<option SELECTED value=""" & 25.96 & """>International (1-5 pair) - U.S. Postal $25.96</option>" & _
"<option value=""" & 49.95 & """>International (6-10 pair) - U.S. Postal $49.95</option>" & _
"<option value=""" & 159.95 & """>International (over 10 pair) - U.S. Postal $159.95 </option>" & _
"<option value=""" & 2 & """>PO BOX/ APO - U.S. Postal only - FREE</option>"

End If

If Request("ShippingCost") = 49.95 Then

Response.Write "<option value=""" & 1 & """>Ground (Continental U.S. Only) - UPS FREE</option>" & _
"<option value=""" & 15.95 & """>Guam, American Samoa - U.S. Postal $15.95</option>" & _
"<option value=""" & 15.96 & """>U.S. Virgin Islands - U.S. Postal $15.96</option>" & _
"<option value=""" & 8.95 & """>Hawaii, Alaska, Puerto Rico - U.S. Postal $8.95</option>" & _
"<option value=""" & 25.95 & """>Hawaii, Alaska, Puerto Rico - UPS $25.95</option>" & _
"<option value=""" & 20.95 & """>Canada, Mexico - U.S. Postal - $20.95</option>" & _
"<option value=""" & 59.95 & """>Canada, Mexico - UPS - $59.95</option>" & _
"<option value=""" & 25.96 & """>International (1-5 pair) - U.S. Postal $25.96</option>" & _
"<option SELECTED value=""" & 49.95 & """>International (6-10 pair) - U.S. Postal $49.95</option>" & _
"<option value=""" & 159.95 & """>International (over 10 pair) - U.S. Postal $159.95 </option>" & _
"<option value=""" & 2 & """>PO BOX/ APO - U.S. Postal only - FREE</option>"

End If

If Request("ShippingCost") = 159.95 Then

Response.Write "<option value=""" & 1 & """>Ground (Continental U.S. Only) - UPS FREE</option>" & _
"<option value=""" & 15.95 & """>Guam, American Samoa - U.S. Postal $15.95</option>" & _
"<option value=""" & 15.96 & """>U.S. Virgin Islands - U.S. Postal $15.96</option>" & _
"<option value=""" & 8.95 & """>Hawaii, Alaska, Puerto Rico - U.S. Postal $8.95</option>" & _
"<option value=""" & 25.95 & """>Hawaii, Alaska, Puerto Rico - UPS $25.95</option>" & _
"<option value=""" & 20.95 & """>Canada, Mexico - U.S. Postal - $20.95</option>" & _
"<option value=""" & 59.95 & """>Canada, Mexico - UPS - $59.95</option>" & _
"<option value=""" & 25.96 & """>International (1-5 pair) - U.S. Postal $25.96</option>" & _
"<option value=""" & 49.95 & """>International (6-10 pair) - U.S. Postal $49.95</option>" & _
"<option SELECTED value=""" & 159.95 & """>International (over 10 pair) - U.S. Postal $159.95 </option>" & _
"<option value=""" & 2 & """>PO BOX/ APO - U.S. Postal only - FREE</option>"

End If

If Request("ShippingCost") = 2 Then

Response.Write "<option value=""" & 1 & """>Ground (Continental U.S. Only) - UPS FREE</option>" & _
"<option value=""" & 15.95 & """>Guam, American Samoa - U.S. Postal $15.95</option>" & _
"<option value=""" & 15.96 & """>U.S. Virgin Islands - U.S. Postal $15.96</option>" & _
"<option value=""" & 8.95 & """>Hawaii, Alaska, Puerto Rico - U.S. Postal $8.95</option>" & _
"<option value=""" & 25.95 & """>Hawaii, Alaska, Puerto Rico - UPS $25.95</option>" & _
"<option value=""" & 20.95 & """>Canada, Mexico - U.S. Postal - $20.95</option>" & _
"<option value=""" & 59.95 & """>Canada, Mexico - UPS - $59.95</option>" & _
"<option value=""" & 25.96 & """>International (1-5 pair) - U.S. Postal $25.96</option>" & _
"<option value=""" & 49.95 & """>International (6-10 pair) - U.S. Postal $49.95</option>" & _
"<option value=""" & 159.95 & """>International (over 10 pair) - U.S. Postal $159.95 </option>" & _
"<option SELECTED value=""" & 2 & """>PO BOX/ APO - U.S. Postal only - FREE</option>"

End If


%>

</SELECT>
</FORM>
Reply With Quote
  #2  
Old July 3rd, 2009, 08:25 PM
Doug G Doug G is online now
Grumpier Old Moderator
Dev Shed God 15th Plane (12000 - 12499 posts)
  
Join Date: Jun 2003
Posts: 12,211 Doug G User rank is General 15th Grade (Above 100000 Reputation Level)Doug G User rank is General 15th Grade (Above 100000 Reputation Level)Doug G User rank is General 15th Grade (Above 100000 Reputation Level)Doug G User rank is General 15th Grade (Above 100000 Reputation Level)Doug G User rank is General 15th Grade (Above 100000 Reputation Level)Doug G User rank is General 15th Grade (Above 100000 Reputation Level)Doug G User rank is General 15th Grade (Above 100000 Reputation Level)Doug G User rank is General 15th Grade (Above 100000 Reputation Level)Doug G User rank is General 15th Grade (Above 100000 Reputation Level)Doug G User rank is General 15th Grade (Above 100000 Reputation Level)Doug G User rank is General 15th Grade (Above 100000 Reputation Level)Doug G User rank is General 15th Grade (Above 100000 Reputation Level)Doug G User rank is General 15th Grade (Above 100000 Reputation Level)Doug G User rank is General 15th Grade (Above 100000 Reputation Level)Doug G User rank is General 15th Grade (Above 100000 Reputation Level)Doug G User rank is General 15th Grade (Above 100000 Reputation Level) 
Time spent in forums: 1 Month 1 Week 3 Days 3 h 31 m 36 sec
Reputation Power: 1969
I doubt anyone will just jump in and rewrite all your code for you. We do have a hire a programmer if someone is willing to work for you for hire.

There are good tutorial and education sites like www.w3schools.com as well as the microsoft msdn library where you can find lots of information on how you may go about your application, you should spend some time there working through some basic asp coding before trying a complicated app like a shopping cart. Oh, and there are very capable shopping cart applications available you should consider using a pre-built cart and skipping the headaches of coding one.
__________________
======
Doug G
======
I didn't attend the funeral, but I sent a nice letter saying I approved of it. --Mark Twain
Reply With Quote
  #3  
Old July 3rd, 2009, 09:49 PM
cecilia_2004 cecilia_2004 is offline
Contributing User
Dev Shed Newbie (0 - 499 posts)
  
Join Date: Feb 2004
Posts: 249 cecilia_2004 User rank is Corporal (100 - 500 Reputation Level)cecilia_2004 User rank is Corporal (100 - 500 Reputation Level)cecilia_2004 User rank is Corporal (100 - 500 Reputation Level)cecilia_2004 User rank is Corporal (100 - 500 Reputation Level) 
Time spent in forums: 4 Days 1 h 47 m 28 sec
Reputation Power: 7
Quote:
Originally Posted by Doug G
I doubt anyone will just jump in and rewrite all your code for you. We do have a hire a programmer if someone is willing to work for you for hire.

There are good tutorial and education sites like www.w3schools.com as well as the microsoft msdn library where you can find lots of information on how you may go about your application, you should spend some time there working through some basic asp coding before trying a complicated app like a shopping cart. Oh, and there are very capable shopping cart applications available you should consider using a pre-built cart and skipping the headaches of coding one.


Hi Doug,

Thanks for your reply!

If you know any link(s) for the pre-built cart in ASP. Then please let me know. Thanks.

cheers

Cecilia
Reply With Quote
  #4  
Old July 4th, 2009, 01:12 AM
Doug G Doug G is online now
Grumpier Old Moderator
Dev Shed God 15th Plane (12000 - 12499 posts)
  
Join Date: Jun 2003
Posts: 12,211 Doug G User rank is General 15th Grade (Above 100000 Reputation Level)Doug G User rank is General 15th Grade (Above 100000 Reputation Level)Doug G User rank is General 15th Grade (Above 100000 Reputation Level)Doug G User rank is General 15th Grade (Above 100000 Reputation Level)Doug G User rank is General 15th Grade (Above 100000 Reputation Level)Doug G User rank is General 15th Grade (Above 100000 Reputation Level)Doug G User rank is General 15th Grade (Above 100000 Reputation Level)Doug G User rank is General 15th Grade (Above 100000 Reputation Level)Doug G User rank is General 15th Grade (Above 100000 Reputation Level)Doug G User rank is General 15th Grade (Above 100000 Reputation Level)Doug G User rank is General 15th Grade (Above 100000 Reputation Level)Doug G User rank is General 15th Grade (Above 100000 Reputation Level)Doug G User rank is General 15th Grade (Above 100000 Reputation Level)Doug G User rank is General 15th Grade (Above 100000 Reputation Level)Doug G User rank is General 15th Grade (Above 100000 Reputation Level)Doug G User rank is General 15th Grade (Above 100000 Reputation Level) 
Time spent in forums: 1 Month 1 Week 3 Days 3 h 31 m 36 sec
Reputation Power: 1969
You might start looking around www.aspin.com where there are lots of downloadable asp and asp.net applications. Otherwise google should give you plenty of links. Years ago I got a functional and usable asp cart and it was about $30.00 US.
Reply With Quote
  #5  
Old July 6th, 2009, 03:54 AM
cecilia_2004 cecilia_2004 is offline
Contributing User
Dev Shed Newbie (0 - 499 posts)
  
Join Date: Feb 2004
Posts: 249 cecilia_2004 User rank is Corporal (100 - 500 Reputation Level)cecilia_2004 User rank is Corporal (100 - 500 Reputation Level)cecilia_2004 User rank is Corporal (100 - 500 Reputation Level)cecilia_2004 User rank is Corporal (100 - 500 Reputation Level) 
Time spent in forums: 4 Days 1 h 47 m 28 sec
Reputation Power: 7
Quote:
Originally Posted by Doug G
You might start looking around www.aspin.com where there are lots of downloadable asp and asp.net applications. Otherwise google should give you plenty of links. Years ago I got a functional and usable asp cart and it was about $30.00 US.


Thanks Doug!

cheers

Cecilia
Reply With Quote
  #6  
Old July 6th, 2009, 03:19 PM
cecilia_2004 cecilia_2004 is offline
Contributing User
Dev Shed Newbie (0 - 499 posts)
  
Join Date: Feb 2004
Posts: 249 cecilia_2004 User rank is Corporal (100 - 500 Reputation Level)cecilia_2004 User rank is Corporal (100 - 500 Reputation Level)cecilia_2004 User rank is Corporal (100 - 500 Reputation Level)cecilia_2004 User rank is Corporal (100 - 500 Reputation Level) 
Time spent in forums: 4 Days 1 h 47 m 28 sec
Reputation Power: 7
Hi,

The code below is working. And the code is much shorter.

Thanks,

Cecilia


Code:
<FORM id=form3 name=form1>
Shipping Method: <SELECT NAME="lanuages" onchange='location.href="ShoppingCart.asp?Display=true&ShippingCost="+this.form.lanuages.options[this.form.lanuages.selectedIndex].value + "&CreditCart=" + <%= Request("CreditCart") %>+ "&Category_02_Id=" + <%= Request("Category_02_Id") %>+"&Category_03_Id=" + <%= Request("Category_03_Id") %>+"&Category_04_Id=" + <%= Request("Category_04_Id") %>;'>
<!-- <OPTION SELECTED VALUE="No">Norwegian -->
<%
If Request("ShippingCost") = 1 Then
Response.Write "<option SELECTED value=""" & 1 & """>Ground (Continental U.S. Only) - UPS FREE</option>" 
Else
Response.Write "<option value=""" & 1 & """>Ground (Continental U.S. Only) - UPS FREE</option>"
End If
If Request("ShippingCost") = 15.95 Then
Response.Write "<option SELECTED value=""" & 15.95 & """>Guam, American Samoa - U.S. Postal $15.95</option>" 
Else
Response.Write "<option value=""" & 15.95 & """>Guam, American Samoa - U.S. Postal $15.95</option>"
End If
If Request("ShippingCost") = 15.96 Then
Response.Write "<option SELECTED value=""" & 15.96 & """>U.S. Virgin Islands - U.S. Postal $15.96</option>" 
Else
Response.Write "<option value=""" & 15.96 & """>U.S. Virgin Islands - U.S. Postal $15.96</option>"
End If
If Request("ShippingCost") = 8.95 Then
Response.Write "<option SELECTED value=""" & 8.95 & """>Hawaii, Alaska, Puerto Rico - U.S. Postal $8.95</option>" 
Else
Response.Write "<option value=""" & 8.95 & """>Hawaii, Alaska, Puerto Rico - U.S. Postal $8.95</option>"
End If
If Request("ShippingCost") = 25.95 Then
Response.Write "<option SELECTED value=""" & 25.95 & """>Hawaii, Alaska, Puerto Rico - UPS $25.95</option>" 
Else
Response.Write "<option value=""" & 25.95 & """>Hawaii, Alaska, Puerto Rico - UPS $25.95</option>"
End If
If Request("ShippingCost") = 20.95 Then
Response.Write "<option SELECTED value=""" & 20.95 & """>Canada, Mexico - U.S. Postal - $20.95</option>" 
Else
Response.Write "<option value=""" & 20.95 & """>Canada, Mexico - U.S. Postal - $20.95</option>" 
End If
If Request("ShippingCost") = 59.95 Then
Response.Write "<option SELECTED value=""" & 59.95 & """>Canada, Mexico - UPS - $59.95</option>" 
Else
Response.Write "<option value=""" & 59.95 & """>Canada, Mexico - UPS - $59.95</option>"
End If
If Request("ShippingCost") = 25.96 Then
Response.Write "<option SELECTED value=""" & 25.96 & """>International (1-5 pair) - U.S. Postal $25.96</option>" 
Else
Response.Write "<option value=""" & 25.96 & """>International (1-5 pair) - U.S. Postal $25.96</option>" 
End If
If Request("ShippingCost") = 49.95 Then
Response.Write "<option SELECTED value=""" & 49.95 & """>International (6-10 pair) - U.S. Postal $49.95</option>" 
Else
Response.Write "<option value=""" & 49.95 & """>International (6-10 pair) - U.S. Postal $49.95</option>" 
End If
If Request("ShippingCost") = 159.95 Then
Response.Write "<option SELECTED value=""" & 159.95 & """>International (over 10 pair) - U.S. Postal $159.95 </option>" 
Else
Response.Write "<option value=""" & 159.95 & """>International (over 10 pair) - U.S. Postal $159.95 </option>" 
End If
If Request("ShippingCost") = 2 Then
Response.Write "<option SELECTED value=""" & 2 & """>PO BOX/ APO - U.S. Postal only - FREE</option>"
Else
Response.Write "<option value=""" & 2 & """>PO BOX/ APO - U.S. Postal only - FREE</option>"
End If
%>


</SELECT>
</FORM>
Reply With Quote
Reply

Viewing: Dev Shed Forums > Programming Languages - More > ASP Programming > If possible, then please re-write my code. Thanks!

« Previous Thread | Next Thread »

Thread Tools  Search this Thread 
Search this Thread:

Advanced Search
Display Modes  Rate This Thread 
Linear Mode Linear Mode
Rate This Thread:


Posting Rules
You may not post new threads
You may not post replies
You may not post attachments
You may not edit your posts
vB code is On
Smilies are On
[IMG] code is On
HTML code is Off
View Your Warnings | New Posts | Latest News | Latest Threads | Shoutbox
Forum Jump




 Free IT White Papers!
 
How to Present Effectively Online
This white paper offers practical and actionable advice on the key steps that any presenter should consider as they plan and execute a Webinar or online meeting.
 
Open Source Security Myths
Open Source Software (OSS) is computer software whose source code is available to the general public with relaxed or non-existent intellectual property restrictions (or arrangement such as the public domain), and is usually developed with the input of many contributors.
 
Power and Cooling Capacity Management for Data Centers
This paper describes the principles for achieving power and cooling capacity management.
 
Scalable, Fault-Tolerant NAS for Oracle - The Next Generation
For several years NAS has been evolving as a storage alternative for Oracle databases, and for good reason: NAS is quite often the simplest, most cost-effective storage approach for Oracle. Learn about the benefits that HP's approach to scalable NAS brings to Oracle environments in this comprehensive white paper.
 
Understanding Web Application Security Challenges
This white paper discusses many common threats and preventive measures for Web application security, and explains what you can do to help protect your organization.
 

Forums: » Register « |  User CP |  Games |  Calendar |  Members |  FAQs |  Sitemap |  Support | 
  
 




© 2003-2009 by Developer Shed. All rights reserved. DS Cluster 5 Hosted by Hostway. 
Stay green...Green IT