OVH Cloud OVH Cloud

Ouvrir IE6 en modifiant la dimension des pages...

2 réponses
Avatar
Sylvie
Bonjour,

Je souhaiterai dans ma syntaxe ci-après, ouvrir IExplorer sans barre
d'outils et avec une dimension spécifique des pages. J'ai écrit cela:

(J'ai créé 1 .exe avec cette syntaxe)

Shell "C:\Program Files\Internet Explorer\iexplore.exe -k
http://www.localhost/"

Dans le cas présent, j'ouvre mon intranet en pleine page mais, est-il
possible comme en JavaScript de dimensionner les pages et de supprimer les
barres d'outils (WIDTH, HEIGHT, TOOLBAR etc.)

Merci de bien vouloir m'aider SVP

Sylvie

2 réponses

Avatar
François Picalausa
Bonjour/soir,

C'est faisable par automation.
Exemple:
'Possibilité de le faire en early binding aussi en utilisant la
référence
'"Microsoft Internet Control"

Dim MSIE As Object

Set MSIE = CreateObject("InternetExplorer.Application")

MSIE.MenuBar = False
MSIE.ToolBar = False
MSIE.StatusBar = False
MSIE.Resizable = False 'on ne peut pas la redimensionner
MSIE.Width = 800
MSIE.Height = 600

MSIE.Navigate2 "faq.vb.free.fr"
MSIE.Visible = True

--
François Picalausa (MVP VB)
FAQ VB : http://faq.vb.free.fr
MSDN : http://msdn.microsoft.com


"Sylvie" a écrit dans le message de
news:
Bonjour,

Je souhaiterai dans ma syntaxe ci-après, ouvrir IExplorer sans barre
d'outils et avec une dimension spécifique des pages. J'ai écrit cela:

(J'ai créé 1 .exe avec cette syntaxe)

Shell "C:Program FilesInternet Exploreriexplore.exe -k
http://www.localhost/"

Dans le cas présent, j'ouvre mon intranet en pleine page mais, est-il
possible comme en JavaScript de dimensionner les pages et de
supprimer les barres d'outils (WIDTH, HEIGHT, TOOLBAR etc.)

Merci de bien vouloir m'aider SVP

Sylvie


Avatar
Sylvie
Bonjour,

Un grand merci à vous!

Sylvie
"François Picalausa" a écrit dans le message de news:
#
Bonjour/soir,

C'est faisable par automation.
Exemple:
'Possibilité de le faire en early binding aussi en utilisant la
référence
'"Microsoft Internet Control"

Dim MSIE As Object

Set MSIE = CreateObject("InternetExplorer.Application")

MSIE.MenuBar = False
MSIE.ToolBar = False
MSIE.StatusBar = False
MSIE.Resizable = False 'on ne peut pas la redimensionner
MSIE.Width = 800
MSIE.Height = 600

MSIE.Navigate2 "faq.vb.free.fr"
MSIE.Visible = True

--
François Picalausa (MVP VB)
FAQ VB : http://faq.vb.free.fr
MSDN : http://msdn.microsoft.com


"Sylvie" a écrit dans le message de
news:
> Bonjour,
>
> Je souhaiterai dans ma syntaxe ci-après, ouvrir IExplorer sans barre
> d'outils et avec une dimension spécifique des pages. J'ai écrit cela:
>
> (J'ai créé 1 .exe avec cette syntaxe)
>
> Shell "C:Program FilesInternet Exploreriexplore.exe -k
> http://www.localhost/"
>
> Dans le cas présent, j'ouvre mon intranet en pleine page mais, est-il
> possible comme en JavaScript de dimensionner les pages et de
> supprimer les barres d'outils (WIDTH, HEIGHT, TOOLBAR etc.)
>
> Merci de bien vouloir m'aider SVP
>
> Sylvie