| |
adminkoe
Posts: 117
Score: 0
Joined: 12/23/2000
From:
Status: offline
|
Eric, This is a sample code for sending e-mail using ASP <% On Error Resume Next '------------------Modify this section to customize your message strMsg="Dear " & request.form("Yourfriendname") & "," & vbcrlf & vbcrlf strMsg=strMsg & request.form("yourname") strMsg=strMsg & " wants you to check out VisualBasicScript.Com's page at" & vbcrlf & vbcrlf strMsg=strMsg & "http://www.VisualBasicScript.Com" & vbcrlf & vbcrlf strMsg=strMsg & request.form("yourname") & " also says" & vbcrlf & vbcrlf strMsg=strMsg & request.form("message") & vbcrlf & vbcrlf strMsg=strMsg & "If you do not know " & request.form("yourname") strMsg=strMsg & ", please ignore this message or report it to vbscript@mm-inet.com" strMsg=strMsg & vbcrlf & vbcrlf strMsg=strMsg & "Warmest Regards," & vbcrlf strMsg=strMsg & "VisualBasicScript.Com Staff" & vbcrlf strMsg=Cstr(strMsg) Set objMail = CreateObject("CDONTS.NewMail") objMail.From= request.form("youremail") 'Specify sender's address objMail.To=request.form("Yourfriendemail") objMail.Subject="VisualBasicScript.Com Recommendation" ' Subject of the message objMail.Body=strMsg objMail.Send Set objMail = nothing %> Regards, Andi Zain
|
|