SAS学习笔记之自动发邮件（二）

今天上午研究了一下SAS自动发邮件，可是如果给不同的人发不同的附件，还没有解决，下面把代码贴出来，也是从网上搜的，自己整合了一下

DATA work.usermessage;

length name $5 email $18 address $15;

INFILE DATALINES MISSOVER;

INPUT name email address;

DATALINES;

Alex naonao@126.com F:\test.txt

Helen 888888@qq.com F:\Tsales.xlsx

;

run;

filename mymail email"***@china.com"

subject="SAS OUTPUT SYSTEM";

data _null_;

file mymail;

set work.usermessage; *从用户信息数据集usermessage读取数据;

put "!EM_TO!" email; *指定邮件发送的地址;

put "!EM_SUBJECT! The output result by SAS"; *指定邮件的主题;

put "!EM_ATTACH!" address; *指定邮件所添加的附件;

put "尊敬的 " name "(先生/女士)："; *把邮件接收者的姓名添加到邮件中;

put " 您好!程序已经运行成功，现在把结果给您发过去，请查看！附件";

put "!EM_SEND!";

put "!EM_NEWMSG!";

return;

run;