Bookmark Topics Mod - Snitz™ Forums 2000

The Forum has been Updated

The code has been upgraded to the latest .NET core version. Please check instructions in the Community Announcements about migrating your account.

Bookmark Topics Mod - Postet den 18 Mar 2005 (6982 Views)

withanhdammit

Junior Member

Innlegg: 236

236

This is an update of HuwR's Bookmark Mod. I updated this with a ton of help from HuwR (thanks again, HuwR!)

<edit>Let me know if there are any problems with this. I may not have included all the updates. I'm pretty sure they are all there, but I put the zip together after the fact.</edit>

h

http://www.dnjhome.com/snitz/bookmark.zip<

I reject your reality and substitute my own.

Sist redigert av

Postet den 19 Mar 2005

andretti

New Member

Innlegg: 70

just downloaded your zip file above and

1 bookmark.zip: Unknown method in bookmark.asp
2 bookmark.zip: Unknown method in bookmark.dbs
3 bookmark.zip: Unknown method in icon_bookmark.gif
4 bookmark.zip: Unknown method in readme.txt
5 bookmark.zip: No files to extract

Or
Extracting to "C:\Documents and Settings\server\Desktop\New Folder\"
Use Path: yes Overlay Files: no
skipping: bookmark.asp: this file is not in the standard Zip 2.0 format
Please see www.winzip.com/zip20.htm for more information
skipping: bookmark.dbs: this file is not in the standard Zip 2.0 format
Please see www.winzip.com/zip20.htm for more information
skipping: icon_bookmark.gif: this file is not in the standard Zip 2.0 format
Please see www.winzip.com/zip20.htm for more information
skipping: readme.txt: this file is not in the standard Zip 2.0 format
Please see www.winzip.com/zip20.htm for more information
error: no files were found - nothing to do

is the error when I open it ...
Just thought you would want to know<

Postet den 19 Mar 2005

masterao

Senior Member

Innlegg: 1678

1678

I have no problems opening it up with winrar, although I get the same error using win xp's built-in unzip feature. Andretti, try unzipping it with with winzip or winrar, and you will not get any errors at all.<

Jan
===========
FR Portal Forums | Active Users 4.0.20 Mod

Postet den 19 Mar 2005

andretti

New Member

Innlegg: 70

The first set of error message did come from winrar and the second set came from winzip<

Postet den 19 Mar 2005

masterao

Senior Member

Innlegg: 1678

1678

Oops

.
I didn't try to extract the files the first time, I just viewed them. Now I tried to unzip them and true, I got the same error with winrar that you did. However, I could unzip them with Total Commander and with winzip, though.<

Jan
===========
FR Portal Forums | Active Users 4.0.20 Mod

Sist redigert av

Postet den 19 Mar 2005

withanhdammit

Junior Member

Innlegg: 236

236

OK, I rezipped it. I use WinZip 9.0 and had no problems unzipping it. I know that depending on the amount of compression you pick, it may not be compatible with previous versions. So I rezipped it using "normal" compression. Let me know if you still have any problems.
h<

I reject your reality and substitute my own.

Postet den 20 Mar 2005

withanhdammit

Junior Member

Innlegg: 236

236

Find this code:

Code:


		if lcase(strEmail) = "1" and Topic_Status < 2 then 
			if Cat_Status <> 0 and Forum_Status <> 0 and Topic_Status <> 0 and mLev > 0 then
				if strSubscription > 0 and Cat_Subscription > 0 and Forum_Subscription > 0 then
					if InArray(strTopicSubs, Topic_ID) then
						Response.Write "          <br />" & ShowSubLink ("U", Cat_ID, Forum_ID, Topic_ID, "Y") & vbNewLine
					elseif strBoardSubs <> "Y" and not(InArray(strForumSubs,Forum_ID) or InArray(strCatSubs,Cat_ID)) then
						Response.Write "          <br />" & ShowSubLink ("S", Cat_ID, Forum_ID, Topic_ID, "Y") & vbNewLine
					end if
				end if
			end if
			if ((mlev <> 0) or (mlev = 0 and strLogonForMail <> "1")) and lcase(strShowSendToFriend) = "1" then
				Response.Write	"          <br /><a href=""JavaScript:openWindow('pop_send_to_friend.asp?url=" & strForumURL & "topic.asp?TOPIC_ID=" & Topic_ID & "')"">" & getCurrentIcon(strIconSendTopic,"Send this post to a friend","align=""absmiddle""") & "</a> <a href=""JavaScript:openWindow('pop_send_to_friend.asp?url=" & strForumURL & "topic.asp?TOPIC_ID=" & Topic_ID & "')"">Send this Post to a Friend</a>" & vbNewLine
			end if 
		end if

And insert this after it:

Code:

		Response.Write	"	   <br /><a href=bookmark.asp?mode=add&topic_id=" & Topic_ID & ">" & getCurrentIcon(strIconBookmark,"Bookmark this post","align=""absmiddle""") & "</a> <a href=bookmark.asp?mode=add&topic_id=" & Topic_ID & ">Bookmark This Topic</a>" & vbNewLine

I updated the line to show the bookmark icon.<

I reject your reality and substitute my own.