| Author |
 Topic  |
|
|
richfed
Average Member
United States
999 Posts |
 Posted - 20 May 2003 : 13:58:31
|
In my forums, [which all have DoraMoon's Anonymous Posting MOD installed] when logged in as the administrator, 3 icons show up on topic.asp above an anonymous poster's post: reply with quote, show IP, and delete. All good.
However, what need I do to get the "edit" icon to show up as well.
As is, the post either stays as it is or gets trashed. I'd like to be able to edit, if necessary. |
Rich
[size=1]A Complete Idiot's Guide to MOD Implementation || On the Trail of the Last of the Mohicans[/size=1] |
|
|
DoraMoon
Average Member
Taiwan
661 Posts |
Posted - 20 May 2003 : 17:52:21
|
hi~ Rich,
Certainly you can do that! 
i just don't want the modified code look too complex.. you know, it already a very bad modded instruction this MOD. 
in topic.asp, about line.640
'##### EZ Anony 2-4 : below 4 lines added
if Reply_MemberName = strAnonyName then
' do nothing
else
'########## EZ Anony ##########
replace above ' do nothing with below code for edit icon..
'##### EZ Anony 2-4 : below 4 lines added
if Reply_MemberName = strAnonyName then
if (AdminAllowed = 1) then
if (Cat_Status <> 0 and Forum_Status <> 0 and Topic_Status <> 0) or (AdminAllowed = 1) then
Response.Write " <a href=""post.asp?" & ArchiveLink & "method=Edit&REPLY_ID=" & Reply_ReplyID & "&TOPIC_ID=" & Topic_ID & "&FORUM_ID=" & Forum_ID & """>" & getCurrentIcon(strIconEditTopic,"Edit Reply","align=""absmiddle"" hspace=""6""") & "</a>" & vbNewLine
end if
end if
else
'########## EZ Anony ##########
you can just COPY these code from below about line.657~661 and small change to the first line.. then just PASTE it ! 
it'll allow Admin and Moderator of this forum to edit Anony's posts. if you want only Admin can edit... change AdminAllowed = 1 to mLev = 4
above is for Replies, and also the same doing to Topics section...
about line.868, copy/paste some code from line.885~889...
'##### EZ Anony 2-9 : below 4 lines added
if Member_Name = strAnonyName then
if (AdminAllowed = 1) then
if ((Cat_Status <> 0) and (Forum_Status <> 0) and (Topic_Status <> 0)) or (AdminAllowed = 1) then
Response.Write " <a href=""post.asp?" & ArchiveLink & "method=EditTopic&REPLY_ID=" & Topic_ID & "&TOPIC_ID=" & Topic_ID & "&FORUM_ID=" & Forum_ID & """>" & getCurrentIcon(strIconEditTopic,"Edit Topic","align=""absmiddle"" hspace=""6""") & "</a>" & vbNewLine
end if
end if
else
'########## EZ Anony ##########
hope this helpful for you.  |
 |
|
|
richfed
Average Member
United States
999 Posts |
Posted - 20 May 2003 : 18:56:55
|
| Helpful as always, DoraMoon. Thanks! |
|
|
|
richfed
Average Member
United States
999 Posts |
Posted - 21 May 2003 : 05:29:44
|
Worked beautifully, DM ... the only slight problem is that for some reason it also called the Private Message icon. Weird. But, at least I can now edit posts by anonymous users, if necessary.
By the way, your original instructions for implementing the Anonymous Posting mod weren't all that bad ... just needed some peace & quiet when working on it, but all went well.
The mod has provided great results! |
|
|
| |
Topic |
|
|
|
Topic Locked
