<%
on error resume next
dim funtmpstr
dim amlogopath,ppReturnPage,ppCancelPage
dim viewcartStr,addtocartStr,showProdDetailStr
amlogopath ="https://www.readysecure1.com/users/doctorsonlinebillingcom/images/amLogo_150x22.gif"
ppReturnPage = "http://www.doctorsonlinebilling.com/success.htm"
ppCancelPage ="http://www.doctorsonlinebilling.com/incomplete.htm"
viewcartStr = "View Cart"
addtoCartStr = "
"
showProdDetailStr = "
"
function sayDBug()
Response.Write "
DEBUG INFO
"
Response.Write "Request.QueryString = "& Request.QueryString & "
"
Response.Write "Request.Form = " & Request.Form & "
"
Response.Write "session('username') = " & session("username") & "
"
Response.Write "session('password') = " & session("password") & "
"
Response.Write "session('theState') = " & session("theState") & "
"
end function
%>