I would recommend setting up a Recovery Scenario and then have a function capture bitmap of the whole screen.

For example:

 

Function RecoveryFuncLostLink(Object, Method, Arguments, retVal)  

  Window(''text:=Program Manager'').CaptureBitmap ''C:snapshot.bmp'',True  
  Reporter.ReportEvent micFail, ''SnapShot'', ''<>''  

End Function