闲来无事,打算利用QTP录制一个脚本,实现连续另存为多张图片的效果。录制脚本如下图代码1,运行老是提示文件已存在是否覆盖。
Window("画图").WinObject("Ribbon").WinButton("“文件”选项卡").Click
Window("画图").Window("Window").WinObject("WinObject").WinMenu("WinMenu").Select "另存为;PNG 图片"
Window("画图").Dialog("保存为").WinEdit("文件名:").Set "1"
Window("画图").Dialog("保存为").WinButton("保存(S)").Click
解决方法:将第3行 WinEdit的set方法改为Type方法
Window("画图").WinObject("Ribbon").WinButton("“文件”选项卡").Click
Window("画图").Window("Window").WinObject("WinObject").WinMenu("WinMenu").Select "另存为;PNG 图片"
Window("画图").Dialog("保存为").WinEdit("文件名:").Type "1"
Window("画图").Dialog("保存为").WinButton("保存(S)").Click