Snitz Forums 2000
Snitz Forums 2000
Home | Profile | Register | Active Topics | Members | Search | FAQ
Username:
 Password:
Save Password
Forgot your Password?

 All Forums
 Help Groups for Snitz Forums 2000 Users
 Help: General / Previous versions
 Load order in topic		  New Topic  Topic Locked
 Printer Friendly
Previous Page
Author Previous Topic Topic Next Topic
Page: of 2

MDGamezz
Junior Member

USA
100 Posts
Posted - 04 September 2006 :  11:22:47  Show Profile  Send MDGamezz an AOL message  Send MDGamezz an ICQ Message
Regardless if I'm logged in or not. The pages load correctly for me as well.
MDGamezz
Go to Top of Page

i011877
Junior Member

Denmark
169 Posts
Posted - 04 September 2006 :  11:46:20  Show Profile  Visit i011877's Homepage
Hmm okay thanks!

I give up...
(But i swear that it loads different for me)

Edited by - i011877 on 04 September 2006 11:50:04
Go to Top of Page

i011877
Junior Member

Denmark
169 Posts
Posted - 06 September 2006 :  08:58:44  Show Profile  Visit i011877's Homepage
HA! Located the error to 'Quick Reply'!
When a topic is locked the quick reply does not show, and the page loads normally.

The error occours even with the original Sub QuickReply() function, and my own

Disabled the quick reply option, and all loads OK!

From topic.asp
This the original Snitz code before it calls quick reply:
		call AdminOptions()
		Response.Write	"</td>" & vbNewLine
	else
        	Response.Write	"                <td align=""right"" bgcolor=""" & strHeadCellColor & """ nowrap><font face=""" & strDefaultFontFace & """ size=""" & strDefaultFontSize & """> </font></td>" & vbNewLine
	end if
	Response.Write	"              </tr>" & vbNewLine & _
			"            </table>" & vbNewLine & _
			"          </td>" & vbNewLine & _
			"        </tr>" & vbNewLine & _
			"      </table>" & vbNewLine & _
			"    </td>" & vbNewLine & _
			"  </tr>" & vbNewLine & _
			"</table>" & vbNewLine
	if maxpages > 1 then
		Response.Write	"<table align=""center"" border=""0"" cellPadding=""0"" cellSpacing=""1"" width=""95%"">" & vbNewLine & _
				"  <tr>" & vbNewLine & _
				"    <td align=""left"" valign=""top""><font face=""" & strDefaultFontFace & """ size=""" & strFooterFontSize & """>"
		if mypage > 1 then Response.Write("<a href=""topic.asp?" & ArchiveLink & "TOPIC_ID=" & Topic_ID & "&whichpage=" & mypage-1 & SearchLink & """ title=""Goto the Previous page in this Topic""" & dWStatus("Goto the Previous page in this Topic") & ">Previous Page</a>")
		'if mypage > 1 then Response.Write("<a href=""javascript: onclick=document.PageNum1.whichpage.value=" & mypage-1 & ";document.PageNum1.submit();"" title=""Goto the Previous page in this Topic""" & dWStatus("Goto the Previous page in this Topic") & ">Previous Page</a>")
		if mypage > 1 and mypage < maxpages then Response.Write(" | ")
		if mypage < maxpages then Response.Write("<a href=""topic.asp?" & ArchiveLink & "TOPIC_ID=" & Topic_ID & "&whichpage=" & mypage+1 & SearchLink & """ title=""Goto the Next page in this Topic""" & dWStatus("Goto the Next page in this Topic") & ">Next Page</a>")
		'if mypage < maxpages then Response.Write("<a href=""javascript: onclick=document.PageNum1.whichpage.value=" & mypage+1 & ";document.PageNum1.submit();"" title=""Goto the Next page in this Topic""" & dWStatus("Goto the Next page in this Topic") & ">Next Page</a>")
		Response.Write	"</td>" & vbNewLine & _
			"  </tr>" & vbNewLine & _
			"</table>" & vbNewLine
	end if
	Response.Write	"<table align=""center"" border=""0"" cellPadding=""0"" cellSpacing=""0"" width=""95%"">" & vbNewLine & _
			"  <tr>" & vbNewLine & _
			"    <td>" & vbNewLine & _
			"      <table width=""100%"">" & vbNewLine & _
			"        <tr>" & vbNewLine & _
			"          <td align=""center"" valign=""top"" width=""50%"">" & vbNewLine
	Call PostingOptions()
	Response.Write	"</td>" & vbNewLine & _
			"          <td align=""right"" valign=""top"" width=""50%"" nowrap>" & vbNewLine
%>
	<!--#INCLUDE FILE="inc_jump_to.asp" -->
<%
	Response.Write	"          </td>" & vbNewLine & _
			"        </tr>" & vbNewLine & _
			"      </table>" & vbNewLine

	if strShowQuickReply = "1" and strDBNTUserName <> "" and ((Cat_Status = 1) and (Forum_Status = 1) and (Topic_Status = 1)) and ArchiveView = "" then
		call QuickReply()
	end if

        WriteFooter
end if


