|
本帖最后由 rider1989 于 2011-6-18 21:37 编辑
1、新建一个test,粘贴如下代码:
Dim fso, MyFile
Set fso = CreateObject("scripting.FileSystemObject")
Set MyFile = fso.CreateTextFile("C:\testfile.txt", True)
MyFile.WriteLine ("This is a test")
MyFile.WriteLine ("This is another test")
MyFile.Close
2、运行粘贴的代码,如有错误提示activex部件不能创建对象: 'scripting.filesystemobject',则继续执行步骤3,否则该方法不保证解决问题
3、确保System32目录存在文件scrrun.dll,开始菜单---运行,输入RegSvr32 C:\WINDOWS\system32\scrrun.dll
回车
4、重启qtp,应该可以保存文件了。
试了上面的方法 还是解决不了 ,而且上面把代码粘贴进去Run之后,根本没反应,Record 和 Run 按钮都变成灰色的了,随便写一句代码进去 ,保存也没有反应。
还有 录制脚本的时候不是出来这个小窗口(见图)吗 我今天跟着录制的时候发现没出来,是什么问题呀。
本人今天刚自己上网学QTP很多地方不懂 忘大家讲解详细点 谢谢。 |
|