Tek-Tips is the largest IT community on the Internet today!

Members share and learn making Tek-Tips Forums the best source of peer-reviewed technical information on the Internet!

  • Congratulations gkittelson on being selected by the Tek-Tips community for having the most helpful posts in the forums last week. Way to Go!

Sharing violation 1

Status
Not open for further replies.

sfriday

IS-IT--Management
Feb 23, 2002
211
DE
All,

How in VBscript can I determine who has a file open, I know this can be done via servermanager but I want to produce a VBscript to do it.

Thanks

Regards
Steve Friday
 
Dim oFSO
Dim oRS
Set oFSO = GetObject("WinNT://YourPCName/LanmanServer")
For Each oRS In oFSO.Resources
MsgBox oRS.Path & " is opened by " & oRS.User
Next
Set oRS = Nothing
Set oFSO = Nothing Jon Hawkins
 
Status
Not open for further replies.

Part and Inventory Search

Sponsor

Back
Top