| Author |
 Topic  |
|
ruirib
Snitz Forums Admin
Portugal
26364 Posts |
|
|
Nymus
Starting Member
20 Posts |
 Posted - 11 November 2006 : 16:20:02
|
Thanks.
Would be great.
Support team of my hosting company told me they would have a look at it.
But I haven't heard anything since.
So let's hope your hack works :)
Nymus |
 |
|
|
ruirib
Snitz Forums Admin
Portugal
26364 Posts |
Posted - 11 November 2006 : 16:42:08
|
Find the line in the mod code where you now have:
strRefScriptName = "http://" & Request.ServerVariables("SERVER_NAME") & Request.ServerVariables("PATH_INFO")
Replace it by
scriptname = split(request.servervariables("SCRIPT_NAME"),"/")
strScript = scriptname(ubound(scriptname))
strRefScriptName = "http://forum.myhost.com/" & strScript
See if this fixes your problem. Haven't tried it. If this fails, I don't know what else you can do. Also, I don't know whether this will have any strange side effects, but I don't expect any... |
Snitz 3.4 Readme | Like the support? Support Snitz too |
|
|
|
Nymus
Starting Member
20 Posts |
|
|
ruirib
Snitz Forums Admin
Portugal
26364 Posts |
|
|
Nymus
Starting Member
20 Posts |
Posted - 11 November 2006 : 16:55:57
|
Lets see if i can copy paste.
Its basically the basic refmod inc_header.asp with the changes you told me to apply.
copy paste below
<%
strArchiveTablePrefix = strTablePrefix & "A_"
strScriptName = request.servervariables("script_name")
'############### Referer Mod #############
scriptname = split(request.servervariables("SCRIPT_NAME"),"/")
strScript = scriptname(ubound(scriptname))
strRefScriptName = "http://forum.dierenasiel-leiestreek.be/" & strScript 'added by me
If Len(Request.QueryString) > 0 Then
strRefScriptName = strRefScriptName & "?" & Request.ServerVariables("QUERY_STRING")
End If
If StrComp(Session("CurrentPage"),strRefScriptName)<>0 Then
If (InStr(Session("CurrentPage"),"post_info.asp")=0) and (InStr(Session("CurrentPage"),"post.asp")=0) Then
Session("LastPage") = Session("CurrentPage")
End if
Session("CurrentPage") = chkString(strRefScriptName, "refer")
End If
strReferer = Session("LastPage")
If (InStr(strReferer,"register.asp")<>0) Then
strReferer = "default.asp"
End If
'##########################################
if Application(strCookieURL & "down") then
if not Instr(strScriptName,"admin_") > 0 then
Response.redirect("down.asp")
end if
end if
if strPageBGImageURL = "" then
strTmpPageBGImageURL = ""
elseif Instr(strPageBGImageURL,"/") > 0 or Instr(strPageBGImageURL,"\") > 0 then
strTmpPageBGImageURL = " background=""" & strPageBGImageURL & """"
else
strTmpPageBGImageURL = " background=""" & strImageUrl & strPageBGImageURL & """"
end if
...
%> |
|
|
|
ruirib
Snitz Forums Admin
Portugal
26364 Posts |
Posted - 11 November 2006 : 17:05:04
|
| Well I would need to check the values being assigned to strReferer and strRefScriptName to find out what's happening... Right now not even the registration is working... |
Snitz 3.4 Readme | Like the support? Support Snitz too |
|
|
|
Nymus
Starting Member
20 Posts |
|
|
ruirib
Snitz Forums Admin
Portugal
26364 Posts |
Posted - 11 November 2006 : 17:12:45
|
| Sorry, without some testing I can't do it... Maybe I'm wrong, but the last change should have hardcoded the referer and it should work. Maybe your inc_header.asp is being cached, but I would really need to response.write the values to know. |
Snitz 3.4 Readme | Like the support? Support Snitz too |
|
|
|
Nymus
Starting Member
20 Posts |
Posted - 11 November 2006 : 17:14:01
|
tell me what values your looking for on which pages
and i will response.write them for you so you can have a look.
also if you subscribe to my forum i could be able to give you admin rights so that you can make/change some settings.
Nymus |
|
|
|
ruirib
Snitz Forums Admin
Portugal
26364 Posts |
|
|
Nymus
Starting Member
20 Posts |
Posted - 11 November 2006 : 17:40:59
|
Check
http://www.dierenasiel-leiestreek.be/subdomein/forum/default.asp
Between () you find the line in inc_header on which the write statement is placed.
Hope you can do something with this
below you can find my inc_header.asp with added write statements for you to 'debug'
<%
(...)
strArchiveTablePrefix = strTablePrefix & "A_"
strScriptName = request.servervariables("script_name")
'############### Referer Mod #############
scriptname = split(request.servervariables("SCRIPT_NAME"),"/")
strScript = scriptname(ubound(scriptname))
strRefScriptName = "http://forum.dierenasiel-leiestreek.be/" & strScript 'added by me
If Len(Request.QueryString) > 0 Then
strRefScriptName = strRefScriptName & "?" & Request.ServerVariables("QUERY_STRING")
End If
If StrComp(Session("CurrentPage"),strRefScriptName)<>0 Then
If (InStr(Session("CurrentPage"),"post_info.asp")=0) and (InStr(Session("CurrentPage"),"post.asp")=0) Then
Session("LastPage") = Session("CurrentPage")
End if
response.write("lastpage (79): "&session("lastpage")&"<br>")
Session("CurrentPage") = chkString(strRefScriptName, "refer")
response.write("currentpage (80): "&session("currentpage")&"<br>")
End If
strReferer = Session("LastPage")
response.write("lastpage (83): "&session("lastpage")&"<br>")
If (InStr(strReferer,"register.asp")<>0) Then
strReferer = "default.asp"
End If
response.write("strreferer (88): "&strreferer&"<br>")
'##########################################
if Application(strCookieURL & "down") then
if not Instr(strScriptName,"admin_") > 0 then
Response.redirect("down.asp")
end if
end if
(...)
%>
|
|
|
|
ruirib
Snitz Forums Admin
Portugal
26364 Posts |
|
|
Nymus
Starting Member
20 Posts |
|
|
ruirib
Snitz Forums Admin
Portugal
26364 Posts |
Posted - 12 November 2006 : 07:40:30
|
I'm inclining myself to HuwR's opinion... My last attempt would be to add a compact privacy policy, maybe it would overcome the problem with the cookie creation, which is certainly causing the login issue. If what is happening is that you get a message stating that you logged in and then you're logged out, delete all your cookies, close all browser windows and then try again. If it still doesn't work, try adding the compact privacy policy, as explained here: http://forum.snitz.com/forum/topic.asp?TOPIC_ID=57136#312084
Sorry about the code mistake, you were right. |
Snitz 3.4 Readme | Like the support? Support Snitz too |
|
|
|
Topic |
|
Topic Locked
