title image


Smiley Re: vbscript :: Eigentümer eine Datei - NTFS-Information ermitteln
Hallo Mike,



es kommt bei mir immer ein schwerer Fehler,



habe jetzt aber etwas gefunden:









On Error Resume Next



strComputer = "."

Set objWMIService = GetObject("winmgmts:" _

      & "{impersonationLevel=impersonate}!\\" & strComputer & "\root\cimv2")



strFile = "c:\mytestfile.txt"



Set colItems = objWMIService.ExecQuery _

    ("ASSOCIATORS OF {Win32_LogicalFileSecuritySetting='" & strFile & "'}" _

        & " WHERE AssocClass=Win32_LogicalFileOwner ResultRole=Owner")



For Each objItem in colItems

    Wscript.Echo objItem.ReferencedDomainName

    Wscript.Echo objItem.AccountName

Next





Code eingefügt mit Syntaxhighlighter 4.0







http://www.microsoft.com/technet/scriptcenter/resources/qanda/oct04/hey1007.mspx
 
Gruß Martin




eMail und OfficeLine




geschrieben von

Login

E-Mail:
  

Passwort:
  

Beitrag anfügen

Symbol:
 
 
 
 
 
 
 
 
 
 
 
 
 

Überschrift: