15 lines
492 B
Plaintext
15 lines
492 B
Plaintext
|
<%
|
||
|
|
'declare our variables
|
||
|
|
Dim strMessage , objCDO
|
||
|
|
Set objCDO = Server.CreateObject("cdonts.NewMail")
|
||
|
|
'stick the e-mail address you are sending from in here
|
||
|
|
objCDO.From = "myaddress@myaddress.com"
|
||
|
|
'this is the email address you are sending to
|
||
|
|
objCDO.To = "anotheremail@myaddress.com"
|
||
|
|
'this is the title of your e-mail message
|
||
|
|
objCDO.subject = "this is a test message"
|
||
|
|
'this is your actual message
|
||
|
|
objCDO.body = " This is your actual message in here"
|
||
|
|
objCDO.send
|
||
|
|
%>
|