码迷,mamicode.com
首页 > 其他好文 > 详细

使用newLISP由SMTPserver发送电子邮件

时间:2015-08-07 13:05:46      阅读:155      评论:0      收藏:0      [点我收藏+]

标签:

直接使用的标准模块smtpx.lsp, smtp.lsp你可以不设置port,庭审后,没用。

以下是一个示例代码:

#!/usr/bin/newlisp

(set ‘debug-flag true)
(module "smtpx.lsp")

(set ‘r (SMTP:send-mail "from@my.com"
			"chenshu@letv.com"
			"test" 
			"How are you today? - john doe -"
			"smtp.myserver.com"
			"myuser"
			"mypasswd"
			587))

(unless r
  (println (SMTP:get-error-text)))
(exit)
 


debug-flag设置为true是方便输出调试信息

SMTP:get-error-text能够打印错误消息。


注意。上面的send-mail最后一个參数是指定的是port号。假设用qq邮箱发送email,不须要填写这个port号。


其它函数參考文档:

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

版权声明:本文博客原创文章。博客,未经同意,不得转载。

使用newLISP由SMTPserver发送电子邮件

标签:

原文地址:http://www.cnblogs.com/bhlsheji/p/4710385.html

(0)
(0)
   
举报
评论 一句话评论(0
登录后才能评论!
© 2014 mamicode.com 版权所有  联系我们:gaon5@hotmail.com
迷上了代码!