El siguiente código es el paquete DTS en el Servicio de Integración de SQLServer2005 llamado en VB.NET (Framework 2.0).
1 Si desea llamar a DTS en WebService, debe utilizar el lenguaje VB.NET. Porque si escribe WebService en C#, no podrá hacer referencia al componente Microsoft.SqlServer.ManagedDTS.
2. Agregue la cuenta SERVICIO DE RED al grupo Administrador; de lo contrario, no se ejecutará DTS. (Traerá agujeros de seguridad)
1 Importa Microsoft.SqlServer.Dts.Runtime
2
3 'Código de servicio web
4 <Método Web()> _
5 Función pública ExecutePackage() como número entero
6 Dim pkg As String = "D:DesarrolloProgramaPackageDevPackageMG-TSJF-PKG.dtsx"
7
8 Aplicación atenuada como aplicación = Nueva aplicación()
9 Dim p como paquete = app.LoadPackage(paquete, Nada)
10 'p.InteractiveMode = Verdadero
11
12 Dim vir Como Variables = p.Variables
13 vir("Usuario::IDPaquete").Valor = 4
14
15 Si p.Execute(Nada, vir, Nada, Nada, Nada) = DTSExecResult.Success Entonces
16 Volver 0
17 más
18 Regreso 1
19 Terminar si
20 Función final
http://www.cnblogs.com/liguancong/archive/2006/08/29/489681.html