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

[vb] view plain copy print ?

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

这样就是截图了，后面的true参数是用来判断当重复时是否覆盖的。
True：目录中存在1.png时，替换
False（default）：目录中存在1.png时，报错

[vb] view plain copy print ?

1. '=============================================

2. '名称：QTP_Capture

3. '作用：截图

4. '=============================================

5. Public Sub QTP_Capture()

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

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

8. End Sub

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

[vb] view plain copy print ?

1. QTP_Capture

就行了。