Имя пользователя:
Пароль:
 

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

Ветеран


Contributor


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

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


Logonius, По видимому, моё решение прямолинейно: Вы сформулировали, как Вы хотите решить задачу, я тупо написал решение. Но, вчитываясь в Ваши посты:
Цитата Logonius:
батник будет запускаться после основного файла следом.
........................
работает, а можно батник в exe конвертировать?, будет работать, просто мне надо чтоб он тихо в фоне включался, а так CMD окно вылазит. »
, делаю вывод, что ваша основная программа запускается неким командным файлом. И, чтобы убить папку после её отработки, вовсе не надо дополнительно анализировать, есть она в процессах, или нет. Надо просто дождаться окончания программы стандартным образом, то есть, в CMD запустить ее через Start /Wait (сохранить в 866 кодировке)
Код: Выделить весь код
@Echo Off
	Set "NameExe=C:\Windows\System32\notepad.exe" 'Здесь прописать путь к программе
	Set "NameDel=Какая то папка или файл"         'Здесь прописать имя папки или файла

	Start /Wait " " "%NameExe%"
	2>nul Rd /S /Q "%NameDel%" 
	2>nul Del "%NameDel%" 
Exit /B
А чтобы не напрягало CMD-окно, вот VBS вариант (сохранить в 1251 кодировке)
Код: Выделить весь код
NameExe = "C:\Windows\System32\notepad.exe" 'Здесь прописать путь к программе
NameDel = "Какая то папка или файл"         'Здесь прописать имя папки или файла

Ret = CreateObject("WScript.Shell").Run(NameExe, 1, True)
        
With CreateObject("Scripting.FileSystemObject")
    PNameDel = .GetParentFolderName(WScript.ScriptFullName) + "\" + NameDel
    If .FolderExists(PNameDel) Then .DeleteFolder PNameDel, True
    If .FileExists(PNameDel) Then .DeleteFile PNameDel, True
End With

-------
Даже самая сложная проблема обязательно имеет простое, лёгкое для понимания, неправильное решение. Каждое решение плодит новые проблемы.


Последний раз редактировалось megaloman, 23-08-2020 в 12:23.

Это сообщение посчитали полезным следующие участники:

Отправлено: 10:50, 23-08-2020 | #18