Subversion Repositories wimsdev

Rev

Rev 16377 | Blame | Compare with Previous | Last modification | View Log | RSS feed

  1.  
  2. !read Exindex
  3. !set exocnt=!itemcnt $exolist
  4. !set qcnt=8
  5. !if $qcnt>$exocnt
  6.   !set qcnt=$exocnt
  7. !endif
  8. !if $exocnt<1
  9.   ¶Ô²»Æð, ±¾Ä£¿éĿǰûÓÐÁ·Ï°. ÇëÒÔºóÔÙÀ´!
  10.   !exit
  11. !endif
  12. !if $exocnt=1
  13.   ±¾Ä£¿é°üº¬Ò»¸öÁ·Ï°, <b>
  14.   !item 1 of $titlelist
  15.   </b>.
  16.   !set exoo=!item 1 of $exolist
  17.   !href cmd=new&module=$module&exo=$exoo ÊÔÊÔ¿´.
  18.   !exit
  19. !endif
  20. !form new
  21. <fieldset id="intromenu" class="property_fields">
  22. <legend>$wims_name_setup</legend>
  23.  
  24. <input type="hidden" name="module" value="$module">
  25. <ul class="wims_nopuce">
  26. <li>
  27. <label for="exo">Ñ¡ÔñÇé½Ú:</label>
  28. !if $exocnt>6
  29.   !set selsize=6
  30. !else
  31.   !set selsize=$exocnt
  32. !endif
  33. !set wims_formselect_switch=multiple size=$selsize
  34. !set exo=$special_parm
  35. !if $exo!=$empty
  36.   !set exolist=!listuniq $exo,$exolist
  37.   !set exolist=!replace , by , $ in $exolist
  38.   !set dictionary=$module_dir/Extitles
  39.   !set translator_unknown=leave
  40.   !set titlelist=!exec translator $exolist
  41. !endif
  42. !formselect exo list $exolist prompt $titlelist
  43. !set wims_formselect_switch=
  44. </li><li>
  45.   <label for="style">Á·Ï°·ç¸ñ:</label>
  46. !formselect style list 1,2,3,4 prompt \
  47.         ÕÒ³öµÚÒ»¸ö´íÎó,\
  48.         ÕÒ³öËùÓдíÎó,\
  49.         ²»¸øÀíÓÉ,\
  50.         ÿ²¿¶¼¸øÀíÓÉ
  51. </li><li>
  52.   <label for="level">ÄѶÈ:</label>
  53. !default level=2
  54. !formselect level from 1 to 5
  55. </li></ul>
  56. </fieldset>
  57. <div class="wimscenter">
  58. <input type="submit" value="$wims_name_work">
  59. </div>
  60. !formend
  61.