Pb automation

netgab Messages postés 2 Date d'inscription mercredi 15 septembre 2004 Statut Membre Dernière intervention 4 mars 2008 - 3 mars 2008 à 17:25
NHenry Messages postés 15113 Date d'inscription vendredi 14 mars 2003 Statut Modérateur Dernière intervention 22 avril 2024 - 4 mars 2008 à 10:10
    Bsr
j'utilise ceci dans mon code

 Dim WordApp As Word.Application
        Dim aDoc As Word.Document
        Dim fileName As Object = "normal.dot"
        Dim newTemplate As Object = False
        Dim docType As Object = 0
        Dim isVisible As Object = True
        Dim nbi As Integer
        Dim Tag As String

        WordApp = CreateObject("word.application")
        aDoc = WordApp.Documents.Add(Application.StartupPath & "\IDCC.doc")

ect.....

La ligne en rouge me renvoie toujours l'erreur suivante:
impossible d'efectuer un cast d'objet COM de Type
Microsoft.Office.Interop.word.ApplicationClass en type de classe
Word.applicationClass....

Ce programme fonctionne sur 2 postes de test sans soucis par contre pas
moyen de le faire fonctionner sur le poste du client final.

Merci de votre aide

1 réponse

NHenry Messages postés 15113 Date d'inscription vendredi 14 mars 2003 Statut Modérateur Dernière intervention 22 avril 2024 159
4 mars 2008 à 10:10
Bonjour

Ben c'est normal, CreateObject te retourne un Object et non un type plus précis, mais :
WordApp = New word.application
Ne fonctionne pas ?

Dans Word, j'Excel. (juste pour la citation)
VB (6, .NET1&2), C++, C#.Net1
Mon site
0
Rejoignez-nous