Discussion :

[cincap]

Bonjour à toutes et à tous,

Avec ce code, j'aurai aimé créer un fichier texte reprenant les données :

Code :

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

1
2
3
4
5
6
7
 
Set fso = WScript.CreateObject("Scripting.FileSystemObject")
For Each objItem in colItems
X=objItem.CurrentHorizontalResolution 
Y=objItem.CurrentVerticalResolution 
 
If X<>"" and Y<>"" Then Wscript.Echo X & " x " & Y

Avec un fichier bat il suffisait de faire >> Monfichier.txt à la suite de X et Y.

Merci d'une aide éventuelle.

@+,

cincap

[cincap]

Bonjour à toutes et à tous,

Je ferme ce topic car j'ai pu modifier mon code par l'insertion et la création du fichier texte en Vbs.

@+,

cincap