I though I would post this up as I have found it very useful.
I'm not sure if this was a MOD in itself, the "Email All Users", but here's what I've done.
I often needed to email all the members from different "departments" and hence a different email address. As standard the "Email all users" send the email from the forum default email address.
So, in admin_pop_mail.asp and find (around line 200) -
" <tr>" & vbNewLine & _
" <td bgColor=""" & strPopUpTableColor & """ noWrap vAlign=""top"" align=""right""><font face=""" & strDefaultFontFace & """ size=""" & strDefaultFontSize & """><b>Subject:</b></font></td>" & vbNewLine & _
" <td bgColor=""" & strPopUpTableColor & """><input maxLength=""60"" name=""Subject"" tabindex=""1"" value="""" size=""35""></td>" & vbNewLine & _
" </tr>" & vbNewLine & _
above that, add -
" <tr>" & vbNewLine & _
" <td bgColor=""" & strPopUpTableColor & """ noWrap vAlign=""top"" align=""right""><font face=""" & strDefaultFontFace & """ size=""" & strDefaultFontSize & """><b>From:</b></font></td>" & vbNewLine & _
" <td bgColor=""" & strPopUpTableColor & """> <select name=""email_from"" id=""email_from""><option value=""emailaddress1"">Name1</option><option value=""emailaddress2"">Name1</option><option selected=""selected"">Please Select</option></select></td>" & vbNewLine & _
" </tr>" & vbNewLine & _
and replace 'emailaddress1' and 'Name1' with your own. Of course, you can add further options if required.
Finally, around line 149, find -
strFrom = strSender
and replace it with -
strFrom = trim(Request.Form("email_from"))
Job done !
<
Mod: Email All Members
Posted - 24 September 2006 : 16:19:16
