Rev 17180 | Rev 18582 | Go to most recent revision | Show entire file | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed
Rev 17180 | Rev 17276 | ||
---|---|---|---|
Line 30... | Line 30... | ||
30 | 30 | ||
31 | !for l_ =1 to $cnt_user |
31 | !for l_ =1 to $cnt_user |
32 | u=!record $l_ of wimshome/sessions/$wims_session/.userlist_mail |
32 | u=!record $l_ of wimshome/sessions/$wims_session/.userlist_mail |
33 | username=!append item $(u[1]) $(u[2]) to $username |
33 | username=!append item $(u[1]) $(u[2]) to $username |
34 | login=!append item $(u[3]) to $login |
34 | login=!append item $(u[3]) to $login |
35 |
|
35 | !mailto $(u[4])\ |
36 | $sender\ |
36 | $sender\ |
37 | [WIMS $wims_classname] $save_subject\ |
37 | [WIMS $wims_classname] $save_subject\ |
- | 38 | ***\ |
|
- | 39 | $name_sendby ($(name_suptype[$supervisortype]))\ |
|
- | 40 | ***\ |
|
38 | $save_msg\ |
41 | $save_msg\ |
39 | $noreply1\ |
42 | $noreply1\ |
40 | 43 | ||
41 | !reset u |
44 | !reset u |
42 | !next l_ |
45 | !next l_ |
Line 64... | Line 67... | ||
64 | login=!append item $(u[3]) to $login |
67 | login=!append item $(u[3]) to $login |
65 | teachername=!append item $(u[1]) $(u[2]) to $teachername |
68 | teachername=!append item $(u[1]) $(u[2]) to $teachername |
66 | !mailto $(u[4])\ |
69 | !mailto $(u[4])\ |
67 | $sender\ |
70 | $sender\ |
68 | [WIMS $wims_classname] $save_subject\ |
71 | [WIMS $wims_classname] $save_subject\ |
- | 72 | ***\ |
|
- | 73 | $name_sendby ($(name_suptype[$supervisortype]))\ |
|
- | 74 | ***\ |
|
69 | $msgmod\ |
75 | $msgmod\ |
70 | $noreply1\ |
76 | $noreply1\ |
71 | 77 | ||
72 | 78 | ||
73 | !reset u |
79 | !reset u |
Line 86... | Line 92... | ||
86 | !endif |
92 | !endif |
87 | login=!append item supervisor to $login |
93 | login=!append item supervisor to $login |
88 | !mailto $supervisormail\ |
94 | !mailto $supervisormail\ |
89 | $sender\ |
95 | $sender\ |
90 | [WIMS $wims_classname] $save_subject\ |
96 | [WIMS $wims_classname] $save_subject\ |
- | 97 | ***\ |
|
- | 98 | $name_sendby ($(name_suptype[$supervisortype]))\ |
|
- | 99 | ***\ |
|
91 | $msgmod\ |
100 | $msgmod\ |
92 | $noreply2\ |
101 | $noreply2\ |
93 | 102 | ||
94 | !endif |
103 | !endif |
95 | 104 |