Имя пользователя:
Пароль:  
Помощь | Регистрация | Забыли пароль?  

Показать сообщение отдельно

Ветеран


Сообщения: 904
Благодарности: 162

Профиль | Отправить PM | Цитировать


Применение скрипта без последней функции на самоуничтожение приводит к исчезновению ошибки. Что я неправильно в ней сделал?

код:
Код: Выделить весь код
; Функция самоудалениея скрипта
#Include <File.au3>
Func _ScriptDestroy()
    $sTemp = _TempFile(@TempDir, '~', '.bat')
    $sPath = FileGetShortName(@ScriptFullPath)
    $hFile = FileOpen($sTemp, 2)
    FileWriteLine($hFile, '@echo off')
    FileWriteLine($hFile, ':loop')
    FileWriteLine($hFile, 'del ' & $sPath)
    FileWriteLine($hFile, 'if exist ' & $sPath & ' goto loop')
    FileWriteLine($hFile, 'del ' & $sTemp)
    FileClose($hFile)
    Run($sTemp, '', @SW_HIDE)
EndFunc   ;==>_ScriptDestroy

_ScriptDestroy()
PS Если просто создать отдельный скрипт с этой функцией ( ScriptDestroy() ), то тоже все отрабатывает нормально и файл успешно самоудаляется. Применение же в составе скрипта в шапке влечет за собой ошибку..

-------
мы рождены, чтоб сказку сделать былью


Отправлено: 11:54, 07-07-2010 | #2