|
|
| version 1.451, 2001/10/31 13:07:35 | version 1.458, 2001/11/01 14:59:58 |
|---|---|
| Line 1 | Line 1 |
| @main[] | @main[] |
| ^eval(10\3)<br> | ^thashforeach[] |
| #^thashdelete[] | |
| #^connect[mysql://user:pass@cd.rinet.ru/db]{^void:sql{z} } | |
| #^tappend[] | |
| #^sappend[] | |
| #^eval(10\3)<br> | |
| #^tform[] | #^tform[] |
| #^formattest[] | #^formattest[] |
| #^filelist[] | #^filelist[] |
| Line 51 | Line 55 |
| #^header[] | #^header[] |
| OK | OK |
| @thashforeach[] | |
| $h[ | |
| $.a[1] | |
| $.b[2] | |
| ] | |
| ^h.foreach[key;value]{ | |
| $key=$value<br> | |
| } | |
| @thashdelete[] | |
| $h[$.a[1] $.b[2]] | |
| was:<br> | |
| count=^h._count[] <br> | |
| b='$h.b' <br> | |
| ^h.delete[b] | |
| now:<br> | |
| count=^h._count[] <br> | |
| b='$h.b' | |
| @sappend[] | |
| $test[123] | |
| ^test.save[test] | |
| ^test.save[append;test] | |
| @tappend[] | |
| $test[^table::set{a b | |
| a1 b1}] | |
| ^test.save[test] | |
| $test[^table::set{a b | |
| a2 b2}] | |
| ^test.save[append;test] | |
| @tform[] | @tform[] |
| ^if(def $form:new_file){y}{n} | ^if(def $form:new_file){y}{n} |
| <form method="post" enctype="multipart/form-data"> | <form method="post" enctype="multipart/form-data"> |