|
|
| version 1.178, 2001/05/10 12:42:41 | version 1.190, 2001/05/19 19:10:20 |
|---|---|
| Line 1 | Line 1 |
| @main[] | @main[] |
| <form method=post> | |
| <input type=hidden name=a value=123> | |
| <table border=1 width=250><tr><td>$form:name</td></tr></table> | |
| <textarea name=name rows=5 cols=40>^untaint[html]{^default[$form:name;Пробный текст: А.Ф._Петросян <<Жизнь в Аду>> | |
| нажми Submit]}</textarea><BR> | |
| <input type=submit> | |
| </form> | |
| <hr> | |
| #^main[] | |
| #^use[$form:file] | |
| $строка[вася ЗдЕсЬ] | |
| ^^строка.upper[]=^строка.upper[]<br> | |
| ^^строка.lower[]=^строка.lower[]<br> | |
| <hr> | |
| $a[12] | |
| ^a.int[] | |
| <hr> | |
| $t[^table:set{key value | $t[^table:set{key value |
| 1 v1 | 1 v1 |
| 2 v2}] | 2 v2}] |
| $h[^t.hash[key]] | $h[^t.hash[key]] |
| ^sql_test[$SQL.connect-string] | |
| ^rem{ | ^sql_test[mysql://test:test@localhost/test/cp1251_koi8] |
| ^connect[$SQL.connect-string]{ | |
| $shit[^taint[our's]] | |
| # $paf[^table:sql{insert into paf (name, age) values ('$shit', ^random:generate(10000))}] | |
| $paf[^table:sql{select * from paf order by id desc}(5)] | |
| $paf{ | |
| ^empty{query result is empty}{ | |
| <table border=1> | |
| <tr><td>id</td><td>name</td><td>age</td></tr> | |
| ^menu{<tr><td>$id</td><td>$name</td><td>$age</td></tr>} | |
| </table> | |
| }} | |
| } | |
| } | |
| <HR> | <HR> |
| $abc{} | $abc{} |
| Line 95 $list[^table:dir[$dir]] | Line 105 $list[^table:dir[$dir]] |
| ${list.name}/ $sublist{^menu{$name}[,]}<br> | ${list.name}/ $sublist{^menu{$name}[,]}<br> |
| } | } |
| <HR> | <HR> |
| ^t[x] | |
| <HR> | |
| ^if(in "/otherdeeper"){y;n} | ^if(in "/otherdeeper"){y;n} |
| <HR> | <HR> |
| ^$form:проверка_имя=$form:проверка_имя<BR> | |
| <form method=post> | |
| <input name=проверка_имя value=проверка_значение> | |
| <input type=submit> | |
| </form> | |
| <HR> | |
| ^^table:dir[/]:<BR> | ^^table:dir[/]:<BR> |
| $d[^table:dir[/]] | $d[^table:dir[/]] |
| Line 133 ${comment}. | Line 135 ${comment}. |
| @auto_test[] | @auto_test[] |
| ^BASE.auto_test[] | ^BASE.auto_test[] |
| <li>${request:uri}! | <li>${request:uri}! |
| @t[a] | |
| -${a}- | |
| @end | @end |
| @sql_test[connect-string] | |
| #^rem{ | |
| #^for[i](1;2){ | |
| ^connect[$connect-string]{ | |
| $shit[^taint[our's]] | |
| # $paf[^table:sql{insert into paf (name, age) values ('$shit', ^random:generate(10000))}] | |
| $paf[^table:sql{select * from paf order by id desc}(5)] | |
| $paf{ | |
| ^if(^empty[]){query result is empty}{ | |
| <table border=1> | |
| <tr><td>id</td><td>name</td><td>age</td></tr> | |
| ^menu{<tr><td>$id</td><td>$name</td><td>$age</td></tr>} | |
| </table> | |
| }} | |
| } | |
| #} | |
| #} | |
| @default[test;def] | |
| $result[^if(^test.length[]){$test}{$def}] |