|
Panhandler
Average Member
USA
783 Posts |
 Posted - 03 January 2004 : 16:33:26
|
Users with Norton Internet Security and certain firewalls can't get past the Policy.asp page.
When they hit the "Agree" button, they get looped back to the Policy.asp page.
The work-around that was previously given in these forums no longer works.
This is what use to work:
Three files required modification:
1) inc_func_common.asp
2) policy.asp
3) register.asp
The old modifications looked like this (excerpted):
1) inc_func_common.asp
Starting around line 40:
<%
'##############################################
'## Register Looping Mod
'##############################################
function GetReferer()
Dim strReferer
strReferer = lcase(Request.ServerVariables("HTTP_REFERER"))
if strReferer = "" then
strReferer = "default.asp"
elseif (Left(strReferer, len(strForumURL)) <> lcase(strForumURL)) then
strReferer = "default.asp"
end if
GetReferer = strReferer
end function
sub CheckReferer(strMatchReferer, strRedirectTo)
dim strReferer
strReferer = lcase(Request.ServerVariables("HTTP_REFERER"))
if InStr(strReferer, lcase(strMatchReferer)) = 0 then
if Instr(lcase(Request.Form("REFERER_PATH")), lcase(strMatchReferer)) = 0 then
Response.Redirect(strRedirectTo)
Response.End
end if
end if
end sub
'############# End Register Mod #############################
'##############################################
'## Post Formatting ##
'##############################################
function chkQuoteOk(fString)
2) policy.asp
Starting around line 104
" <form action=""register.asp?mode=Register"" id=""form1"" method=""post"" name=""form1"">"
'#########################################
'## Register Looping Mod ##
'#########################################
'## Comment out next line
'## " <input name=""Refer"" type=""hidden"" value=""" & Request.ServerVariables("HTTP_REFERER") & """>" & vbNewLine & _
'## Insert next three lines
Response.Write vbNewLine & _
"<input name=""Refer"" type=""hidden"" value=""" & GetReferer() & """>" & vbNewLine & _
"<input name=""REFERER_PATH"" type=""hidden"" value=""" & strScriptName & """>"
'####### End Looping Mod ################
Response.Write vbNewLine & _
" <input name=""Submit"" type=""Submit"" value=""Agree"">" & vbNewLine & _
3) register.asp
Starting around line 55"
if strProhibitNewMembers <> "1" then
if Request.QueryString("mode") <> "DoIt" and Request.QueryString("actkey") = "" then
'#######################################
'## Registering Looping Mod ##
'#######################################
'## Comment out the next three lines:
'## if InStr(Request.ServerVariables("HTTP_REFERER"), "policy.asp") = 0 then
'## Response.Redirect("policy.asp")
'## end if
'## Insert two lines:
Rem - Argument1 = Path to Match, Argument2 = Redirect Path
Call CheckReferer("policy.asp", "default.asp")
'#### End Mod #####
if strAuthType = "nt" and ChkAccountReg = "1" then
Response.Write " <p align=""center""><font face=""" & strDefaultFontFace & """ size=""" & strDefaultFontSize & """><b>Registration for this account is not necessary.</b></font></p>" & vbNewLine & _
" <table align=""center"">" & vbNewLine & _
The above code worked in Snitz 3.4.03
I've included a little of the code before the mods for reference.
Believe me, I don't have a clue to what any of it means.
I simply carefully followed the instructions provided here in the Snitz Community and it worked.
Now it doesn't.
I need help getting it to work again. Can anyone help?
Thanks,
|
"5-in-1 Snitz Common Expansion Pack" - five popular mods packaged for easy install
". . .on a mote of dust, suspended in a sunbeam. . ."
HarborClassifieds
Support Snitz Forums
|
Edited by - ruirib on 03 January 2004 17:29:11 |
|
Topic Locked
