Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire
Veuillez sélectionner un problème
Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
Ledev
Oula, tu t'embrouille.
Webbrowser.document te renverra un objet de type HTMLDocument. m_app.documents(0) lui voudra un objet de type word.document.
Plusieurs solutions s'offre a toi: -tu télécharge le fichier(avec Winsock ou inet par exemple), et tu l'ouvre avec m_app.documents.open -Tu ouvre l'url comme ceci: private sub Webbrowser1_DocumentComplete( m_app.documents.open webbrowser1.LocationName
La seconde solution vas faire télécharger le doc dans Internet explorer, et après la retélécharger avec Word(de plus Word ne tiens pas compte du cache Internet, enfin je crois pas). Donc je te conseil la premières solution.
a+
"Serge Fournier" a écrit dans le message de news:
'Bonjour,
'Je recupere un .doc dans un objet webBrowser.
'Alors je fais :
private WithEvents m_app as word.Application
'puis dans
Private sub webbrowser1_DocumentComplete(byval pDisp as object, URL as Variant)
set m_app = new Word.Application
'et maintenant je voudrais assigner a m_app.documents ??? le document du webbrowser alors je fais :
set m_app.Documents(0) = webbrowser1.Document << erreur de syntaxe
???
'le but etant d'utiliser l'objet m_app avec le document chargé ...
end sub
'qqun a une idee ?
'Merci
Oula, tu t'embrouille.
Webbrowser.document te renverra un objet de type HTMLDocument.
m_app.documents(0) lui voudra un objet de type word.document.
Plusieurs solutions s'offre a toi:
-tu télécharge le fichier(avec Winsock ou inet par exemple), et tu
l'ouvre avec m_app.documents.open
-Tu ouvre l'url comme ceci:
private sub Webbrowser1_DocumentComplete(
m_app.documents.open webbrowser1.LocationName
La seconde solution vas faire télécharger le doc dans Internet explorer, et
après la retélécharger avec Word(de plus Word ne tiens pas compte du cache
Internet, enfin je crois pas). Donc je te conseil la premières solution.
a+
"Serge Fournier" <serge.fournier@skillsoftware.com> a écrit dans le message
de news:ePLgOwHTDHA.632@TK2MSFTNGP12.phx.gbl...
'Bonjour,
'Je recupere un .doc dans un objet webBrowser.
'Alors je fais :
private WithEvents m_app as word.Application
'puis dans
Private sub webbrowser1_DocumentComplete(byval pDisp as object, URL as
Variant)
set m_app = new Word.Application
'et maintenant je voudrais assigner a m_app.documents ??? le document du
webbrowser alors je fais :
set m_app.Documents(0) = webbrowser1.Document << erreur de syntaxe
???
'le but etant d'utiliser l'objet m_app avec le document chargé ...
Webbrowser.document te renverra un objet de type HTMLDocument. m_app.documents(0) lui voudra un objet de type word.document.
Plusieurs solutions s'offre a toi: -tu télécharge le fichier(avec Winsock ou inet par exemple), et tu l'ouvre avec m_app.documents.open -Tu ouvre l'url comme ceci: private sub Webbrowser1_DocumentComplete( m_app.documents.open webbrowser1.LocationName
La seconde solution vas faire télécharger le doc dans Internet explorer, et après la retélécharger avec Word(de plus Word ne tiens pas compte du cache Internet, enfin je crois pas). Donc je te conseil la premières solution.
a+
"Serge Fournier" a écrit dans le message de news:
'Bonjour,
'Je recupere un .doc dans un objet webBrowser.
'Alors je fais :
private WithEvents m_app as word.Application
'puis dans
Private sub webbrowser1_DocumentComplete(byval pDisp as object, URL as Variant)
set m_app = new Word.Application
'et maintenant je voudrais assigner a m_app.documents ??? le document du webbrowser alors je fais :
set m_app.Documents(0) = webbrowser1.Document << erreur de syntaxe
???
'le but etant d'utiliser l'objet m_app avec le document chargé ...
end sub
'qqun a une idee ?
'Merci
Serge Fournier
Il suffisait d'ecrire :
private WithEvents m_app as word.Application private WithEvents m_doc as word.Document
Private sub webbrowser1_DocumentComplete(byval pDisp as object, URL as Variant)
set m_doc = webbrowser1.Document set m_app = m_doc.Application
end sub
du coup, je recupere bien les evenements du .doc droppé ds le browser. ex :
Private Sub m_app_WindowSelectChange(byval Sel as Word.Selection)
msgbox Sel
End sub
affiche bien le contenu du double click ....... cool !
Il suffisait d'ecrire :
private WithEvents m_app as word.Application
private WithEvents m_doc as word.Document
Private sub webbrowser1_DocumentComplete(byval pDisp as object, URL as
Variant)
set m_doc = webbrowser1.Document
set m_app = m_doc.Application
end sub
du coup, je recupere bien les evenements du .doc droppé ds le browser.
ex :
Private Sub m_app_WindowSelectChange(byval Sel as Word.Selection)
msgbox Sel
End sub
affiche bien le contenu du double click ....... cool !
