Bonjour à tous !
J'ai en ma possession un script vbs qui marche très bien, un script (pour moi très compliqué avec plein de variables pour monter des lecteurs réseaux, je précise que ce n'est pas moi qui l'ai conçu). Le script s'éxécute dans une fenêtre internet explorer, l'utilisateur doit cependant l'a fermé, j'aimerai mettre un timer dans le script pour qu'elle se ferme au bout de 3 secondes (exemple) sans intervention.
J'ai vu une discussion portant sur ce sujet mais je suis archi débutant et comprends pas grand chose pour l'instant
Merci de votre aide en tout cas
La partie fenetre IE
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 on error resume next Dim objExplorer 'as Object Set objExplorer = CreateObject("InternetExplorer.Application") objExplorer.Navigate "about:blank" objExplorer.ToolBar = 0 objExplorer.StatusBar = 0 objExplorer.Width = 410 objExplorer.Height = 400 objExplorer.Left = 50 objExplorer.Top = 50 Do While (objExplorer.Busy) Wscript.Sleep 200 Loop objExplorer.Visible = 1 objExplorer.Document.WriteLn "<html><head><title>Ouverture de session en cours...</title></head>" objExplorer.Document.WriteLn "<body bgcolor=""#000066""><align=""center""><br/>" objExplorer.Document.WriteLn "<div><font size=""2"" face=""Arial"" color=""white"">" objExplorer.Document.WriteLn "Connexion au domaine en cours...<br/>"
Partager