Mike,
If not,
here is one I keep as a code snippet:
Code:
DIM pm as P
msg_text = 'body of the message goes here
pm.from = mail_from 'who is sending the e-mail
pm.from_alias = 'if you want an alias name in the "From"
pm.to = mail_to 'a valid e-mail address
pm.subject = 'what you want your subject to be
pm.cc = "" 'mail_cc
pm.bcc = ""
pm.message = msg_text
if email_smtp_open(ps,your e-mail server address,25,"a valid e-mail account","that e-mail's password")
email_smtp_send(pm,ps)
email_smtp_close(ps)
else
'Header text is what you want to the message box header to be
ui_msg_box(Header text,"Problem! - There is a Problem with the SMTP Email"+crlf()+"No e-mail was sent to "+mail_to)
end if
Hope this helps...
be sure your antivirus understands that Alpha program is sending e-mails, or else it will prevent it.
We had an issue with McAfee
Tom
Bookmarks