Send e-mail by SmtpServer using newLISP

Direct use of the standard module SMTPX.LSP, SMTP.LSP You can not set port, after trial, useless.

The following is a sample code:

#!/usr/bin/newlisp (set ' Debug-flag true) (module "SMTPX.LSP") (Set ' R (smtp:send-mail "[email protected]" "[Email Protected] "test" "How IS is you today?" -John Doe-"" "Smtp.myserver.com" "MyUser" "mypasswd" 587)) (unless R  

Debug-flag set to True is convenient for output debugging information

Smtp:get-error-text can print error messages.

Attention. The last parameter of the send-mail above is the port number specified. If you use QQ mailbox to send email, do not need to fill out this port number.

Other function references:

Http://www.newlisp.org/code/modules/smtpx.lsp.html

Copyright notice: This article blog original article. Blogs, without consent, may not be reproduced.

Send e-mail by SmtpServer using newLISP