Что нового

[Математика] Прибавление к числу "+1" при запуске

nu3dell

Осваивающий
Сообщения
139
Репутация
24
Как сделать при запуске в txt "0", при следующем запуске добавляло "+1" и уже получиться не 0, а 1. При следующим запуске еще "+1" только уже к числу не 0, а 1(ибо должно было измениться с 0 ->1)
Получаться просто к имеющемся числу прибавить "1"
 

Medic84

Омега
Команда форума
Администратор
Сообщения
1,590
Репутация
341
В txt помимо числа есть еще что нибудь?
 

Medic84

Омега
Команда форума
Администратор
Сообщения
1,590
Репутация
341
Re: [Математика] Прибавление к числу \"+1\" при запуске

Тогда как то так
Код:
$File = "Txt.txt"

$sRead = Number( StringStripWS( StringStripCR( FileRead($File ) ),8 ) )
$sRead += 1
$hOpen = FileOpen($File , 2)
FileWrite($hOpen, $sRead)
FileClose($hOpen)



Добавлено:
Сообщение автоматически объединено:

Изменил немного скрипт...
 

XpycT

Скриптер
Сообщения
380
Репутация
133
nu3dell
Еще вариант
Код:
$sFile = @ScriptDir & "\TXT.txt"

$iNum = FileReadLine($sFile, 1) + 1
$hFile = FileOpen($sFile , 2)
FileWrite($hFile, $iNum)
FileClose($hFile)
 
Верх