AZJIO Silver Member Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору Set objService = GetObject("winmgmts:{impersonationLevel=impersonate}!\\.\root\CIMV2") Set objRefresher = CreateObject("WbemScripting.SWbemRefresher") Set colItems = objRefresher.AddEnum(objService, "Win32_Process").objectSet Do Until False     WScript.Sleep 500     objRefresher.Refresh     Flag = True     For Each objItem in colItems         If objItem.ProcessID = 772 Then             Flag = False         End If     Next     If Flag = True Then         Exit Do     End If Loop Set objShell = CreateObject("WScript.Shell") objShell.Run("D:\AU3\~1.AU3") Set objFSO = CreateObject("Scripting.FileSystemObject") Set File = objFSO.GetFile("B:\~mkueozo.vbs") File.Delete Всего записей: 4413 | Зарегистр. 03-05-2006 | Отправлено: 17:33 22-04-2010

На первую страницу • к этому сообщению • к последнему сообщению

Компьютерный форум Ru.Board » Операционные системы » Microsoft Windows » Windows Preinstallation Environment(WinPE) и BartPE LiveCD 7

vu1tur (27-01-2012 03:24): следующая часть — http://forum.ru-board.com/topic.cgi?forum=62&topic=24098

Переход по форумам  Закладки   » Компьютеры Цифровое изображение Программы Microsoft Windows UNIX Другие OS Hardware В помощь сисадмину Прикладное программирование Игры Форумные игры   » Интернет Web-программирование В помощь вебмастеру Графика Хостинг Зацените-ка!   » Тематические Ikonboard v.2 Ikonboard v.3 Invision Board Другие форумы PHP-Nuke и другие порталы Мобила   » Общие Спорт Флейм Темы по региональным встречам Музыка и Кино Юмор Литература и Живопись   » Ru.Board Новости Помощь по форуму   » Андеграунд eBookz Варезник Раздачи и акции Мобильный варезник Андеграунд Игры и фильмы   » Специальные Тестирование