|
|
| version 1.191, 2001/05/21 08:08:39 | version 1.201, 2001/05/24 09:13:23 |
|---|---|
| Line 1 | Line 1 |
| @main[] | @main[] |
| ^rem{ | |
| ^mail:send[ | |
| $from[paf@design.ru] | |
| $to[paf@design.ru] | |
| $subject[test] | |
| $body[here] | |
| ] | |
| <hr> | |
| } | |
| -^eol[]- | |
| <hr> | |
| ^if(1<2){$a[1]} | |
| ^$a=$a | |
| <hr> | |
| <form method=post> | <form method=post> |
| <input type=hidden name=a value=123> | <input type=hidden name=a value=123> |
| <table border=1 width=250><tr><td>$form:name</td></tr></table> | <table border=1 width=250><tr><td>$form:name</td></tr></table> |
| Line 144 ${comment}. | Line 159 ${comment}. |
| ^connect[$connect-string]{ | ^connect[$connect-string]{ |
| $shit[^taint[our's]] | $shit[^taint[our's]] |
| # $paf[^table:sql{insert into paf (name, age) values ('$shit', ^random:generate(10000))}] | # $paf[^table:sql{insert into paf (name, age) values ('$shit', ^random:generate(10000))}] |
| ^nothing:sql{update paf set age=age+1} | |
| $paf[^table:sql{select * from paf order by id desc}(5)] | $paf[^table:sql{select * from paf order by id desc}(5)] |
| $paf{ | $paf{ |
| ^if(^empty[]){query result is empty}{ | ^if(^empty[]){query result is empty}{ |
| Line 152 ${comment}. | Line 168 ${comment}. |
| ^menu{<tr><td>$id</td><td>$name</td><td>$age</td></tr>} | ^menu{<tr><td>$id</td><td>$name</td><td>$age</td></tr>} |
| </table> | </table> |
| }} | }} |
| ^^string:sql{select name from paf where id=1}=^string:sql{select name from paf where id=1}<br> | |
| ^^int:sql{select age from paf where id=1}=^int:sql{select age from paf where id=1}<br> | |
| ^^double:sql{select age from paf where id=1}=^double:sql{select age from paf where id=1}<br> | |
| $paf[^hash:sql{select id,age from paf}] | |
| ^$paf.2.age=$paf.2.age<br> | |
| } | } |
| #} | #} |
| #} | #} |
| @eol[] | |
| eol | |
| @default[test;def] | @default[test;def] |
| $result[^if(^test.length[]){$test}{$def}] | $result[^if(^test.length[]){$test}{$def}] |