Snitz Forums 2000
Snitz Forums 2000
Home | Profile | Register | Active Topics | Members | Search | FAQ
Username:
Password:
Save Password
Forgot your Password?

 All Forums
 Snitz Forums 2000 MOD-Group
 MOD Add-On Forum (W/Code)
 Mod Modify : Message Icons edit mod.
 New Topic  Topic Locked
 Printer Friendly
Author Previous Topic Topic Next Topic  

Syedur
New Member

USA
93 Posts

Posted - 25 June 2001 :  15:39:39  Show Profile  Visit Syedur's Homepage  Send Syedur an AOL message  Send Syedur an ICQ Message  Send Syedur a Yahoo! Message
Note: Bug fixed.

Introduction: This is my first mod submition. So, feel free to say anything... or edit anything... also I get a lot of typos. This mod wasn't actually done by me, the idea was mine, I couldn't approch it on my own, so had MaxwellDave's assistance.

Discripttion: This mod modify requires Message Icon mod. What this mod does is... let you any message's icon, when you are trying to edit that message.

This mod doesn't require any downloads, its that simple.

Demo: http://e-syed.d2g.com/forum/default.asp

Lets get to the main point...
------------------------------
Please make back up of your ASP files, incase you make any mistakes or typos, even though this is simple, you will thank youself for backing up the original files.

================
Modify post.asp
================
Find this...
if strRqMethod = "Reply" or _
strRqMethod = "ReplyQuote" or _
strRqMethod = "Topic" or _
strRqMethod = "TopicQuote" then
%>
<tr>
<td bgColor="<% =strPopUpTableColor %>" noWrap vAlign="top" align="right"><font face="<% =strDefaultFontFace %>" size="<% =strDefaultFontSize %>"><b>Message Icon:</b></font></td>
<td bgColor="<% =strPopUpTableColor %>" vAlign="top"><input type="radio" class="radio" name="strMessageIcon" value="1" <% Response.Write(" checked") %>> <img src="icon_mi_1.gif" border="0"> <input type="radio" class="radio" name="strMessageIcon" value="2"> <img src="icon_mi_2.gif" border="0"> <input type="radio" class="radio" name="strMessageIcon" value="3"> <img src="icon_mi_3.gif" border="0"> <input type="radio" class="radio" name="strMessageIcon" value="4"> <img src="icon_mi_4.gif" border="0"> <input type="radio" class="radio" name="strMessageIcon" value="5"> <img src="icon_mi_5.gif" border="0"> <input type="radio" class="radio" name="strMessageIcon" value="6"> <img src="icon_mi_6.gif" border="0"> <input type="radio" class="radio" name="strMessageIcon" value="7"> <img src="icon_mi_7.gif" border="0"><br>
<input type="radio" class="radio" name="strMessageIcon" value="8"> <img src="icon_mi_8.gif" border="0"> <input type="radio" class="radio" name="strMessageIcon" value="9"> <img src="icon_mi_9.gif" border="0"> <input type="radio" class="radio" name="strMessageIcon" value="10"> <img src="icon_mi_10.gif" border="0"> <input type="radio" class="radio" name="strMessageIcon" value="11"> <img src="icon_mi_11.gif" border="0"> <input type="radio" class="radio" name="strMessageIcon" value="12"> <img src="icon_mi_12.gif" border="0"> <input type="radio" class="radio" name="strMessageIcon" value="13"> <img src="icon_mi_13.gif" border="0"> <input type="radio" class="radio" name="strMessageIcon" value="14"> <img src="icon_mi_14.gif" border="0"></td>
</tr>
<% end if

