erreur d'execution d'un DTS sqlserveur 2000 depuis VB6
Bonjour cher developpeurs
Je viens de débuter avec la programmation base de donnée (SQL SERVER 2000) avec VB6 comme environnement de développement.
Mon application est très simple:
J'ai créé un DTS PACKAGE que j'ai nommé "Pack1" sur un serveur local.
j'ai suivi les directives suivantes :
1. Démarrez l'environnement de développement Visual Basic et puis créez une nouvelle application Windows (EXE standard).
2. Dans le menu Projet, cliquez sur Références. Sélectionnez Bibliothèque objet de Microsoft DTSPackage et cliquez sur OK.
3. Ajoutez un nouveau bouton de commande au formulaire. Il aura le nom par défaut Command1.
ensuite j'ai introduit le code suivant :
Code:
1
2
3
4
5
6
7
8
9
10
|
Private Sub Command1_Click()
Dim dtsp As New DTS.Package
dtsp.LoadFromSQLServer _
ServerName:="local", _
ServerUserName:="sa", _
ServerPassword:="000000", _
PackageName:="pack1"
dtsp.Execute
End Sub |
sachant que le username et le password sont corrects
mais le problème c'est que lorsque je clique sur "commande 1" parés exécution je reçoit l message d'erreur suivant :
http://nsa08.casimages.com/img/2009/...2801275620.jpg
j'attends avec impatience vos aides précieuses
et merci d'avance
