如何在TestComplete中使用VBScript捕获屏幕截图？

Question

我正在使用TestComplete。我需要捕获屏幕截图并将其放在特定文件夹中。如何使用VBScript做到这一点？

Answer 1

要捕获桌面屏幕截图，请使用Sys.Desktop.Picture方法。要将生成的图像保存到文件，请使用其SaveToFile方法：

Sys.Desktop.Picture.SaveToFile "E:\screenshot.png"

或者，您可以打开Test Visualizer自动捕获测试操作的屏幕截图。

Answer 2

Function CaptureScreenShot(ScreenshotPath )  
  'Generate Name of the Image 
  strimgFileName="Img\Img" & Day(Date)& Month(Date) & Year(Date) & Hour(Now) & Minute(Now) & Second(Now) &".jpg"  
  strImgFile= ScreenshotPath & strimgFileName   
  'Capture failure Screen shot 
  Set objPic = Sys.Desktop.Picture()  
  'Save captured Screen shot 
  ExecutionStatus = objPic.SaveToFile(strImgFile)  
  'Return Captured image name
  CaptureScreenShot=".\" & strimgFileName  
End Function