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)
 Deleting members
 New Topic  Topic Locked
 Printer Friendly
Previous Page
Author Previous Topic Topic Next Topic
Page: of 2

Andy Humm
Average Member

United Kingdom
908 Posts

Posted - 12 March 2007 :  10:28:33  Show Profile
That is a way to do it, (long winded mind) but you have to close the forum down while the db is edited. Surely an admin mod would allow this editing to be carried while others are enjoying the forum. Having now modified the table direct, any subsequent editing of the profile by the admin online throws up the warning of duplicated usernames. Suggestions or mods?
Go to Top of Page

ruirib
Snitz Forums Admin

Portugal
26364 Posts

Posted - 12 March 2007 :  10:43:59  Show Profile  Send ruirib a Yahoo! Message
A dbs script can be used for that. I'm almost certaing that I've written one in the past... I will try a search.


Snitz 3.4 Readme | Like the support? Support Snitz too
Go to Top of Page

ruirib
Snitz Forums Admin

Portugal
26364 Posts

Posted - 12 March 2007 :  10:50:39  Show Profile  Send ruirib a Yahoo! Message
Paste this into the alternate mod setup and click submit. It will change the name to 'whateverYouWant'.


[UPDATE]
MEMBERS
M_NAME#'whateverYouWant'#M_NAME='n/a'
[END]



Snitz 3.4 Readme | Like the support? Support Snitz too
Go to Top of Page

Andy Humm
Average Member

United Kingdom
908 Posts

Posted - 12 March 2007 :  10:55:25  Show Profile
thanks ruirib, on me way!
Go to Top of Page

Classicmotorcycling
Development Team Leader

Australia
2085 Posts

Posted - 13 March 2007 :  01:29:26  Show Profile
Thanks Shaggy,

That is exactly what I am talking about.
quote:
Originally posted by Shaggy

No, what Dave is talking about is making changes to the forum files themselves to include a check to see if the member's username is n/a and writing "Former Member" instead, without a profile link if it is.


Here is the changes I did to topic.asp (saves running the script each time to change the users name):

