|
|
|
|
|
| | |
| |
vbscript active server pages ASP vbscript SQL database informix oracle SQL Server Perl CGI Delphi PHP source code code sample samples program CJWSoft ASPProtect ASPBanner ASPClassifieds
(Advanced)
(Components)
(Database)
(General)
(Vbscript)
|
|
|
|
Subject: |
Re: Sending Attachments via emails.. |
|
From: |
Tim |
|
Date: |
11/30/2000 11:58:00 PM |
|
IP: |
24.6.12.62 |
CDONTS did not work on my server(hosted by someone else) I had to call my host and they gave me another object to handle it. here is my code...<P>
This is a demo I made a while back...<P>
Send a thank you!!<P>
Set Mailer = Server.CreateObject ("SMTPxxxxx.Mailer") <P>
cant give out my true connection.<P>
Mailer.FromName = "Money Back Card" <br>
Mailer.FromAddress = "tbrenz@home.com"<br>
Mailer.Subject = "Your Order Confirmation"<br>
Mailer.BodyText = "Congratulations " & fName & " " _
& lName & "!!" & chr(10) & chr(10) & "Were sure " _
& "you will enjoy using your new Money Back Card " _
& "." & chr(10) & chr(10) & "Your Customer " _
& "ID is " & rsconn("CustomerID") _
& chr(10) & chr(10) & "Have fun Saving with your " _
& "new Money Back Card!!"
Mailer.RemoteHost = "mail-fwd.xxxxxxxxxxxxx.com"<br>
Mailer.AddRecipient fName & " " & lName, mail
if Mailer.SendMail then<br>
Message sent successfully<br>
else<br>
Message send failure<br>
response.write ("Your request was not processed. < P >")<br>
response.write ("The error was: " & Mailer.Response)<br>
end if<br>
if mlist = "Yes" then<br>
connObj.Execute ("Insert Into tblMailingList (FirstName, LastName, EmailAddress, DateJoined) " _ <br>
& "values (" _ <br>
& "" & fName & ", " |
Previous Message
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
