Suggestion Box forum - Postet den (1542 Views)
muzishun
Senior Member
muzishun
Innlegg: 1079
1079
I remember reading requests for this, and it has been on my list of things to do for quite awhile. I'm happy to say that version 0.5b is ready for testing.
Download from SnitzBitz.
From the readme:
This MOD adds a new Authorization Type for forums. The new type allows all members to see and post in a hidden forum. Their identity is obscured from view, allowing these forums to be a place where users can speak about issues that may be sensitive or controversial. Users must still be logged into your forum in order to post in these anonymous forums.

Enjoy.<
Bill Parrott
Senior Web Programmer, University of Kansas
Co-Owner and Code Monkey, Eternal Second Designs (www.eternalsecond.com)
Personal Website (www.chimericdream.com)
   
 Sidestørrelse 
Postet den
MarkJH
Senior Member
MarkJH
Innlegg: 1722
1722
Ooh, controversial!
Does this MOD deal with the Active Users MOD? Can the admin see who has posted what?<
Bandlink.net - http://www.bandlink.net/
Bandlink Music Forums - http://www.bandlink.net/forum/
Postet den
muzishun
Senior Member
muzishun
Innlegg: 1079
1079
There is no integration with the AU MOD, but it shouldn't be hard to add the code in for that. As for the admin being able to see who posted, I did add that as an option, but the code to do so is optional in the readme. So if a particular forum owner doesn't want to add that in, they can. Of course, the admin can always open the database directly, but that takes a bit more effort.<
Bill Parrott
Senior Web Programmer, University of Kansas
Co-Owner and Code Monkey, Eternal Second Designs (www.eternalsecond.com)
Personal Website (www.chimericdream.com)
Postet den
JJenson
Advanced Member
JJenson
Innlegg: 2121
2121
Great thanks this is perfect<
Postet den
muzishun
Senior Member
muzishun
Innlegg: 1079
1079
Sure thing. Glad you like it. smile<
Bill Parrott
Senior Web Programmer, University of Kansas
Co-Owner and Code Monkey, Eternal Second Designs (www.eternalsecond.com)
Personal Website (www.chimericdream.com)
Postet den
CodeMan7
New Member
CodeMan7
Innlegg: 88
88
muzishun,

Nice mod. I noticed that if a user edits their post, the post will have "Edited by - [users name]". Also, if a user has their profile signature checked, it will add that.
The profile signature is not that big of a deal but I can see that editing could be a problem. Any suggestions on that?
Thanks.
Update: I made several changes in Topics.asp and it seems to work now. It shows "Edited by Anonymous on ..." And when the Adminstrator logs in and clicks to see who posted what, the "anonymous" part changes to the user's name.
That looks like the only change I need to make unless you can think of others.

