Snitz Forums 2000
Snitz Forums 2000
Home | Profile | Register | Active Topics | Members | Search | FAQ
 All Forums
 Snitz Forums 2000 MOD-Group
 MOD Add-On Forum (W/Code)
 Adding attachments to private messages

Note: You must be registered in order to post a reply.
To register, click here. Registration is FREE!
Before posting, make sure you have read this topic!

Screensize:
UserName:
Password:
Format Mode:
Format: BoldItalicizedUnderlineStrikethrough Align LeftCenteredAlign Right Horizontal Rule Insert HyperlinkInsert EmailInsert Image Insert CodeInsert QuoteInsert List
   
Message:

* HTML is OFF
* Forum Code is ON
Smilies
Smile [:)] Big Smile [:D] Cool [8D] Blush [:I]
Tongue [:P] Evil [):] Wink [;)] Clown [:o)]
Black Eye [B)] Eight Ball [8] Frown [:(] Shy [8)]
Shocked [:0] Angry [:(!] Dead [xx(] Sleepy [|)]
Kisses [:X] Approve [^] Disapprove [V] Question [?]

 
Check here to subscribe to this topic.
   

T O P I C    R E V I E W
philsbbs Posted - 11 April 2008 : 10:31:54
I've now added attachements to private messages.

Here's the code change in privatesend.asp

>
<script language="JavaScript">
<!-- hide from JavaScript-challenged browsers
function pmmembers() { var MainWindow = window.open ("pm_pop_members.asp", "","toolbar=no,location=no,menubar=no,scrollbars=yes,width=250,height=500,top=100,left=100,resizeable=yes,status=no");
}
// done hiding -->
</script>
<%

Response.Write " <a href=""#"" onClick=""window.open('pop_upload_new.asp','Uploading','toolbar=no,location=no,directories=no,status=yes,menubar=no,scrollbars=yes,resizable=yes,width=440,height=310');""><acronym title=""Upload an Image File..."">" & getCurrentIcon(strIconPaperClip,"","") & "</a> <font face=""" & strDefaultFontFace & """ size=""" & strDefaultFontSize & """>Insert an Image File</acronym><br /></font>" & vbNewLine



Response.Write " <tr>" & vbNewLine & _
" <td bgColor=""" & strPopUpTableColor & """ noWrap vAlign=""top"" align=""right""><font face=""" & strDefaultFontFace & """ size=""" & strDefaultFontSize & """><b>Send to:</b>"
Response.Write "</font></td>" & vbNewLine & _
" <td bgColor=""" & strPopUpTableColor & """><input maxLength=""50"" name=""sendto"" value=""" & Request.Querystring("mname") & """ size=""50""> <font face=""" & strDefaultFontFace & """ size=""" & strFooterFontSize & """><a href=""members.asp"">Memberlist</a> "
if strRqMethod <> "Forward" then Response.Write ("<br>(Separate member names with a comma for multiple recipients.)")

if (mLev > 0) and strRqMethod <> "Forward" then Response.Write ("<br><input type=""checkbox"" name=""allmods"" value=""true""><b>ALERT MODERATORS</b> (Send Message to all Moderators)<br>") '# All Moderators PM Modification
if (mLev = 4) and strRqMethod <> "Forward" then Response.Write ("<input type=""checkbox"" name=""allmem"" value=""true"">Send Message to all Members<br>") '# All Member PM Modification
Response.Write "</font></td>" & vbNewLine & _
" </tr>" & vbNewLine
end if

Let me know if you find this useful phil@philsbbs.com<
3   L A T E S T    R E P L I E S    (Newest First)
Etymon Posted - 12 April 2008 : 00:59:11
quote:
Originally posted by philsbbs

This code is now available to download :

http://www.snitzbitz.com/mods/details.asp?Version=All&mid=67


Hi Phil,

Thank you for your contribution!

Etymon
<
philsbbs Posted - 11 April 2008 : 14:04:44
This code is now available to download :

http://www.snitzbitz.com/mods/details.asp?Version=All&mid=67<
philsbbs Posted - 11 April 2008 : 11:18:56
This is used with Mike File Attachment code.<

Snitz Forums 2000 © 2000-2021 Snitz™ Communications Go To Top Of Page
This page was generated in 0.02 seconds. Powered By: Snitz Forums 2000 Version 3.4.07