【QTP】截图操作

在运行脚本的过程中，经常需要记录Log，其中，经常使用到的便是截图：

截图的方法很简单：

[vb] view
plain copy

print?

Desktop.CaptureBitmap "D:\截图\1.png", true

这样就是截图了，后面的true参数是用来判断当重复时是否覆盖的。

True：目录中存在1.png时，替换

False（default）：目录中存在1.png时，报错

[vb] view
plain copy

print?

'=============================================

'名称：QTP_Capture

'作用：截图

'=============================================

Public Sub QTP_Capture()

‘如果不想每次都定义截图名称，也可以用下面的方式，保证文件名的唯一

Desktop.CaptureBitmap "D:\截图\" & date & "_" & timer & ".png", true

End Sub

使用的时候，只要在需要进行截图的地方，加上一句：

[vb] view
plain copy

print?

QTP_Capture

就行了。