* Determine who has a file open - VFP7/SP1 , WSH5.6 * Use to protect or take action for a table that someone might have open over the network Clear Local iRow as Integer Local cConnstring as Character Local oThing as Object oNet = CreateObject("Wscript.Network") cConnString = "WinNT://" + oNet.ComputerName + "/LanmanServer" oFSO = GetObject( cConnString ) iRow = 1 Dimension arResources[iRow,2] For Each oThing in oFSO.Resources If Vartype(oThing.User) = "C" arResources[iRow,1] = oThing.User EndIf If Vartype(oThing.Path) = "C" arResources[iRow,2] = oThing.Path EndIf iRow = iRow + 1 Dimension arResources[iRow,2] Next Display Memory like arResourcesAny comments on how to tweak this are appreciated.