Rev 8261 | Rev 11908 | Go to most recent revision | Show entire file | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed
Rev 8261 | Rev 11337 | ||
---|---|---|---|
Line 1... | Line 1... | ||
1 | !distribute lines $wims_read_parm into mailurl_1,mailurl_3 |
1 | !distribute lines $wims_read_parm into mailurl_1,mailurl_3 |
2 | mailurl_2=!word 2 to -1 of $mailurl_1 |
2 | mailurl_2=!word 2 to -1 of $mailurl_1 |
3 | mailurl_1=!word 1 of $mailurl_1 |
3 | mailurl_1=!word 1 of $mailurl_1 |
4 | !default mailurl_2=$mailurl_1 |
4 | !default mailurl_2=$mailurl_1 |
5 | !if @ notin $mailurl_1 or robot isin $session |
5 | !if @ notin $mailurl_1 or robot isin $session |
6 | !exit |
6 | !exit |
7 | !endif |
7 | !endif |
8 | !if $wims_user!=$empty |
8 | !if $wims_user!=$empty |
9 | mailurl_=<a href="mailto:$mailurl_1?subject=$mailurl_3">$mailurl_2</a> |
9 | mailurl_=<a href="mailto:$mailurl_1?subject=$mailurl_3">$mailurl_2</a> |
10 | !exit |
10 | !exit |
11 | !endif |
11 | !endif |
12 | 12 | ||
13 | mailurl_= |
13 | mailurl_= |
14 | !read themes/$wims_theme/mailurl.proc |
14 | !read themes/$wims_theme/mailurl.proc |
15 | !if $mailurl_!=$empty |
15 | !if $mailurl_!=$empty |
16 | !exit |
16 | !exit |
17 | !endif |
17 | !endif |
18 | 18 | ||
19 | mailurl_2=!replace internal @ by <img src="gifs/aa.gif" alt="aa"/> in $mailurl_2 |
19 | mailurl_2=!replace internal @ by <img src="gifs/aa.gif" alt="aa"/> in $mailurl_2 |
20 | 20 | ||
21 | #mailurl_=<a target="wims_sendmail" href="$wims_ref_name?session=$(wims_session)_sendmail&module=adm/sendmail&cmd=new&job=new&subject=$mailurl_3">$mailurl_2</a> |
21 | #mailurl_=<a target="wims_sendmail" href="$wims_ref_name?session=$(wims_session)_sendmail&module=adm/sendmail&cmd=new&job=new&subject=$mailurl_3">$mailurl_2</a> |
Line 23... | Line 23... | ||
23 | 23 | ||
24 | mailurl_c=!randitem a,b,c,l,m,n,x,y,z,A,B,C,L,M,N,X,Y,Z |
24 | mailurl_c=!randitem a,b,c,l,m,n,x,y,z,A,B,C,L,M,N,X,Y,Z |
25 | mailurl_c=$mailurl_c$[randint(10)] |
25 | mailurl_c=$mailurl_c$[randint(10)] |
26 | mailurl_1=!translate internal @ to , in $mailurl_1 |
26 | mailurl_1=!translate internal @ to , in $mailurl_1 |
27 | !if $mailurl_3 != $empty |
27 | !if $mailurl_3 != $empty |
28 | mailurl_s=+'?'+$mailurl_c[1]+'=$mailurl_3' |
28 | mailurl_s=+'?'+$mailurl_c[1]+'=$mailurl_3' |
29 | !else |
29 | !else |
30 | mailurl_s= |
30 | mailurl_s= |
31 | !endif |
31 | !endif |
32 | mailurl_=<a href="" onclick="$mailurl_c=new Array('$(mailurl_1[2])','subject','$(mailurl_1[1])','mail'); window.location=$mailurl_c[3]+'to'+':'+$mailurl_c[2]+'@'+$mailurl_c[0]$mailurl_s;">$mailurl_2</a> |
32 | mailurl_=<a href="#" onclick="$mailurl_c=new Array('$(mailurl_1[2])','subject','$(mailurl_1[1])','mail'); window.location=$mailurl_c[3]+'to'+':'+$mailurl_c[2]+'@'+$mailurl_c[0]$mailurl_s;">$mailurl_2</a> |