Следующий код представляет собой пакет DTS в службе интеграции SQLServer2005, вызываемый в VB.NET (Framework 2.0).
1. Если вы хотите вызвать DTS в WebService, вы должны использовать язык VB.NET. Потому что если вы напишете WebService на C#, вы не сможете ссылаться на компонент Microsoft.SqlServer.ManagedDTS.
2. Добавьте учетную запись СЕТЕВАЯ СЛУЖБА в группу «Администраторы», иначе DTS не будет выполнен. (Принесет дыры в безопасности)
1 Импортирует Microsoft.SqlServer.Dts.Runtime
2
3 'Код веб-сервиса
4 <ВебМетод()> _
5 Открытая функция ExecutePackage() как целое число
6 Dim pkg As String = "D:DevelopmentProgramePackageDevPackageMG-TSJF-PKG.dtsx"
7
8. Уменьшить приложение как приложение = Новое приложение()
9 Dim p As Package = app.LoadPackage(pkg, Nothing)
10 'p.InteractiveMode = True
11
12 Dim vir As Variables = p.Variables
13 vir("Пользователь::PackageID").Значение = 4
14
15 Если p.Execute(Nothing, vir, Nothing, Nothing, Nothing) = DTSExecResult.Success Тогда
16 Возврат 0
17 Еще
18 Возврат 1
19 Конец, если
20 Функция завершения
http://www.cnblogs.com/liguancong/archive/2006/08/29/489681.html