DTS Package и InternetExplorer

Glory
Дата: 15.02.2001 11:30:21
Привет всем !

Не поможете ли решить следующую проблемку.
Как из DTS Package запустить IE с заданным URL-ом и САМОЕ ГЛАВНОЕ закрыть его через определенный таймаут. Обыкновенный запуск iexplore.exe конечно работает, но т.к. окно не закрывается автоматом, то приходиться просто прерывать этот шаг.
Может быть можно использовать ActiveX script, но в нем я не силен.


Конфигурация
SQL 2000
Win200 AdvServer with SP1
IE 5.5
Дед Маздай
Дата: 16.02.2001 00:41:14
Делаешь глобальную переменную пакета по имени, скажем, objIE типа Other (она потом сама поменяет свой тип на Dispatch).
Первая задача - ActiveX Script - имеет вид:
Function Main()
Dim objIE
Set objIE = CreateObject("InternetExplorer.Application.1")
objIE.Visible = True
objIE.Navigate2 "http://www.microsoft.com"
set DTSGlobalVariables("objIE").Value = objIE
Main = DTSTaskExecResult_Success
End Function

Затем твои какие-то действия, преобразования, тайм-ауты и пр.
В завершение еще одна задача в виде активного скрипта - закрытие IE:
Function Main()
DTSGlobalVariables("objIE").Value.Quit
Main = DTSTaskExecResult_Success
End Function

Все.
Glory
Дата: 16.02.2001 11:34:36
Большое спасибо !!
Все работает

Вопрос для расширения знаний по активным скриптам: а как можно узнать список
доступных для функции CreateObject объектов и их свойств и методов ?
Дед Маздай
Дата: 16.02.2001 14:13:35
К активным скриптам этот вопрос прямого отношения не имеет, лучше почитайте какую-нибудь популярную книжку по COM (COM+) и Automation. Если не хотите углубляться в детали, то возьмите простейшую гляделку oleview.exe (в составе утилит на диске с Visual Studio). По-моему, их показывает даже Visual Basic (Project -> References).