On Error Resume Next Sub site_FSCommand(ByVal command, ByVal args) Call site_DoFSCommand(command, args) End Sub