|
|
1.1 misha 1: @main[]
2: $sText[zigi]
3: $sFileName[218-?-.txt]
4:
5: ^sText.save[$sFileName]
6: file was saved (^check[])<br />
7:
8: ^file:delete[$sFileName]
9:
10: file was deleted (^check[])<br />
11:
12: @check[]
13: $t[^file:list[./;-\.txt^$]]
14: $result[^if($t==1 && $t.name eq "218-_3F-.txt"){EXIST}{DOES NOT EXIST}]