VBscript

**Sprsrini** · 23/12/2009, 10h07

Bonjour,

J'ai créé un objet Internet Explorer dans mon script vb de façon à ce qu'il affiche une fenêtre IE que j'ai personnalisé avec du code HTML.

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
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
Set objExplorer = WScript.CreateObject("InternetExplorer.Application")
 
'Création de la fenêtre IE
objExplorer.Navigate "about:blank"  
objExplorer.Left = 100      
objExplorer.Top = 100 
objExplorer.Height = 400
objExplorer.Width = 550
objExplorer.MenuBar = 0         
objExplorer.ToolBar = 0
objExplorer.StatusBar = 0
objExplorer.document.Title = "MAJ"
objExplorer.document.ParentWindow.document.body.scroll= "no"
objExplorer.document.ParentWindow.document.body.style.borderStyle = "outset"
objExplorer.Visible = 1
 
strStart = "<html>"
strStart = strStart & "<body>"
strStart = strStart & "<title>MAJ</title>"
strStart = strStart & "<center><img src='toto.gif' alt='toto'></center>"
strStart = strStart & "<center><font color='orange' size='4pt'><b>Mise à jour</b></font></center>"
strStart = strStart & "<br /><br />"
strStart = strStart & "<hr />"
strStart = strStart & "<br />"
strStart = strStart & "<center><b>Avancement...</b></center><br /><br />"
strEnd = strEnd & "<br /><br />"
strEnd = strEnd & "<br /><hr />"
strEnd = strEnd & "<br />"
strEnd = strEnd & "<center><font size='2pt'>&copy;2009 - Srini - <a href = 'mailto:moi@srini.com'>Contact</a></font></center>"
strEnd = strEnd & "</body>"
strEnd = strEnd & "</html>"
 
objExplorer.Document.Body.InnerHTML = strStart & "Début de l'opération..." & strEnd

Ce script marche bien...sauf pour l'affichage de l'image. La page IE créée ne trouve pas l'image. Il m'affiche le contenu du "alt" de la balise IMG mais l'image n'apparaît pas. Je me demande s'il n'y a pas un problème au niveau des quotes ('...') dans la balise IMG.

C'est également le cas pour la balise

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

<link rel='stylesheet' type='text/css' href='style.css' />

pour le CSS qui ne marche pas (dans la version précédente j'avais bien mis les balises div avec des id).

Merci d'avance pour votre aide.

**SfJ5Rpw8** · 23/12/2009, 21h44

Envoyé par Sprsrini

..sauf pour l'affichage de l'image. La page IE créée ne trouve pas l'image. Il m'affiche le contenu du "alt" de la balise IMG mais l'image n'apparaît pas. ..

Dans ton code Html tu ne spécifie pas le chemin de ton image ! est tu sur que ta session internet explorer utilise bien comme répertoire par défaut le répertoire ou tu as stocké ton image ?

**Sprsrini** · 23/12/2009, 21h53

Bonsoir,

Merci pour ta réponse.

En ce qui concerne le chemin, j'ai déjà essayé d'ajouter le chemin manuellement, de la forme :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

C:/Mon dossier/image.gif

ou encore

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

C:/Mon%20Dossier/image.gif

ou encore

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

file:///C:\Mon%Dossier\image.gif

ou encore

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

file:///C:/Mon%Dossier/image.gif

ou encore avec une variable CurrentDirectory de vbscript, mais ça ne marche pas.

Merci

**SfJ5Rpw8** · 23/12/2009, 21h55

ben c'est plutôt un problème dans ton code html non ?

pourquoi / et pas \ dans les chemins.. tu est bien sous windows non ?

**Sprsrini** · 23/12/2009, 22h46

Voilà ce que j'ai réessayé de faire :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

<img src='file:///C:/Mon%Dossier/image.gif' alt='image' />

--> j'ai pris ce chemin à partir des propriétés de l'image quand je le charge tout seul dans une page IE
--> ça ne marche pas

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

<img src='C:\Mon Dossier\image.gif' alt='image' />

--> ça ne marche pas

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

<img src='http://i5.woopic.com/I/Footer/logoFT.gif' alt='image' />

--> là ça marche

En résumé, si je met un chemin local, ça ne fonctionne pas. Par contre si je met un URL internet, ça fonctionne.

Bizarre

VBscript - HTML > Problème d'affichage d'image

Discussions similaires

Partager

Partager