| Author |
 Topic  |
|
mikeach
New Member
USA
58 Posts |
 Posted - 30 August 2002 : 10:29:45
|
quote:
Originally posted by @tomic
I have made a few changes to make Private messages more 3.4 compliant. mainly this means I updated inc_iconfiles.asp and changed the code on all the pages to use this method.
I also added a few options that have been posted in this topic.
@tomic
Your updates are making this mod better and better, can't wait to see where it leads!
One question, you said you updated inc_iconfiles.asp, should that have added the smilies to the PM send/reply box?
Mike |
 |
|
|
@tomic
Senior Member
USA
1790 Posts |
Posted - 30 August 2002 : 10:47:52
|
quote:
One question, you said you updated inc_iconfiles.asp, should that have added the smilies to the PM send/reply box
No, I haven't had a chance to look at that yet. Updating inc_iconfiles.asp with Private message images lets me use the getCurrentIcon function.
@tomic |
SportsBettingAcumen.com |
|
|
|
CaNgo
Starting Member
15 Posts |
Posted - 30 August 2002 : 11:37:53
|
I installed PM MOD without any error, thanks to Richard Kinser & @tomic.
I also like the add-in made by vasanthm. I modified it a little bit so you can install it in inc_footer.asp. It's easier than making changes to topic.asp, forum.asp, active.asp.... I just added the red lines to check in files you specified:
'## END - REMOVAL, MODIFICATION OR CIRCUMVENTING THIS CODE
WILL VIOLATE THE SNITZ FORUMS 2000 LICENSE AGREEMENT
If Instr(Request.ServerVariables("Path_Info"), "default.asp") > 0 _
or Instr(Request.ServerVariables("Path_Info"), "topic.asp") > 0 _
or Instr(Request.ServerVariables("Path_Info"), "active.asp") > 0 _
or Instr(Request.ServerVariables("Path_Info"), "forum.asp") > 0 Then
if MemberID > 0 then
if strDBNTUserName <> "" then
' Get Private Message count for display on Default.asp
if strDBType = "access" then
strSqL = "SELECT count(M_TO) as [pmcount] "
else
strSqL = "SELECT count(M_TO) as pmcount "
end if
strSql = strSql & " FROM " & strMemberTablePrefix & "MEMBERS , " & strTablePrefix & "PM "
strSql = strSql & " WHERE " & strMemberTablePrefix & "MEMBERS.M_NAME = '" & strDBNTUserName & "'"
strSql = strSql & " AND " & strMemberTablePrefix & "MEMBERS.MEMBER_ID = " & strTablePrefix & "PM.M_TO "
strSql = strSql & " AND " & strTablePrefix & "PM.M_READ = 0 "
Set rsPM = my_Conn.Execute(strSql)
pmcount = rsPM("pmcount")
rsPM.close
set rsPM = nothing
if(pmcount>0) then
response.write " <script language=""JavaScript""> { input_box=confirm(""You have a new private message. Click OK to view it, or cancel to hide this prompt.""); if (input_box==true) { second_box=confirm(""Open in new window?\n\n(Press cancel to open your Inbox in the current window.)""); if (second_box==true) { window.open('pm_view.asp?s=','pmnew','width=600,height=500,menubar=yes,scrollbars=yes,toolbar=yes,location=yes,directories=yes,resizable=yes,top=50,left=50'); } else { window.location=""pm_view.asp?s=""; }} else { }} // </script>"
end if
end if
end if
End If
|
Edited by - CaNgo on 30 August 2002 11:38:22 |
|
|
|
vasanthm
Starting Member
35 Posts |
Posted - 30 August 2002 : 13:38:44
|
| Thanks.. My add in is now better with your help... I have another add in.. which shows all the messages in the forum and the admin has to choice of deleting any message he likes.... Well if any one requires it please register at www.izer.tk and send me a mail to vasanthm@mail.com with the username you registered.. |
|
|
|
kwhipp
Junior Member
USA
407 Posts |
Posted - 30 August 2002 : 14:28:50
|
vasanthm -
FYI, I just visited your forum and noticed that the link back to Snitz is not working. You might want to fix that. |
- Kevin |
|
|
|
vasanthm
Starting Member
35 Posts |
Posted - 30 August 2002 : 15:05:25
|
| Sorry.. it is corrected now.. accidnetly removed it while adding the add on i guess.... |
|
|
|
vasanthm
Starting Member
35 Posts |
Posted - 30 August 2002 : 15:07:02
|
I think the below would still be a better option.. since this will now work on all pages.. And is any one is intrested in my another ad on i mentioned above..
'## END - REMOVAL, MODIFICATION OR CIRCUMVENTING THIS CODE
WILL VIOLATE THE SNITZ FORUMS 2000 LICENSE AGREEMENT
If Instr(Request.ServerVariables("Path_Info"), "pm_view.asp") < 1 then
if MemberID > 0 then
if strDBNTUserName <> "" then
' Get Private Message count for display on Default.asp
if strDBType = "access" then
strSqL = "SELECT count(M_TO) as [pmcount] "
else
strSqL = "SELECT count(M_TO) as pmcount "
end if
strSql = strSql & " FROM " & strMemberTablePrefix & "MEMBERS , " & strTablePrefix & "PM "
strSql = strSql & " WHERE " & strMemberTablePrefix & "MEMBERS.M_NAME = '" & strDBNTUserName & "'"
strSql = strSql & " AND " & strMemberTablePrefix & "MEMBERS.MEMBER_ID = " & strTablePrefix & "PM.M_TO "
strSql = strSql & " AND " & strTablePrefix & "PM.M_READ = 0 "
Set rsPM = my_Conn.Execute(strSql)
pmcount = rsPM("pmcount")
rsPM.close
set rsPM = nothing
if(pmcount>0) then
response.write " <script language=""JavaScript""> { input_box=confirm(""You have a new private message. Click OK to view it, or cancel to hide this prompt.""); if (input_box==true) { second_box=confirm(""Open in new window?\n\n(Press cancel to open your Inbox in the current window.)""); if (second_box==true) { window.open('pm_view.asp?s=','pmnew','width=600,height=500,menubar=yes,scrollbars=yes,toolbar=yes,location=yes,directories=yes,resizable=yes,top=50,left=50'); } else { window.location=""pm_view.asp?s=""; }} else { }} // </script>"
end if
end if
end if
End If
[/quote] |
Edited by - vasanthm on 30 August 2002 15:09:22 |
|
|
|
Schwanke
New Member
77 Posts |
Posted - 30 August 2002 : 16:41:56
|
Ive made a simpler mod for this mod. I wrote an encapsolated version of the include file so that you can include it almost anywhere in your site without having to worry about the table placement code. This one also fixes an itty bitty bug where you used the wrong color variable for the color of the message count (It should be strForumActiveLink not strActiveLink when having yoru code on top of the strCellColor or whatever)
http://www.schwankeweb.net/files/inc_EncapPrivateMess.txt Just rename and use as your include. I put my in my header page underneath the logo. (actually, under the translater code under the logo but you get the idea)
Ohh also. I made it so it has the right english for zero. You had it as zero message and it should be zero messages. :)
|
<>< |
|
|
|
@tomic
Senior Member
USA
1790 Posts |
Posted - 30 August 2002 : 16:51:53
|
One thing about this messagebox popup is that every time you load a page this thing pops up which, if you don't feel like checking your messages right then and there, can be annoying. You basically force people to read messages now! or else endure endless popups.
@tomic |
SportsBettingAcumen.com |
|
|
|
Schwanke
New Member
77 Posts |
Posted - 30 August 2002 : 17:54:54
|
That was why I did my version :) Mine just puts the status in the header and it gets updated every time you load a page. Just as frequent checks with no nasty pop ups. :)
|
<>< |
|
|
|
CodeName
Junior Member
296 Posts |
Posted - 30 August 2002 : 18:01:22
|
Man My Private Messages Mod is ok working ok with that pop-up message  Thanks |
|
|
|
ajhvdb
Junior Member
Netherlands
392 Posts |
Posted - 30 August 2002 : 18:28:18
|
quote:
Originally posted by @tomic
One thing about this messagebox popup is that every time you load a page this thing pops up
You could save and check a cookie to prevent this |
|
|
|
@tomic
Senior Member
USA
1790 Posts |
Posted - 30 August 2002 : 19:34:41
|
quote:
You could save and check a cookie to prevent this
Yes that's one way. I personally don't like anything popping up that I didn't deliberately click on but maybe that's just me. I have another method for showing this that I will add as soon as i get an opportunity.
@tomic |
SportsBettingAcumen.com |
|
|
|
@tomic
Senior Member
USA
1790 Posts |
Posted - 30 August 2002 : 22:55:54
|
I have updated the file again.
I added a file called inc_privatemessage.asp that displays an image I made for showing if there is mail or not.
I also made privatesend.asp more like post.asp with the inlusion of the smilie include. I think that covers the smilie issue.
@tomic |
SportsBettingAcumen.com |
|
|
|
vasanthm
Starting Member
35 Posts |
Posted - 31 August 2002 : 00:59:51
|
Well i think i am going to add an optin to my pop up mod where the user can choose wheather he wants to have a pop up or not in his profile... how does that sound.. Any waythanx for the usgestion.. And did any one try my other mod where the admin is displayed with all the Private messages in the forum and has complete controll over it...
Bye
Vasanth |
|
|
|
Topic |
|
Topic Locked
