Geöffnete Dateien
runas /user:Administrator@domain.org "cmd /K \"cscript d:\files.vbs\"" OPTION EXPLICIT Dim DateiDienst 'IADsFileService Dim GeoeffenteRessource 'IADsResource Set DateiDienst = GetObject("WinNT://srvfs01/lanmanserver,fileservice") For Each GeoeffenteRessource In DateiDienst.Resources WScript.Echo "Geöffenete Datei .:" & vbTab &…