助教的烦恼：群发邮件

是 否 +2 论坛币

k人 参与回答

经管之家送您一份

应届毕业生专属福利!

求职就业群

赵安豆老师微信：zhaoandou666

经管之家联合CDA

送您一个全额奖学金名额~ !

立即领取

感谢您参与论坛问题回答

经管之家送您两个论坛币！

+2 论坛币

博士生阶段，总免不了被哪个老师抓去当助教。比如这学期我就被抓去当税法课助教了。
当助教，免不了一些课件，一些通知，要群发给选修这门课的所有同学，课程教学网又常常抽风式的，用起来挺麻烦。
虽然课程开始前我都自我介绍了，在黑板上留下了助教的电话，邮箱。但总有部分同学一学期也懒得给你发个邮件的，于是也不知道所有同学的邮箱了。同学开始抱怨这个通知，那个资料的不知道。
院教务办老师发来选课名单，excel格式，记载着学号和姓名。学生邮箱格式一般是"学号+@xxx.edu.cn"。
但一个个复制到收件人对话框用“；”隔开，也是件很令人烦恼的事，眼发花，手抽筋，还容易出错。

认真学习了SAS后，试写了段代码。

data studentid ;
input id $20.; /*在这注意最好定义字符长度，有的学号10位数，有的九位，若没定义，默认第一个字符长度为变量长度，后面数字会被截掉，考虑到最后一个邮箱，423456789@xxx.edu.cn，定义成20了, */
cards;
12345678
22345678
32345678
423456789
;
run;
data _null_;
file "e:\税法课程学生邮箱.txt" mod; /*生成个文本*/
length email $2000.; /*长度根据学生人数估摸就行*/
do until(flag);
set studentid end=flag;
if flag then id=trim(id)||"@xxx.edu.cn";
email=catx("@xxx.edu.cn;",email,id);
end;
put email;
run;

接下来要做的唯一一件事就是把文本中的内容一次性复制到收件人中去了，
眼不再花了，手不再抽筋了。一口气还可爬七楼呢

扫码加我 拉你入群

请注明：姓名-公司-职位

以便审核进群资格，未注明则拒绝

关键词：Student Excel格式 length Email Input excel 对话框 博士生 教学网 收件人

这个碉堡啦~~~~

不生成文本的话，类似问题还是习惯用PROC SQL

1. proc sql noprint;
   
2.         select email into :emaillist separated by ';'
   
3.                  from (select trim(id)||"@xxx.edu.cn" as email from studentid);
   
4. quit;
   
5. %put %bquote(&emaillist);

复制代码

几乎完全同样的事情，我也做过的，就是用把各个邮箱并到一起弄成想要的格式，会了sas之后，啥东西都不想动手做了，全想写程序

可以把你附件上传一下让我们学习一下

Imasasor 发表于 2013-1-4 19:14
几乎完全同样的事情，我也做过的，就是用把各个邮箱并到一起弄成想要的格式，会了sas之后，啥东西都不想动手 ...

懒人的表现

学习学习

NB  啊~~·

不愧是博士！~ - -！ 真给劲了！！