Bonjour ,
 
Je souhaite prendre certaines informations d'un fichier ce trouvant sr le réseau .
 
Voici ma fonction  
 
Function Fileinf(InfoFile)
strComputer = "."
Dim Yr,Dj,Mn
Dim Crd,Lmo
Set objWMIService = GetObject("winmgmts:" _
    & "{impersonationLevel=impersonate}!\\" & strComputer & "\root\cimv2" )
Set colFiles = objWMIService.ExecQuery _
    ("Select * from CIM_Datafile Where name ='"&InfoFile&"'" )
For Each objFile in colFiles
    CDr = objFile.CreationDate
    Lmo = objFile.LastModified
    Yr =Left(Lmo,4)
    Dj =Mid(Lmo,5,2)
    Mn =Mid(Lmo,7,2)
    WScript.echo CDr
    WScript.echo Yr&"\"&Dj&"\"&Mn  
Next
End Function
 
Puis je lance la fonction
 
FileInf "\\\\nomduserver\\nomdushare\\test.exe"
 
mais il ne trouve pas le fichier  
es-ce qu'il y a une raison a cela ?  
si je met un fichier local ça marche  
 
Bien à vous  
JuVeNaL

J'aurais bien voulu connaitre une réponse car j'ai le même problème actuellement.

Espaces dans les noms de répertoires???

Hello,
 
je pense que l'erreur est plutôt là... Pour moi un UNC c'est de la forme \\NomDuServeur\NomDuShare\Fichier.Exe
 
J'espère que cela pourra aider... A+