用newLISP通过SMTP服务器发送邮件
用newLISP通过SMTP服务器发送邮件。直接使用标准模块smtpx.lsp, smtp.lsp不能设定端口,经过试用无用。下面是例子代码:#!/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 -" ...