Script sous windows
Redbart -  
Bonjour,
coment exécuter un script sous windows
merci
Configuration: Windows XP
Internet Explorer 7.0

1 réponse

  • Votes
  • Date
  • Date décroissante
  1. Redbart Auteur
    tel que celui-ci pour trouver des fichiers sans extensions :

    strComputer = "."

    Set objWMIService = GetObject("winmgmts:\\" & strComputer & "\root\cimv2")

    Set colFiles = objWMIService.ExecQuery _
    ("Select * from CIM_DataFile where Extension = ''")

    For Each objFile in colFiles
    Wscript.Echo objFile.Name
    Next