|
|
| version 1.26, 2004/03/04 12:35:49 | version 1.29, 2004/03/09 14:49:47 |
|---|---|
| Line 1 | Line 1 |
| @main[] | |
| $request:charset[windows-1251] | $request:charset[windows-1251] |
| $response:charset[windows-1251] | $response:charset[windows-1251] |
| $response:content-type[text/html] | |
| ^if(def $form:param){ | |
| ^$form:param=$form:param<br> | |
| $several[$form:tables.several] | |
| ^$form:tables.several=^several.menu{ | |
| $several.field | |
| }[,] | |
| }{ | |
| $f[^file::load[text;http://parser3/_bug.html; | |
| # $.method[POST] | |
| $.form[ | |
| $.param[pass=ed | |
| ] | |
| $.several[^table::create[nameless]{1^#0A2}] | |
| ] | |
| $.any-status(1) | |
| ]] | |
| =$f.text= | |
| ^connect[mysql://root@localhost/aval?ClientCharset=koi8-r]{ | |
| $t[^table::sql{select * from paf2}] | |
| ^t.save[_bug.txt]OK | |
| } | } |