<
Sist redigert av
Postet den
muzishun
Senior Member
muzishun
Innlegg: 1079
1079
I think I may have missed the signature part. I will see if I have the time this weekend to take that part out of the posts. Would you mind sharing your code for the "Edited by Anonymous on..." bit? It'd save me from rewriting it.
I plan to bump this closer to 1.0, so as I'm doing that, I will incorporate these. Thanks for the comments and suggestion.<
Bill Parrott
Senior Web Programmer, University of Kansas
Co-Owner and Code Monkey, Eternal Second Designs (www.eternalsecond.com)
Personal Website (www.chimericdream.com)
Postet den
CodeMan7
New Member
CodeMan7
Innlegg: 88
88
Sure, no problem.
The first edit is around line 948 in my Topic.asp file.
Code:

	if strEditedByDate = "1" and Reply_LastEditBy <> "" then
				if Reply_LastEditBy <> Reply_Author then
					Reply_LastEditByName = getMemberName(Reply_LastEditBy)
				else
					Reply_LastEditByName = chkString(Reply_MemberName,"display")
				end if
				Response.Write	"                    <tr>" & vbNewLine & _
						"                      <td valign=""bottom""><hr noshade size=""" & strFooterFontSize & """ color=""" & CColor & """><font face=""" & strDefaultFontFace & """ size=""" & strFooterFontSize & """ color=""" & strForumFontColor & """>"
						if not(isSuggestionBox) then
						   Response.Write "Edited by - " & Reply_LastEditByName & " on " & chkDate(Reply_LastEdit, " " ,true) & "</font></td>" & vbNewLine
						else
							 Response.Write "Edited by - Anonymous on " & chkDate(Reply_LastEdit, " " ,true) & "</font></td>" & vbNewLine
						end if


The second edit is around line 1456 in my Topic.asp file.
Code:

if strEditedByDate = "1" and Topic_LastEditBy <> "" then
		if Topic_LastEditBy <> Topic_Author then
			Topic_LastEditByName = getMemberName(Topic_LastEditBy)
		else
			Topic_LastEditByName = chkString(Member_Name,"display")
		end if
		Response.Write	"                    <tr>" & vbNewLine & _
				"                      <td valign=""bottom""><hr noshade size=""" & strFooterFontSize & """ color=""" & strForumFirstCellColor & """><font face=""" & strDefaultFontFace & """ size=""" & strFooterFontSize & """ color=""" & strForumFontColor & """>"
		 If Not(isSuggestionBox) Then
		 	 	 Response.Write		"Edited by - " & Topic_LastEditByName & " on " & chkDate(Topic_LastEdit, " ", true) & "</font></td>" & vbNewLine
		 else
				 Response.Write "Edited by - Anonymous on " & chkDate(Topic_LastEdit, " " ,true) & "</font></td>" & vbNewLine
		 end if
			 Response.Write	"                    </tr>" & vbNewLine
	end if


Here is one other edit. I noticed that if the user is the sysadmin, every post in other forums will have the "View this topic with user information displayed."

With this edit the message will only show up in forums where the forum type is Suggestion Box. It won't show up in the other forums.

This edit is around line 669 in my Topic.asp file.
Code:

 if overrideSuggestionBox <> 0 and isSuggestionBox then
		Response.write	"<br /><a href=""topic.asp?whichpage=" & mypage & SearchLink & ArchiveLink & "&TOPIC_ID=" & TOPIC_ID & "&showID="
		if overrideSuggestionBox = 1 then
			response.write	"true"
		else
			response.write	"false"
		end if
		response.write	"""><font face=""" & strDefaultFontFace & """ size=""" & strFooterFontSize & """ color=""" & strHeadFontColor & """>View this topic "
		if overrideSuggestionBox = 1 then
			response.write	"with"
		else
			response.write	"without"
		end if
		response.write	" user information displayed.</font></a>" & vbNewline
	end if

As you can see, all you need to do is add "and isSuggestionBox" to the first line. To make the users show up as anonymous again just click on another topic in the suggestion box forum.
Hope that helps.
Codeman

<
Postet den
muzishun
Senior Member
muzishun
Innlegg: 1079
1079
Fantastic, thanks. When I get some time, hopefully this weekend as I said, I'll add these in with the next round of updates.<
Bill Parrott
Senior Web Programmer, University of Kansas
Co-Owner and Code Monkey, Eternal Second Designs (www.eternalsecond.com)
Personal Website (www.chimericdream.com)
Postet den
CodeMan7
New Member
CodeMan7
Innlegg: 88
88
muzishun,

Have you checked out what happens when a user replies to a topic or uses quote to reply to a post?
It looks like all of the identities of the posters are displayed. I made some changes and the posters' names are all changed to "Anonymous" when someone uses quote to reply. I haven't worked out the reply to topic yet.
Let me know if you get the same behavior and I'll see if I can't correct the rest of it.
Codeman<
Postet den
muzishun
Senior Member
muzishun
Innlegg: 1079
1079
I did make changes with replies and quoted replies. If I get the chance to make the other changes/additions this weekend, I'll double check. But I am about 90% certain that I had added checks for that in the code already.<
Bill Parrott
Senior Web Programmer, University of Kansas
Co-Owner and Code Monkey, Eternal Second Designs (www.eternalsecond.com)
Personal Website (www.chimericdream.com)
Du må legge inn en melding