'создаётся объект типа "IShellDispatch": Set objShellApp = CreateObject("Shell.Application")
Не все объекты, их свойства и методы будут работать на всех версиях Windows. Подробности — см. MSDN (часто проще проверить работоспособность кода экспериментально). Устанавливайте обновления для Internet Explorer. Некоторые методы доступны или имеют смысл только в контексте HTML-документа.
При использовании свойств и методов объекта Shell, возвращающих агрегатные объекты, в VBScript желательно всегда обрабатывать исключения и проверять полученный объект на существование (сравнивать с Nothing). Объект типа «IShellDispatch» возвращается также в таких случаях:
Пример №1:
Set objShellApp = CreateObject("Shell.Application") Set objISD = objShellApp.Application
Пример №2:
Set objShellApp = CreateObject("Shell.Application") Set objISD = objShellApp.Parent
Пример №3:
Set objShellApp = CreateObject("Shell.Application") Set objFolder = objShellApp.NameSpace("C:\") Set objISD = objFolder.Application
Пример №4:
Set objShellApp = CreateObject("Shell.Application") Set objFolder = objShellApp.NameSpace("C:\") Set objFolderItems = objFolder.Items() Set objISD = objFolderItems.Application
Пример №5:
Set objShellApp = CreateObject("Shell.Application") Set objFolder = objShellApp.NameSpace("C:\") Set objFolderItem = objFolder.Self Set objISD = objFolderItem.Application
Если у Вас есть вопросы, жалобы или предложения по работе нашей компании, напишите нам Нам важно любое мнение. Спасибо.