And replace it with...
if strRqMethod = "Edit" or _
strRqMethod = "EditTopic" or _
strRqMethod = "Reply" or _
strRqMethod = "ReplyQuote" or _
strRqMethod = "Topic" or _
strRqMethod = "TopicQuote" then
%>
<tr>
<td bgColor="<% =strPopUpTableColor %>" noWrap vAlign="top" align="right"><font face="<% =strDefaultFontFace %>" size="<% =strDefaultFontSize %>"><b>Message Icon:</b></font></td>
<td bgColor="<% =strPopUpTableColor %>" vAlign="top"><input type="radio" class="radio" name="strMessageIcon" value="1" <% if txtMsgIcon = "1" or txtMsgIcon = "" then Response.Write(" checked") %>> <img src="icon_mi_1.gif" border="0"> <input type="radio" class="radio" name="strMessageIcon" value="2" <% if txtMsgIcon = "2" then Response.Write(" checked") %>> <img src="icon_mi_2.gif" border="0"> <input type="radio" class="radio" name="strMessageIcon" value="3" <% if txtMsgIcon = "3" then Response.Write(" checked") %>> <img src="icon_mi_3.gif" border="0"> <input type="radio" class="radio" name="strMessageIcon" value="4" <% if txtMsgIcon = "4" then Response.Write(" checked") %>> <img src="icon_mi_4.gif" border="0"> <input type="radio" class="radio" name="strMessageIcon" value="5" <% if txtMsgIcon = "5" then Response.Write(" checked") %>> <img src="icon_mi_5.gif" border="0"> <input type="radio" class="radio" name="strMessageIcon" value="6" <% if txtMsgIcon = "6" then Response.Write(" checked") %>> <img src="icon_mi_6.gif" border="0"> <input type="radio" class="radio" name="strMessageIcon" value="7" <% if txtMsgIcon = "7" then Response.Write(" checked") %>> <img src="icon_mi_7.gif" border="0"><br>
<input type="radio" class="radio" name="strMessageIcon" value="8" <% if txtMsgIcon = "8" then Response.Write(" checked") %>> <img src="icon_mi_8.gif" border="0"> <input type="radio" class="radio" name="strMessageIcon" value="9" <% if txtMsgIcon = "9" then Response.Write(" checked") %>> <img src="icon_mi_9.gif" border="0"> <input type="radio" class="radio" name="strMessageIcon" value="10" <% if txtMsgIcon = "10" then Response.Write(" checked") %>> <img src="icon_mi_10.gif" border="0"> <input type="radio" class="radio" name="strMessageIcon" value="11" <% if txtMsgIcon = "11" then Response.Write(" checked") %>> <img src="icon_mi_11.gif" border="0"> <input type="radio" class="radio" name="strMessageIcon" value="12" <% if txtMsgIcon = "12" then Response.Write(" checked") %>> <img src="icon_mi_12.gif" border="0"> <input type="radio" class="radio" name="strMessageIcon" value="13" <% if txtMsgIcon = "13" then Response.Write(" checked") %>> <img src="icon_mi_13.gif" border="0"> <input type="radio" class="radio" name="strMessageIcon" value="14" <% if txtMsgIcon = "14" then Response.Write(" checked") %>> <img src="icon_mi_14.gif" border="0"></td>
</tr>
<% end if
Now do a search for forum SQL...
following line:
strSql = "SELECT " & strTablePrefix & "TOPICS.CAT_ID, " & strTablePrefix & "TOPICS.FORUM_ID, " & strTablePrefix & "TOPICS.TOPIC_ID, " & strTablePrefix &
After finding that add
"TOPICS.T_MSGICON, " & strTablePrefix & 
right after "TOPICS.TOPIC_ID, " & strTablePrefix & and before "TOPICS.T_SUBJECT, " & strTablePrefix &
After that... find this line TxtMsg = rs("T_MESSAGE")
Right after that... add the following lines
'###### Message Icon Edit Mod - 1 Line #######
txtMsgIcon = rs("T_MSGICON")

====================
End Modify post.asp
====================
=====================
Modify post_info.asp
=====================
Find this line...
strSql = strSql & " SET R_MESSAGE = '" & txtMessage & "'"
Right after that, add the following lines...
'## Added Edit Message Icon --- 1 line.
strSql = strSql & ", R_MSGICON = '" & Request.Form("strMessageIcon") & "'"[code]Now find this line...
strSql = strSql & ", T_SUBJECT = '" & txtSubject & "'"
And then add these lines right after that...[code]'###### Added Edit Message Icon - 1 line.
strSql = strSql & ", T_MSGICON = '" & Request.Form("strMessageIcon") & "'"

=========================
End Modify post_info.asp
=========================
That should do it... Have fun.


Thank you.

There is a time in every man’s education when he arrivers at the conviction that envy is ignorance; that imitation is suicide.

Edited by - Syedur on 27 June 2001 14:14:32

RichardKinser
Snitz Forums Admin

USA
16655 Posts

Posted - 25 June 2001 :  15:45:46  Show Profile
I thought this had been covered already.. At least how to do it.
Go to Top of Page

Syedur
New Member

USA
93 Posts

Posted - 25 June 2001 :  15:48:07  Show Profile  Visit Syedur's Homepage  Send Syedur an AOL message  Send Syedur an ICQ Message  Send Syedur a Yahoo! Message
Well... I did a search on this... and couldn't find it myself.
I am sorry if this has been done already...
Really really really sorry.


There is a time in every man’s education when he arrivers at the conviction that envy is ignorance; that imitation is suicide.
Go to Top of Page

RichardKinser
Snitz Forums Admin

USA
16655 Posts

Posted - 25 June 2001 :  16:09:09  Show Profile
No need to be sorry. I'm sure alot of people will want to add this.
Go to Top of Page

Raichelle
Junior Member

370 Posts

Posted - 25 June 2001 :  18:44:59  Show Profile
i don't get it
can someone explain this in a better way on what it does
i don't get the above explanation

