by Chris Kesler (7 Submissions)
Category: Databases/Data Access/DAO/ADO
Compatability: Visual Basic 3.0
Difficulty: Beginner
Date Added: Wed 3rd February 2021
Rating: (6 Votes)
UPDATED - 12/07/01!!! This kind of goes against my article earlier this this week. In a new environment I was able to do two things. I was able to query a list of DTS Packages from my Server and then execute a chosen Package remotely. This can be easily modified to accept collections and remotely fire multiple Packages on a timer (which is what I'm using it for). If you downloaded the zip file earlier you may want to download it again since I've updated it and revised some of the references.
NOTE: If you use a DSN connection it must be pointed at the MSDB database to get the list of DTS Packages, not the Database you are trying to run the DTS Packages Against.
API DeclarationsPublic Declare Function ShellExecute& Lib "shell32.dll" Alias "ShellExecuteA" _
(ByVal hwnd As Long, ByVal lpOperation As String, ByVal lpFile As String, ByVal lpParameters As String, ByVal lpDirectory As String, ByVal nShowCmd As Long)
Public Const SW_NORMAL = 1