Run time error "424" Необходим объект

@Divergent · Регистрация: 01.09.2014

Студворк — интернет-сервис помощи студентам

Visual Basic
1
2
3
4
5
6
7
8
9
10
11
Private Sub Command1_Click()
Set WshShell = WScript.CreateObject("WScript.Shell")
kl = True
Do While kl
 Set colProcessList = objWMIService.ExecQuery("Select * from Win32_Process Where Name='proga.exe'")
 If colProcessList.Count = 0 Then
  WshShell.Run "C:\Progra~1\Proga.exe"
 End If
 WScript.Sleep (5000)
Loop
End Sub

------------

Пишет:
Run time error "424"
Необходим объект.

Как исправить?

@Catstail · 24.10.2014, 17:41

Скорее всего в 5-й строке не создан объект objWMIService

@The trick · 24.10.2014, 17:43

1.

Visual Basic
1
Set WshShell = CreateObject("WScript.Shell")

2. Не создан объект objWMIService

Visual Basic
1
Set objWMIService = GetObject("WinMgmts:")

@Divergent · 25.10.2014, 15:00 **[ТС]**

Теперь это выдает((:
Method 'Run' of object ''IWshShell3' failed

Как это исправить?

Dragokas · 25.10.2014, 18:43

Нет такого файла, или отключен режим коротких имен 8.3.

Новые блоги и статьи Все статьи Все блоги /
Знаешь почему 90% людей редко бывают счастливыми? kumehtar 14.04.2026 Потому что они ждут. Ждут выходных, ждут отпуска, ждут удачного момента. . . а удачный момент так и не приходит.	Фиксация колонок в отчете СКД Maks 14.04.2026 Фиксация колонок в СКД отчета типа Таблица. Задача: зафиксировать три левых колонки в отчете. Процедура ПриКомпоновкеРезультата(ДокументРезультат, ДанныеРасшифровки, СтандартнаяОбработка) / / . . .	Настройки VS Code Loafer 13.04.2026 { "cmake. configureOnOpen": false, "diffEditor. ignoreTrimWhitespace": true, "editor. guides. bracketPairs": "active", "extensions. ignoreRecommendations": true, . . .	Оптимизация кода на разграничение прав доступа к элементам формы Maks 13.04.2026 Алгоритм из решения ниже реализован на нетиповом документе, разработанного в конфигурации КА2. Задачи, как таковой, поставлено не было, проделанное ниже исключительно моя инициатива. Было так:. . .
Контроль заполнения и очистка дат в зависимости от значения перечислений Maks 12.04.2026 Алгоритм из решения ниже реализован на примере нетипового документа "ПланированиеПерсонала", разработанного в конфигурации КА2. Задача: реализовать контроль корректности заполнения дат назначения. . .	Архитектура слоя интернета для сервера-слоя. Hrethgir 11.04.2026 В продолжение https:/ / www. cyberforum. ru/ blogs/ 223907/ 10860. html Знаешь что я подумал? Раз мы все источники пишем в голове ветки, то ничего не мешает добавить в голову такой источник, который сам. . .	Подстановка значения реквизита справочника в табличную часть документа Maks 10.04.2026 Алгоритм из решения ниже реализован на примере нетипового документа "ПланированиеПерсонала", разработанного в конфигурации КА2. Задача: при выборе сотрудника (справочник Сотрудники) в ТЧ документа. . .	Очистка реквизитов документа при копировании Maks 09.04.2026 Алгоритм из решения ниже применим как для типовых, так и для нетиповых документов на самых различных конфигурациях. Задача: при копировании документа очищать определенные реквизиты и табличную. . .

@Catstail Супер-модератор 38203 / 21135 / 4310 Регистрация: 12.02.2012 Сообщений: 34,740 Записей в блоге: 14
	24.10.2014, 17:41
	Скорее всего в 5-й строке не создан объект objWMIService 0

@Divergent 0 / 0 / 0 Регистрация: 01.09.2014 Сообщений: 41
	25.10.2014, 15:00 [ТС]
	Теперь это выдает((: Method 'Run' of object ''IWshShell3' failed Как это исправить? 0

Dragokas 18033 / 7736 / 892 Регистрация: 25.12.2011 Сообщений: 11,502 Записей в блоге: 16
	25.10.2014, 18:43
	Нет такого файла, или отключен режим коротких имен 8.3. 0

Run time error "424" Необходим объект

Решение