The Forum has been Updated
The code has been upgraded to the latest .NET core version. Please check instructions in the Community Announcements about migrating your account.
I have taken @tomics version 3.4.xx, Korayem block list MOD and another Admin Mod for Private messages (author unknown), put them together and made a couple of design changes.
I hope the above people (and anyone else who has worked on the Private Message MOD), doesnt mind me what I have done here.
Since I have done a few design changes, added the block list mod as standard and the extra admin ability to read all members PM's, I thought it was worthy of its own version number VERSION 3.5
OK, now thats out the way onto the main part.
In this mod, I have added the following:
- Member adility to block other memers sending them PM's (taken from the block list MOD). - Added a PM total into the header of every PM Page. - Added extra admin options for admin to be able to read members PM's.
This has been tested on Version 3.4.04 (the sample files in here are from snitz version 3.4.04).
I have added it to www.SnitzBitz.com
<
OK, now thats out the way onto the main part.
In this mod, I have added the following:
- Member adility to block other memers sending them PM's (taken from the block list MOD). - Added a PM total into the header of every PM Page. - Added extra admin options for admin to be able to read members PM's.
This has been tested on Version 3.4.04 (the sample files in here are from snitz version 3.4.04).
I have added it to www.SnitzBitz.com
<
Posted
Originally posted by mattdamickwould you care to elaborate ?<
Not sure if it was mentioned here, but if it was i did not see it and it can't hurt to mention it again. The PM Mod instructions have a few typos of the code that includes things like PMRECEIVE. I was driving me nuts because it caused a lot of errors for me mostly ones that started " No value given for one or more required parameters"
Hope that helps someone
Posted
I may need to appologize. Now that i look at the code it must have been me that made the typos. I had been staring at code for 5 hours and it all kind of jumbles together as i am sure most of you can understand.
So until i can be sure that there is actually and error in the mod. I withdraw my comments about the typo
Sorry for any problems this caused.
<
So until i can be sure that there is actually and error in the mod. I withdraw my comments about the typo
Sorry for any problems this caused.
<
Posted
i installed this mod a few days ago. it works great, but... it does not display the "message" field on reply or forward.
apparently it's a known issue with memo type fields in SQL Server 2005 (not sure about other versions) and the fix is easy. i read it somewhere but can't find the article at the moment.
what i did is i modified the privatesend.asp file as follows. you guys might want to consider implementing these simple changes into the next versions.
1. memo field(s) must be listed the LAST one(s) in the SELECT statement.
switch lines 269 and 270
strSql = strSql & ", " & strTablePrefix & "PM.M_MESSAGE "
strSql = strSql & ", " & strTablePrefix & "PM.M_SUBJECT "
result:
strSql = strSql & ", " & strTablePrefix & "PM.M_SUBJECT "
strSql = strSql & ", " & strTablePrefix & "PM.M_MESSAGE "
2. as soon as the recordset is retrieved, memo fields should be assigned to simple variables exactly as shown below (i know it looks weird, but it works) and the use of these variables is encouraged.
right below line 275 insert:
strMessage = "" & rs("M_MESSAGE")
in line 289 replace formatStr(rs("M_MESSAGE")) with formatStr(strMessage)
result:
Response.Write "><font color=""" & strForumFontColor & """ face=""" & strDefaultFontFace & """ size=""" & strDefaultFontSize & """><b>Subject: " & chkString(rs("M_SUBJECT"),"display") & "</b><hr size=""" & strFooterFontSize & """>" & formatStr(strMessage) & "</font></td>" & vbNewLine & _
hth :)<
apparently it's a known issue with memo type fields in SQL Server 2005 (not sure about other versions) and the fix is easy. i read it somewhere but can't find the article at the moment.
what i did is i modified the privatesend.asp file as follows. you guys might want to consider implementing these simple changes into the next versions.
1. memo field(s) must be listed the LAST one(s) in the SELECT statement.
switch lines 269 and 270
strSql = strSql & ", " & strTablePrefix & "PM.M_MESSAGE "
strSql = strSql & ", " & strTablePrefix & "PM.M_SUBJECT "
result:
strSql = strSql & ", " & strTablePrefix & "PM.M_SUBJECT "
strSql = strSql & ", " & strTablePrefix & "PM.M_MESSAGE "
2. as soon as the recordset is retrieved, memo fields should be assigned to simple variables exactly as shown below (i know it looks weird, but it works) and the use of these variables is encouraged.
right below line 275 insert:
strMessage = "" & rs("M_MESSAGE")
in line 289 replace formatStr(rs("M_MESSAGE")) with formatStr(strMessage)
result:
Response.Write "><font color=""" & strForumFontColor & """ face=""" & strDefaultFontFace & """ size=""" & strDefaultFontSize & """><b>Subject: " & chkString(rs("M_SUBJECT"),"display") & "</b><hr size=""" & strFooterFontSize & """>" & formatStr(strMessage) & "</font></td>" & vbNewLine & _
hth :)<