Go to Top of Page

Syedur
New Member

USA
93 Posts

Posted - 25 June 2001 :  19:11:03  Show Profile  Visit Syedur's Homepage  Send Syedur an AOL message  Send Syedur an ICQ Message  Send Syedur a Yahoo! Message
quote:

i don't get it
can someone explain this in a better way on what it does
i don't get the above explanation


Hey Raichelle,
I am sorry... my language is kinda harsh...

Would you please send me your post.asp and post_info.asp and I will edit those for you...

Thanks.
Later.

There is a time in every man’s education when he arrivers at the conviction that envy is ignorance; that imitation is suicide.
Go to Top of Page

dayve
Forum Moderator

USA
5820 Posts

Posted - 25 June 2001 :  20:45:51  Show Profile  Visit dayve's Homepage
she didn't ask for the files to be edited, she wanted to know what the mod did. since we spoke about this syedur I will let her know.

if you use the Message Icon mod you will notice that if you edit your message that the Message Icon mod does not show there so you can't edit the icon you want to use as you edit the actual message.

the original mod only allowed for posts and replies but not editing posts.

hope that clears things up.

Dayve
Go to Top of Page

RichardKinser
Snitz Forums Admin

USA
16655 Posts

Posted - 25 June 2001 :  21:26:12  Show Profile
There were 2 reasons I left the ability to edit the message icon out.

One was for ease of installation. I wanted to have the least amount of modifications possible to make this an easy MOD to install.

Second was that I modeled it after the Message Icons in UBB and they did't allow them to be edited either.
Go to Top of Page

Raichelle
Junior Member

370 Posts

Posted - 25 June 2001 :  22:36:31  Show Profile
better
thanks dayve
but i think am going skip this mod don't look like anything big or whatever ah still looking for someone to make a mod which wont allow anyone to start a new topic untill they reply to about one of others topics

Go to Top of Page

dayve
Forum Moderator

USA
5820 Posts

Posted - 26 June 2001 :  00:39:09  Show Profile  Visit dayve's Homepage
quote:

better
thanks dayve
but i think am going skip this mod don't look like anything big or whatever ah still looking for someone to make a mod which wont allow anyone to start a new topic untill they reply to about one of others topics





that should be easy but let me look where to do the coding. basically we will just implement a M_POSTS > 2 routine. I don't see anything major about doing that.

Dayve
Go to Top of Page

samyot
Junior Member

Canada
242 Posts

Posted - 27 June 2001 :  19:25:19  Show Profile  Visit samyot's Homepage  Send samyot a Yahoo! Message
Hi,

I am getting this error:

Microsoft JET Database Engine error '80040e10'

No value given for one or more required parameters.

/forum/post_info.asp, line 112


when I edit certain posts, not all.
I do not even change anything, submit and poof.....
I noticed that on the ones that this happens to, the first icon is selected when in reality is should have another selected.
It's like it doesn't go an get the correct selection to start with.
This only seems to happen to one of my 12 forums. Weird...

My forum is at http://syltek.dingojunction.com/forum/
and it seems to only be the 'Networking Problems' forum

Any thoughts?

Sylvain Amyot



Edited by - samyot on 27 June 2001 19:31:02
Go to Top of Page

Syedur
New Member

USA
93 Posts

Posted - 27 June 2001 :  20:50:40  Show Profile  Visit Syedur's Homepage  Send Syedur an AOL message  Send Syedur an ICQ Message  Send Syedur a Yahoo! Message
Hey samyot,
The error you are getting on post_info.asp when trying to edit any reply messages was a bug and it has been fixed.
On your post_info.asp page...
look for the following code..
strSql = strSql & ", T_MSGICON = '" & Request.Form("strMessageIcon") & "'"
You will find it twice, replace the first one with...

strSql = strSql & ", R_MSGICON = '" & Request.Form("strMessageIcon") & "'"

Where its grouped with other reply requests.
That should do it.
Thank you.

There is a time in every man’s education when he arrivers at the conviction that envy is ignorance; that imitation is suicide.
Go to Top of Page

samyot
Junior Member

Canada
242 Posts

Posted - 28 June 2001 :  08:11:31  Show Profile  Visit samyot's Homepage  Send samyot a Yahoo! Message
Thanks that seems to have solved my error.

Go to Top of Page

Syedur
New Member

USA
93 Posts

Posted - 28 June 2001 :  13:59:10  Show Profile  Visit Syedur's Homepage  Send Syedur an AOL message  Send Syedur an ICQ Message  Send Syedur a Yahoo! Message
Glad I could help.

There is a time in every man’s education when he arrivers at the conviction that envy is ignorance; that imitation is suicide.
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.23 seconds. Powered By: Snitz Forums 2000 Version 3.4.07