Subversion Repositories wimsdev

Rev

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]+'&#64;'+$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]+'&#64;'+$mailurl_c[0]$mailurl_s;">$mailurl_2</a>