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 / Classic ASP versions(v3.4.XX)
 Add a link to our website in the footer		  New Topic  Topic Locked
 Printer Friendly
Author Previous Topic Topic Next Topic  

wei zou
Starting Member

2 Posts
Posted - 16 February 2005 :  04:34:57  Show Profile
I want to add a link to our website in the left hand side of the footer (the snitz logo and link is in the right hand side of the footer). I have edited the inc_footer.asp as follows:
Then I upload it to the server but nothing happens. Could someone point out what I should do? Thanks a lot!
'this add a link to our website
'Response.Write " <td align=""left""><font face=""" & strDefaultFontFace & """ size=""" & strFooterFontSize & """>"
'Response.Write "<a href=""http://www.wm***.com"" target=""_blank"" tabindex=""-1""><acronym title=""Go to our Home Page"">"
'Response.Write "http://www.wm***.com"
'Response.Write "</acronym></a></font></td>" & vbNewline


Response.Write " <td align=""right""><font face=""" & strDefaultFontFace & """ size=""" & strFooterFontSize & """>"


'## START - REMOVAL, MODIFICATION OR CIRCUMVENTING THIS CODE WILL VIOLATE THE SNITZ FORUMS 2000 LICENSE AGREEMENT
Response.Write "<a href=""http://forum.snitz.com"" target=""_blank"" tabindex=""-1""><acronym title=""By: " & strVersion & """>"
if strShowImagePoweredBy = "1" then
Response.Write getCurrentIcon("logo_powered_by.gif||","Powered By: " & strVersion,"")
else
Response.Write "Snitz Forums 2000"
end if
Response.Write "</acronym></a></font></td>" & vbNewline
'## END - REMOVAL, MODIFICATION OR CIRCUMVENTING THIS CODE WILL VIOLATE THE SNITZ FORUMS 2000 LICENSE AGREEMENT
Edited by - wei zou on 16 February 2005 04:39:19

TStewartFan
Junior Member

190 Posts
Posted - 16 February 2005 :  05:47:33  Show Profile  Visit TStewartFan's Homepage
Unlike the Snitz footer, you are not using an if else statement so be sure to add this & vbNewline after every line. Also remove the comment out marking in front of response.write. Each line should start like this: Response.write " and NOT 'Response.write"
If You Have to Ask, You Wouldn't Understand.
Go to Top of Page

wei zou
Starting Member

2 Posts
Posted - 02 March 2005 :  10:46:34  Show Profile
Yes, I commented it out because it didn't work.
After I add the & vbNewline after each line, it still didn't work.
Anyone has the code that works? Thanks!
Go to Top of Page

Classicmotorcycling
Development Team Leader

Australia
2085 Posts
Posted - 03 March 2005 :  00:04:49  Show Profile
In inc_footer.asp look for this:
		"  <tr valign=""top"">" & vbNewLine
if strShowTimer = "1" then
	Response.Write	"    <td align=""left""><font face=""" & strDefaultFontFace & """ size=""" & strFooterFontSize & """>" & chkString(replace(strTimerPhrase, "[TIMER]", abs(round(StopTimer(1), 2)), 1, -1, 1),"display") & "</font></td>" & vbNewLine
end if
Response.Write	"    <td align=""right""><font face=""" & strDefaultFontFace & """ size=""" & strFooterFontSize & """>"

'## START - REMOVAL, MODIFICATION OR CIRCUMVENTING THIS CODE WILL VIOLATE THE SNITZ FORUMS 2000 LICENSE AGREEMENT
Response.Write	"<a href=""http://forum.snitz.com"" target=""_blank"" tabindex=""-1""><acronym title=""Powered By: " & strVersion & """>"
if strShowImagePoweredBy = "1" then 
	Response.Write	getCurrentIcon("logo_powered_by.gif||","Powered By: " & strVersion,"")
else
	Response.Write	"Snitz Forums 2000"
end if
Response.Write	"</acronym></a></font></td>" & vbNewline
'## END   - REMOVAL, MODIFICATION OR CIRCUMVENTING THIS CODE WILL VIOLATE THE SNITZ FORUMS 2000 LICENSE AGREEMENT
Now change it to this:
		"  <tr>" & vbNewLine & _
		"	<td width=""100%"" valign=""left"">" & vbNewLine & _
		"		<a href=""http://www.(your website).com"" target=""_blank"" tabindex=""-1""><acronym title=""Go to our Home Page"">http://www.(your website).com</acronym></a></font>" & vbNewline & _
		"	</td>" & vbNewLine & _
		"  </tr>" & vbNewLine & _
		"  <tr valign=""top"">" & vbNewLine
if strShowTimer = "1" then
	Response.Write	"    <td align=""left""><font face=""" & strDefaultFontFace & """ size=""" & strFooterFontSize & """>" & chkString(replace(strTimerPhrase, "[TIMER]", abs(round(StopTimer(1), 2)), 1, -1, 1),"display") & "</font></td>" & vbNewLine
end if
Response.Write	"    <td align=""right""><font face=""" & strDefaultFontFace & """ size=""" & strFooterFontSize & """>"

'## START - REMOVAL, MODIFICATION OR CIRCUMVENTING THIS CODE WILL VIOLATE THE SNITZ FORUMS 2000 LICENSE AGREEMENT
Response.Write	"<a href=""http://forum.snitz.com"" target=""_blank"" tabindex=""-1""><acronym title=""Powered By: " & strVersion & """>"
if strShowImagePoweredBy = "1" then 
	Response.Write	getCurrentIcon("logo_powered_by.gif||","Powered By: " & strVersion,"")
else
	Response.Write	"Snitz Forums 2000"
end if
Response.Write	"</acronym></a></font></td>" & vbNewline
'## END   - REMOVAL, MODIFICATION OR CIRCUMVENTING THIS CODE WILL VIOLATE THE SNITZ FORUMS 2000 LICENSE AGREEMENT
I hope that helps you... Also do not forget to change the (your website) to suit your domain.
Cheers,

David Greening
Go to Top of Page
  Previous Topic Topic Next Topic  
 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.37 seconds. Powered By: Snitz Forums 2000 Version 3.4.07