The UnlockAllObjects method of an object of ClassType clsServer removes all locks issued by the current session from objects in the server's object model.
bRet = object.UnlockAllObjects
bRet
A Boolean variable. This value is set to True if the method is successful and False otherwise.
object
An object of ClassType clsServer.
The following example removes all current locks:
' Assume dsoServer is connected to Analysis Services.
dsoServer.UnlockAllObjects