<%
plan_id = ""& Request.QueryString("plan_id")
if isnumeric(plan_id) = false then Response.Redirect("webhosting.htm")
ordernumber = 1 'Take from db later
select case plan_id
case 1
orderstring = "Windows Platinum Web Hosting"
transactionamount = 10.99
case 2
orderstring = "Unix Platinum Web Hosting"
transactionamount = 9.95
case 3
orderstring = "Unix Gold Hosting"
transactionamount = 8.95
case 4
orderstring = "Windows Gold Hosting"
transactionamount = 7.95
case else
Response.Redirect("webhosting.htm")
end select
%>
::SERVER SHORE:: Order Form|
