Я хотел бы, чтобы мой VBScript отображал диалоговое окно Windows «Сохранить как», но я не мог понять, как это сделать. Используя этот код: Dim sfd Set sfd = CreateObject("UserAccounts.CommonDialog") sfd.ShowOpen Я могу получить диалоговое...

Вызов SetThemeAppProperties с аргументом, у которого флаг STAP_ALLOW_CONTROLS не установлен, приводит к CoCreateInstance для общих диалоговых окон (или в диалоговом окне открытия файла, CLSID_FileOpenDialog ) для возврата ошибки 0x80040111...