|
|
| version 1.24, 2004/03/02 15:54:07 | version 1.80, 2005/01/20 14:10:29 |
|---|---|
| Line 1 | Line 1 |
| $request:charset[windows-1251] | @main[] |
| $response:charset[windows-1251] | ^first[] |
| ^if(def $error){ | |
| ^if(^error.pos[koshmar]>=0){ | |
| ^connect[$SQL.connect-string]{ | $error, TODO:recover |
| #$f[^file::sql[_bug.dat]{select 2*2}] | }{ |
| #^f.save[binary;$f.name] $f.name saved | $error, TODO:die |
| } | |
| #$f[^file::sql{select 2*2, '_bug2.zip' }] | } |
| #^f.save[binary;$f.name] $f.name $f.content-type saved | @first[] |
| ^second[] | |
| ^if(!def $error){ | |
| working1 | |
| } | |
| @second[] | |
| ^if(^math:random(2)){ | |
| $error[koshmar,test1] | |
| } | |
| ^if(!def $error){ | |
| working2 | |
| $f[^file::sql{select 2*2, '_bug2.giffff', 'image/gif' }] | ^if(^math:random(2)){ |
| ^f.save[binary;$f.name] $f.name $f.content-type saved | $error[uzhas,test2] |
| #$f[^file::load[binary;_bug.gif]] | } |
| #=^f.sql-string[]= | ^if(!def $error){ |
| working3 | |
| } | |
| } | } |