Bonjour,
Je bute sur un problème et je ne parviens pas à trouver comment donner le focus à un document word lancé par le script en VB6.
Une explication qlq mots :
- une application web lance la commande d'ouverture d'un document word particulier stocké sur un serveur Unix
- l'exécutable en VB6 qui écoute (avec un timer lit tous les 3'' si un file est lancé) lance le document à l'ouverture situé sur un lecteur réseau mappé sur le serveur Unix
- Cet exe en vb6 crée un objet "word.application" et un objet word.document à partir de l'objet word.application
- ce document est ouvert et doit arrivé au devant de l'écran devant tous les autres fenêtres.
--> le document est bien ouvert mais toujours derrière le browser (IExplore) jamais devant toutes fenêtres
!!! Je remarque que le document apparaît toujours en deuxième position au niveau de l'écran quel que soit le programme au premier niveau (donc pas seulement le browser)
voici mon code :
Merci pour votre aide
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15 Dim objWord As Word.Application Dim DocWord As Word.Document Dim fichier As String '''fichier = le nom du document Set objWord = CreateObject("Word.Application") '-- ouvrir une session Word Sleep 100 Set DocWord = objWord.Documents.Open(fichier) '-- ouvrir le document Word Sleep 100 objWord.WindowState = wdWindowStateMaximize Sleep 100 DocWord.Activate
Bien à vous
Carmelo
Partager