Subversion Repositories wimsdev

Rev

Rev 5763 | Go to most recent revision | Show entire file | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 5763 Rev 7210
Line 4... Line 4...
4
!set stepnocount=yes
4
!set stepnocount=yes
5
!set methhelp=Äã¿ÉÒÔÓÃÕâ¸ö·½·¨É¾³ýÎÞÓõļÙÉè,\
5
!set methhelp=<p>Äã¿ÉÒÔÓÃÕâ¸ö·½·¨É¾³ýÎÞÓõļÙÉè,\
6
 ÒÔ¾»»¯»·¾³. ²»¹ý, <b>Çë×¢Òâ</b>! Èç¹ûÄãɾ³ýÁ˱ØÒªµÄ¼ÙÉè,\
6
 ÒÔ¾»»¯»·¾³. ²»¹ý, <b>Çë×¢Òâ</b>! Èç¹ûÄãɾ³ýÁ˱ØÒªµÄ¼ÙÉè,\
7
Ä㽫ÎÞ·¨Íê³ÉÖ¤Ã÷!\
7
Ä㽫ÎÞ·¨Íê³ÉÖ¤Ã÷!\
8
 <p>\
8
 </p>\
9
ÈκÎʱºòÄã¶¼¿ÉÒÔʹÓÃÕâ¸ö·½·¨¶ø²»Óõ£Ðı»¿Û·Ö,\
9
ÈκÎʱºòÄã¶¼¿ÉÒÔʹÓÃÕâ¸ö·½·¨¶ø²»Óõ£Ðı»¿Û·Ö,\
10
ÒòΪÕâ²»»áÔö¼ÓÍÆµ¼µÄ²½Êý.
10
ÒòΪÕâ²»»áÔö¼ÓÍÆµ¼µÄ²½Êý.
11
!set N_=!linecnt $m_context
11
!set N_=!linecnt $m_context
12
 
12
 
13
!if $wims_read_parm iswordof form check
13
!if $wims_read_parm iswordof form check
Line 20... Line 20...
20
 
20
 
21
!exit
21
!exit
22
:form
22
:form
23
 $methhelp
23
 $methhelp
24
 <p>
24
 <p>
25
 ÕâÀïÊǵ±Ç°µÄ¼ÙÉè. ±ê¼ÇÄãÏëɾ³ýµÄ¼ÙÉè. <ul>
25
 ÕâÀïÊǵ±Ç°µÄ¼ÙÉè. ±ê¼ÇÄãÏëɾ³ýµÄ¼ÙÉè. 
-
 
26
 </p><ul>
26
 !for i=1 to $N_
27
 !for i=1 to $N_
27
  !set l=!line $i of $m_context
28
  !set l=!line $i of $m_context
28
  <li> <input type=checkbox name=methparm1 value=$i/> \($l)
29
  <li> <input type="checkbox" name="methparm1" value="$i" /> \($l)</li>
29
 !next i
30
 !next i
30
 </ul>
31
 </ul>
31
!exit
32
!exit
32
:check
33
:check
33
 !reset newobject,oldobject
34
 !reset newobject,oldobject