响应重定向上一页经典asp

时间:2014-06-04 21:41:46

标签: vbscript asp-classic response.redirect

如果在引用页面上输入的验证码不正确,我想返回几个可能的页面之一。这就是我正在尝试的,它只是在出现错误时绕过重定向并将它们带到成功页面。如果我放入response.redirect(“somepage.asp”)它没有问题,但我需要它来处理多个页面引用

Call ValidateCAPTCHA()
If m_CAPTCHAPASS<>1 then
Session("ValidCAPTCHA")="false"
Dim redirectpage
redirectpage = Request.ServerVariables("HTTP_REFERER") & "e=1" 
Session("FirstName")=Request.Form("First_Name")
Session("Phone")=Request.Form("Phone")
Session("EMail")=Request.Form("EMail")
Session("Comments")=Request.Form("Comments")
response.redirect(Request.redirectpage)
end if
'send email script follows

1 个答案:

答案 0 :(得分:2)

根据您的评论,为了防止多个参数添加,只需检查参数是否已添加。类似的东西:

Dim redirectpage

redirectpage = Request.ServerVariables("HTTP_REFERER") 
If Right(redirectpage, 4) <> "?e=1" Then redirectpage = redirectpage & "?e=1"
'.... the rest of the code