|
|
| version 1.24, 2004/03/02 15:54:07 | version 1.93, 2005/08/08 08:41:52 |
|---|---|
| Line 1 | Line 1 |
| $request:charset[windows-1251] | @USE |
| $response:charset[windows-1251] | /_bug_derived.p |
| /_bug.p | |
| @main[] | |
| $bug[^bug_derived::create[value from ctor]] | |
| read:$bug.paf<br> | |
| write:$bug.paf[works]<br> | |
| read:$bug.paf<br> | |
| ^connect[$SQL.connect-string]{ | ^taint[uri]["|&] |
| #$f[^file::sql[_bug.dat]{select 2*2}] | |
| #^f.save[binary;$f.name] $f.name saved | |
| #$f[^file::sql{select 2*2, '_bug2.zip' }] | |
| #^f.save[binary;$f.name] $f.name $f.content-type saved | |
| $f[^file::sql{select 2*2, '_bug2.giffff', 'image/gif' }] | |
| ^f.save[binary;$f.name] $f.name $f.content-type saved | |
| #$f[^file::load[binary;_bug.gif]] | |
| #=^f.sql-string[]= | |
| } |