And this is mine:
		call AdminOptions()
		Response.Write	"</td>" & vbNewLine
	else
        	Response.Write	"                <td align=""right"" bgcolor=""" & strHeadCellColor & """ nowrap><font face=""" & strDefaultFontFace & """ size=""" & strDefaultFontSize & """> </font></td>" & vbNewLine
	end if

	Response.Write	"              </tr>" & vbNewLine & _
			"            </table>" & vbNewLine & _
			"          </td>" & vbNewLine & _
			"        </tr>" & vbNewLine & _
			"      </table>" & vbNewLine & _
			"    </td>" & vbNewLine & _
			"  </tr>" & vbNewLine & _
			"</table>" & vbNewLine
			
	Response.Write	"      <table width=""98%"" align=""center"" valign=""top"" bgcolor=""" & strTableBorderColor & """  border=""0"" cellspacing=""1"" cellpadding=""4"">" & vbNewLine & _
			"        <tr>" & vbNewLine & _
			"          <td align=""center"" width=""100%""  bgcolor=""" & strCategoryCellColor & """>" & vbNewLine
Call PostingOptions()

	Response.Write	"          </td>" & vbNewLine & _
			"        </tr>" & vbNewLine & _
			"      </table>" & vbNewLine
			
	if maxpages > 1 then
		Response.Write	"<table align=""center"" border=""0"" cellPadding=""0"" cellSpacing=""1"" width=""100%"">" & vbNewLine & _
				"  <tr>" & vbNewLine & _
				"    <td align=""left"" valign=""top""><font face=""" & strDefaultFontFace & """ size=""" & strFooterFontSize & """>"
		if mypage > 1 then Response.Write("<a href=""topic.asp?" & ArchiveLink & "TOPIC_ID=" & Topic_ID & "&whichpage=" & mypage-1 & SearchLink & """ title=""Gå til forrige side i dette emne""" & dWStatus("Gå til forrige side i dette emne") & "> Forrige side</a>")
		'if mypage > 1 then Response.Write("<a href=""javascript: onclick=document.PageNum1.whichpage.value=" & mypage-1 & ";document.PageNum1.submit();"" title=""Gå til forrige side i dette emne""" & dWStatus("Gå til forrige side i dette emne") & ">Forrige side</a>")
		if mypage > 1 and mypage < maxpages then Response.Write(" | ")
		if mypage < maxpages then Response.Write("<a href=""topic.asp?" & ArchiveLink & "TOPIC_ID=" & Topic_ID & "&whichpage=" & mypage+1 & SearchLink & """ title=""Gå til næste side i dette emne""" & dWStatus("Gå til næste side i dette emne") & ">Næste side</a>")
		'if mypage < maxpages then Response.Write("<a href=""javascript: onclick=document.PageNum1.whichpage.value=" & mypage+1 & ";document.PageNum1.submit();"" title=""Gå til næste side i dette emne""" & dWStatus("Gå til næste side i dette emne") & ">Næste side</a>")
		Response.Write	"</td>" & vbNewLine & _
			"  </tr>" & vbNewLine & _
			"</table>" & vbNewLine
	end if
	
	Response.Write	"<table align=""center"" border=""0"" cellPadding=""0"" cellSpacing=""0"" width=""100%"">" & vbNewLine & _
			"  <tr>" & vbNewLine & _
			"    <td>" & vbNewLine & _
			"      <table width=""100%"">" & vbNewLine & _
			"        <tr>" & vbNewLine & _
			"          <td align=""center"" valign=""top"" width=""100%"" nowrap>" & vbNewLine
%><!--#INCLUDE FILE="inc_jump_to.asp" --><%
	Response.Write	"          </td>" & vbNewLine & _
			"        </tr>" & vbNewLine & _
			"      </table>" & vbNewLine
	if strShowQuickReply = "1" and strDBNTUserName <> "" and ((Cat_Status = 1) and (Forum_Status = 1) and (Topic_Status = 1)) and ArchiveView = "" then
		call QuickReply()
	end if

        WriteFooter
end if


So the loading order is ok without Quick reply. No sh!t.

Turned it into the fastest forum on the planet, hahahaha!
(Well maybe not)

-or did I run out of help on this topic

Edited by - i011877 on 06 September 2006 09:00:21
Go to Top of Page

HuwR
Forum Admin

United Kingdom
20584 Posts
Posted - 06 September 2006 :  09:58:03  Show Profile  Visit HuwR's Homepage
As discussed previously nobody else appears to have this problem but you.
Go to Top of Page

i011877
Junior Member

Denmark
169 Posts
Posted - 06 September 2006 :  13:11:02  Show Profile  Visit i011877's Homepage
Weird that it isn't visible to you.
Some of my members tested my issue with a positive result.
Even my girlfriend noticed how the unlocked page loaded different, and that says it all!
Well, removed Quick Reply for now as mentioned, and will look into it myself.

Thanks anyway for solving most of my other issues.

Go to Top of Page
Page: of 2 Previous Topic Topic Next Topic  
Previous Page
 New Topic  Topic Locked
 Printer Friendly
Jump To:
Snitz Forums 2000 © 2000-2021 Snitz™ Communications Go To Top Of Page
This page was generated in 0.09 seconds. Powered By: Snitz Forums 2000 Version 3.4.07