лог Журнала в файл
Posted: 2009-04-08 22:58:53
Code: Select all
var fl=file("C:\1.txt")
sub abs()
fl.open()
fl.WriteLn(UO.Journal())
fl.close()
end subPage 1 of 1
Posted: 2009-04-08 23:35:28
Code: Select all
sub main()
var i, f = file( '1.txt' )
f.create()
f.open()
for i = 0 to 99
f.writeLn( uo.journal( i ) )
next
f.close()
endsubPosted: 2009-04-09 00:46:15
Гдето видил что бы он не перезаписывал файл а добовлял в конце файла новые записи, но уже не могу найти, там суть в одной строчке но найти не могу. и За одно не подскажите по другому скрипту. как мне присвоить perm2 слово "ДА" prem2=(да) много чего перепробывал не получается(
Posted: 2009-04-09 01:13:03
f.create() - эту строку сотрите 
PS: perm2 = "ДА"
PS: perm2 = "ДА"
Posted: 2009-04-09 01:18:43
Большое спасибо, но не работает:(Destruction wrote:
PS: perm2 = "ДА"
Posted: 2009-04-09 03:16:21
Posted: 2009-04-09 22:16:40
Code: Select all
line=UO.injournal(name)
per1=Trim(Right(UO.Journal(line-1),1))
if val(per1) == per2 thenи по поводу лог файла, он почему то не добовляет новые записи. а заменяет.