Line of 552 topic.asp:
			Response.Write	">" & vbNewLine & _
					"                <p><font face=""" & strDefaultFontFace & """ size=""" & strDefaultFontSize & """><b><span class=""spnMessageText"">" & profileLink(ChkString(Reply_MemberName,"display"),Reply_Author) & "</span></b></font><br />" & vbNewLine
Replace with:
			Response.Write	">" & vbNewLine
				if Reply_MemberName = "n/a" then
			Response.Write	"		 <p><font face=""" & strDefaultFontFace & """ size=""" & strDefaultFontSize & """ color=""" & strSiteBGColor & """><b><span class=""spnMessageText"">Former Member</span></b></font><br />" & vbNewLine
			else
				Response.Write	"                <p><font face=""" & strDefaultFontFace & """ size=""" & strDefaultFontSize & """><b><span class=""spnMessageText"">" & profileLink(ChkString(Reply_MemberName,"display"),Reply_Author) & "</span></b></font><br />" & vbNewLine
			end if

Line 757 of Topic.asp
	Response.Write	">" & vbNewLine & _
			"                <p><font color=""" & strForumFontColor & """ face=""" & strDefaultFontFace & """ size=""" & strDefaultFontSize & """><b><span class=""spnMessageText"">" & profileLink(ChkString(Member_Name,"display"),TMember_ID) & "</span></b></font><br />" & vbNewLine
Replace with:
	Response.Write	">" & vbNewLine
	if Member_Name = "n/a" then
		Response.Write	"		 <p><font face=""" & strDefaultFontFace & """ size=""" & strDefaultFontSize & """ color=""" & strSiteBGColor & """><b><span class=""spnMessageText"">Former Member</span></b></font><br />" & vbNewLine
	else
		Response.Write	"                <p><font face=""" & strDefaultFontFace & """ size=""" & strDefaultFontSize & """><b><span class=""spnMessageText"">" & profileLink(ChkString(Member_Name,"display"),TMember_ID) & "</span></b></font><br />" & vbNewLine
	end if

The line numbers are from a fresh copy of topic.asp in Snitz 3.4.06 (current version).

Cheers,

David Greening
Go to Top of Page

Andy Humm
Average Member

United Kingdom
908 Posts

Posted - 13 March 2007 :  04:20:03  Show Profile
Thats great! and thank you. Just a thought, could we use this suggested code on the forum.asp so that deleted members with 'n/a' displayed in the 'Last Post Column' are altered in the same manner.
Go to Top of Page

Classicmotorcycling
Development Team Leader

Australia
2085 Posts

Posted - 13 March 2007 :  13:08:24  Show Profile
In fresh forum.asp of version 3.4.06, this will change it to read "Former Member":

Line 536:
		Response.Write	"                </td>" & vbNewLine & _
				"                <td bgcolor=""" & strForumCellColor & """ valign=""middle"" align=""center""><font face=""" & strDefaultFontFace & """ size=""" & strDefaultFontSize & """ color=""" & strForumFontColor & """><span class=""spnMessageText"">" & profileLink(chkString(Topic_MName,"display"),Topic_Author) & "</span></font></td>" & vbNewLine & _
Replace with:
		Response.Write	"                </td>" & vbNewLine & _
				"                <td bgcolor=""" & strForumCellColor & """ valign=""middle"" align=""center""><font face=""" & strDefaultFontFace & """ size=""" & strDefaultFontSize & """ color=""" & strForumFontColor & """>" & vbNewLine
			if Topic_MName = "n/a" then
				Response.Write	"Former Member" & vbNewLine
			else
				Response.Write	"<span class=""spnMessageText"">" & profileLink(chkString(Topic_MName,"display"),Topic_Author) & "</span>" & vbNewLine
			end if
		Response.Write	"</font></td>" & vbNewLine & _
Just a matter of finding what you want and changing it. I hope it helps..

Cheers,

David Greening
Go to Top of Page

Andy Humm
Average Member

United Kingdom
908 Posts

Posted - 13 March 2007 :  17:49:39  Show Profile
Classicmotorcycling
Thank you for this coding above. Having amended the forum.asp as suggested, Is there any other part of this file that looks for the last post string, as I have amended the file as kindly provided but when deleting a meber with a last post the meber shows as 'n/a'

This is what I did:

1. Added a test thread by admin anywhere in forum
2. Got a dummy member to add a reply to it
The Last post at 2 was shown on the default.asp forum.asp and topic.asp correctly.
When Admin then deletes the member account
3. The Category Heading on default.asp still shows 'n/a' instead of previous member name or Former Member
4. The last post name of the forum.asp still shows 'n/a'
5. The topic.asp shows deleted member as 'Former Member' (code for the topic.asp works as previously amended)

It would be appreciated if we can identify the coding amendments to default.asp and forum.asp
Thanks again
Andy
Go to Top of Page

Andy Humm
Average Member

United Kingdom
908 Posts

Posted - 13 March 2007 :  18:00:34  Show Profile
Additionlly to last post above - Second thoughts to forum.asp. The surrounding code I have around the suggested alterations are:

Response.Write " </td>" & vbNewLine & _
" <td bgcolor=""" & strForumCellColor & """ valign=""middle"" align=""center""><font face=""" & strDefaultFontFace & """ size=""" & strDefaultFontSize & """ color=""" & strForumFontColor & """>" & vbNewLine
if Topic_MName = "n/a" then
Response.Write "Former Member" & vbNewLine else
Response.Write "<span class=""spnMessageText"">" & profileLink(chkString(Topic_MName,"display"),Topic_Author) & "</span>" & vbNewLine
end if

Response.Write "</font></td>" & vbNewLine & _
" <td bgcolor=""" & strForumCellColor & """ valign=""middle"" align=""center""><font face=""" & strDefaultFontFace & """ size=""" & strDefaultFontSize & """ color=""" & strForumFontColor & """>" & Topic_Replies & "</font></td>" & vbNewLine & _
" <td bgcolor=""" & strForumCellColor & """ valign=""middle"" align=""center""><font face=""" & strDefaultFontFace & """ size=""" & strDefaultFontSize & """ color=""" & strForumFontColor & """>" & Topic_ViewCount & "</font></td>" & vbNewLine
if IsNull(Topic_LastPostAuthor) then
strLastAuthor = ""
else
strLastAuthor = "<br />by: <span class=""spnMessageText"">" & profileLink(ChkString(Topic_LastPostAuthorName, "display"),Topic_LastPostAuthor) & "</span>" if (strJumpLastPost = "1") then strLastAuthor = strLastAuthor & " " & DoLastPostLink
end if

Should their be the some if/else statement where the green code is to change the n/a
thnx again andy
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 1.5 seconds. Powered By: Snitz Forums 2000 Version 3.4.07