VB - "L'objet invoqué s'est déconnecté de..." [Fermé]

Signaler
Messages postés
230
Date d'inscription
jeudi 19 novembre 2009
Statut
Membre
Dernière intervention
19 mai 2015
-
Bonjour,

J'ai un programme en VBScript qui utilise BO pour actualiser une requête et l'enregistrer sur un serveur au format .txt. Voici mon code :

Dim objBO, objrep, repBO
'Dim repBO As busobj.Report

'Ouvre Business Object
Set objBO = CreateObject("BusinessObjects.Application.6")

 'Forcer la connection
objBO.LoginAs "XXX", "XXX", False

'Ouvre le rapport
Set objrep = objBO.Documents.Open("Z:XXX")
 
'Affiche BO
objBO.Visible = True
 
'Lance la requête BO
objrep.Refresh

'Enregistrer sous au format txt
Set repBO = objrep.Reports.Item(1)
repBO.ExportAsText "\\XXX\flux.txt"

'Fermer la requête BO en enregistrant
objrep.Close 'boSaveIfModified

'Quitter BO
objBO.Quit



Depuis que j'ai changé d'ordinateur ce code ne fonctionne plus. La ligne qui pose problème est celle qui ouvre Business Objet (en gras dans le code). Voici le message d'erreur :

L'objet invoqué s'est déconnecté de ses clients. (80010108)


Merci d'avance!