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: MOD Implementation
 Is there anything wrong this this PM code?		  New Topic  Topic Locked
 Printer Friendly
Author Previous Topic Topic Next Topic  

abercrombie
Starting Member

48 Posts
Posted - 26 December 2002 :  17:21:09  Show Profile
I was jut wondering is there anything wrong with this part of the PM code thats supposed to go in the inc_header.asp ??

' DEM --> End of Code added to show subscriptions if they exist
Response.Write " |" & vbNewline & _
" <a href=""" & strForumURL & "members.asp""" & dWStatus("Current members of these forums...") & " tabindex=""-1""><acronym title=""Current members of these forums..."">Members</acronym></a>" & vbNewline & _
" |" & vbNewline
If strPMStatus = "1" then
Response.Write " <a href=""" & strForumURL & "pm_view.asp""" & dWStatus("Check Your Private Messages...") & " tabindex=""-1""><acronym title=""Check Your Private Messages..."">Private Messages"
if pmcount > 0 then Response.Write "(<font color=""" & strActiveLinkColor & """><b>" & pmcount & " New</b></font>)"
Response.Write "</acronym></a>" & vbNewline & _
" |" & vbNewline
end if
Response.Write " <a href=""search.asp"

Is that <a href=""search.asp" supposed to be there?

Carefree
Advanced Member

Philippines
4207 Posts
Posted - 26 December 2002 :  17:48:19  Show Profile
Yes. It should look like this:


	Response.Write	"          |" & vbNewline & _
			"          <a href=""" & strForumURL & "members.asp""" & dWStatus("Current members of these forums...") & " tabindex=""-1""><acronym title=""Current members of these forums..."">Members</acronym></a>" & vbNewline & _
			"          |" & vbNewline
			If strPMStatus = "1" then
	Response.Write "          <a href=""" & strForumURL & "pm_view.asp""" & dWStatus("Check Your Private Messages...") & " tabindex=""-1""><acronym title=""Check Your Private Messages..."">Private Messages" 
					if pmcount > 0 then Response.Write "(<font color=""" & strActiveLinkColor & """><b>" & pmcount & " New</b></font>)" end if 
	Response.Write "</acronym></a>" & vbNewline & _
			"          |" & vbNewline
			end if
	Response.Write "          <a href=""search.asp"


The line about the search.asp is included simply to show how it integrates into the original programming.
Edited by - Carefree on 26 December 2002 17:51:17
Go to Top of Page

sirsmiley
New Member

77 Posts
Posted - 29 December 2002 :  06:25:08  Show Profile
Yeah but if there is another one of these: <a href=""search.asp" right after that on the next line, delete the next one. Make it look like this:

Response.Write "</acronym></a>" & vbNewline & _
" |" & vbNewline
end if
Response.Write " <a href=""search.asp"
if Request.QueryString("FORUM_ID") <> "" then Response.Write("?FORUM_ID=" & cLng(Request.QueryString("FORUM_ID")))
Response.Write """" & dWStatus("Perform a search by keyword, date, and/or name...") & " tabindex=""-1""><acronym title=""Perform a search by keyword, date, and/or name..."">Search</acronym></a>" & vbNewline & _
" |" & vbNewline & _
" <a href=""faq.asp""" & dWStatus("Answers to Frequently Asked Questions...") & " tabindex=""-1""><acronym title=""Answers to Frequently Asked Questions..."">FAQ</acronym></a>"
end sub

Basically, there should only be one of these: <a href=""search.asp"
Edited by - sirsmiley on 29 December 2002 06:28:35
Go to Top of Page

abercrombie
Starting Member

48 Posts
Posted - 30 December 2002 :  20:49:13  Show Profile
okay thanks
Go to Top of Page

sirsmiley
New Member

77 Posts
Posted - 31 December 2002 :  05:37:45  Show Profile
Welcome! :) Hope thats what it is and that you get it working.
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.36 seconds. Powered By: Snitz Forums 2000 Version 3.4.07