QTP录制不了word另存为是为什么

雪在飘

各位大侠，我刚接触QTP，现在有一个问题弄了好久没弄明白，想请教大家。
就是我录制一个word，往里面随便写点什么东西，然后点“文件”、“另存为”保存出来，这样的一个脚本
Window("Microsoft Word").WinObject("Microsoft Word 文档").Type "asdf asdf asdf asdf asdf "
Window("Microsoft Word").WinObject("菜单栏").Click 39,11
Window("Microsoft Word").Window("文件").Click 58,102
Window("Microsoft Word").Window("另存为").WinObject("MSO Generic Control Container").Click 46,93
Window("Microsoft Word").Window("另存为").WinObject("1").Type "1"
Window("Microsoft Word").Window("另存为").Click 520,298
Window("Microsoft Word").Close

但是回放时每次另存为框弹出来后就运行不下去了说
Cannot find the "MSO Generic Control Container" object's parent "另存为" (class Window). Verify that parent properties match an object currently displayed in your application.
Line (4): "Window("Microsoft Word").Window("另存为").WinObject("MSO Generic Control Container").Click 46,93".
Tip: If the objects in your application have changed, the Maintenance Run Mode can
help you identify and update your steps and/or the objects in your repository.

奇怪的是，我不使用“文件”、“另存为”的方式保存，改用点击工具栏上面的“保存”图标，然后也会弹出另存为框，而这样录制的却又是可以回放成功的，请大家教教我，这是为什么，感谢各位！

TIB

Office对话框的控件识别问题

如果你不是要测试Word，而只是想通过QTP编辑word文档，可以通过COM接口访问Word来实现，而不是通过界面上的操作

花儿开在春风里

有了解了一点

huphn

建议你可以用 键盘事件 来操作“另存为”这一步


Window("Microsoft Word").WinObject("Microsoft Word 文档").Type "asdf asdf asdf asdf asdf "
Window("Microsoft Word").WinObject("菜单栏").Click 39,11
Window("Microsoft Word").Window("文件").Click 58,102

Set WshShell=CreateObject("Wscript.shell")
WshShell.SendKeys "{Down}"
WshShell.SendKeys "{Down}"
WshShell.SendKeys "{Down}"
WshShell.SendKeys "{Down}"
WshShell.SendKeys "{Enter}"
Set WshShell=Nothing

Window("Microsoft Word").Window("另存为").WinObject("MSO Generic Control Container").Click 46,93
Window("Microsoft Word").Window("另存为").WinObject("1").Type "1"
Window("Microsoft Word").Window("另存为").Click 520,298
Window("Microsoft Word").Close

L.E.O

过来学习一下

雪在飘

感谢二楼和四楼的朋友
你们让我学到了
谢谢