Что нового

[Автоматизация] Func _AutoSave

maxim_porsche

Новичок
Сообщения
25
Репутация
0
Версия AutoIt: v3
Описание:Здравствуйте!
Суть проблемы:
Запускается программа--->после её окончания должен сохраниться файл)
Конкретно,он должен сохраниться в папку для всех пользователей application data,но у меня он никак не сохранятеся


Примечания: Вот набросок:
Код:
Func _AutoSave()
     If StringLen($Text)>$KolSum0 Then
         $i = 0
         Do
             $i+=1
         Until Not FileExists(@ScriptDir&'name_'&$i&'.log')
         Dim $filename=@ScriptDir&'name_'&$i&'.log'
         If FileGetSize($filename)>$Size0*1024 Then $filename=@ScriptDir&'name_'&$i&'.log'
         $Text=StringRegExpReplace($Text, '(\r\n){2,}', @CRLF&@CRLF) ;удаляем многократные переходы строк
         $aText=StringRegExp($Text,'(?s)(^.*)\r\n(.*)$',3)
         If @Error Then
             Local $file = FileOpen($filename,1)
             FileWrite($file, @CRLF&@MDAY&"."&@MON&"."&@YEAR&" - "&@HOUR&":"&@MIN&":"&@SEC&@CRLF&$Text)
             FileClose($file)
             $Text=''
         Else
             If UBound($aText)=2 Then
                 Local $file = FileOpen($filename,1)
                 FileWrite($file, @CRLF&@MDAY&"."&@MON&"."&@YEAR&" - "&@HOUR&":"&@MIN&":"&@SEC&@CRLF&$aText[0])
                 FileClose($file)
                 $Text=$aText[1]
             EndIf
         EndIf
     EndIf
EndFunc
 

madmasles

Модератор
Глобальный модератор
Сообщения
7,790
Репутация
2,322
Предупреждение За нарушение правил форума (пункт Б.5):
Имя темы должно нести смысловую нагрузку (отражать суть вопроса/проблемы)
Правильно сформулированное название темы привлекает больше внимания, и шансы получить конкретный ответ увеличиваются.


Данные правила могут пополняться локальными правилами раздела.
Как правильно называть темы

"[Автоматизация] Func _AutoSave" - это неприемлемое название темы, переименуйте тему иначе она будет закрыта, а вам возможно будет выдан бан на несколько дней.

С уважением, ваш Глобальный модератор.
 
Верх