home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Neil's C++ Stuff
/
2006-05-neilstuff_com.iso
/
bin
/
mailpost.asp
next >
Wrap
Text File
|
2006-07-11
|
948b
|
52 lines
<%@Language=JScript%><%
var mail = new ActiveXObject("Persits.MailSender");
switch (GetRequestParam("to"))
{
case "chris":
mail.AddAddress("chris.cowherd@enom.com");
break;
case "neil":
default:
mail.AddAddress("neil.obremski@enom.com");
break;
}
try
{
mail.From = GetRequestParam("from");
}
catch (e)
{
mail.FromName = GetRequestParam("from");
mail.From = "neil.obremski@enom.com";
}
mail.Subject = GetRequestParam("subj");
mail.Body = GetRequestParam("text");
mail.Host = "ex.enom.com";
mail.Send();
Response.Redirect(GetRequestParam("redir"));
Response.End();
//_[GetRequestParam()]________________________________________________________
//
function GetRequestParam(param)
{
if (Request.Form(param).Count > 0)
return "" + Request.Form(param).Item(1);
if (Request.QueryString(param).Count > 0)
return "" + Request.QueryString(param).Item(1);
return null;
}
%>