|
|
| version 1.27, 2001/03/20 07:34:34 | version 1.158, 2001/04/28 08:44:23 |
|---|---|
| Line 1 | Line 1 |
| $t[^table:load[test.cfg]] | @main[] |
| ^t.save[test2.cfg] | ^^table:dir[/]:<BR> |
| <form method=post enctype=multipart/form-data> | $d[^table:dir[/]] |
| <input name=photo type=file> | $d{^menu{$name  ^; ^; ^; ^;^if(-f $name){-f} ^if(-d $name){-d};<BR>}} |
| <input type=submit> | <HR> |
| </form> | |
| <hr> | |
| ^if($form:photo){ | $files[^table:set{name}] |
| <pre> | ^d.menu{ |
| ^$form:photo.name='$form:photo.name' | ^if(-d "$d.name"){ |
| ^$form:photo.size='$form:photo.size' | ^files.append{$d.name} |
| ^$form:photo.text='$form:photo.text' | } |
| ^form:photo.save[paf.txt] | |
| </pre> | |
| } | } |
| $files{^menu{$name}[,]} | |
| <HR> | |
| @exception[origin;source;comment;type;code] | |
| <body bgcolor=black> | |
| <font color=white> | |
| ERROR: | |
| ^if(def $source){$origin '$source'} | |
| ${comment}. | |
| ^if(def $type){type=$type} | |
| ^if(def $code){code=$code} | |
| @auto_test[] | |
| ^BASE.auto_test[] | |
| <li>${request:uri}! | |