Discussion :

[kevain_09]

salut tt l'monde !
voila mon script :

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
34
Dim MySource, MyTarget, MyZipName, MyHex, MyBinary, i
Dim oShell, oApp, oFolder, oCTF, oFile
Dim oFileSys
Set fso= CreateObject("Scripting.FileSystemObject")
Set MonFpath= fso.GetFile("c:\rapport.txt").OpenAsTextStream
mypath = MonFpath.readline
MySource = "" & mypath & ""
MyTarget = "C:\sauvergarde.zip"

MyHex = Array(80, 75, 5, 6, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0)

For i = 0 To UBound(MyHex)
MyBinary = MyBinary & Chr(MyHex(i))
Next

Set oShell = CreateObject("WScript.Shell")
Set oFileSys = CreateObject("Scripting.FileSystemObject")

'Create the basis of a zip file.
Set oCTF = oFileSys.CreateTextFile(MyTarget, True)
oCTF.Write MyBinary
oCTF.Close
Set oCTF = Nothing

Set oApp = CreateObject("Shell.Application")

'Copy the files to the compressed folder
Set oFolder = oApp.NameSpace(MySource)
If Not oFolder Is Nothing Then
oApp.NameSpace(MyTarget).CopyHere oFolder.Items
End If

'Wait for compressing to begin, this was necessary on my machine
wScript.Sleep(2000)

lorsque le script se lance, une fenetre "compression..." apparait :



Cette image peut rester tres longtemp, tout dépent de la grosseur du dossier a compresser.

c'est pourquoi je voudrais savoir s'il y a un moyen de la cacher , la minimiser, la supprimé...?

Merci pour votre aide

[omen999]

bonsoir,

la minimiser

cliquer sur le bouton prévu à cet effet
en revanche, cacher cette boite de dialogue n'est certainement pas une bonne idée mais ça doit être possible par un appel à l'api

[kevain_09]

pourrait tu m'en dire plus sur les API a utiliser...?
Merci

[kevain_09]

g réussi a rendre invisble la fenetre...
et sans faire expres lol
j'ai juste lancé le script grace au tache planifié de windows :"schtasks"
et plus aucune fenetre...tout se fait en arrière plan
cool

si yen a qui peuvent confirmé, p-t que mon pc est spécial lol

[ced600]

Je ne connais pas particulèrement "schtasks", mais il est possible que windows lance ton programme sans intéraction graphique avec l'environnement, en gros sans GUI, sans fenêtre, avec cette commande.
En tout en c'est ce que fait windows lorsque l'on cré un processus sur un PC distant via les objets WMI.