51Testing软件测试论坛

标题: qtp中调用外部的vbs文件问题 [打印本页]

作者: test321123    时间: 2009-12-2 23:07
标题: qtp中调用外部的vbs文件问题
在qtp中脚本
executefile "d:\bb.vbs"
testpath="d:\q.xls"
p=1
For i=1 to 10
call excel_write( testpath,"sheet1","A",i,p)
p=p+1
Next

bb.vbs中的函数如下:

function excel_write(syspath,sheet,row,col,valuein)
        set excelapp=createobject("excel.application")
        set excelbook=excelapp.workbooks.open(syspath)
        set excelsheet=excelbook.worksheets(sheet)
        excelsheet.activate
        excelapp.range(row&col).value=valuein
        excelbook.saveas syspath
        excelbook.close
        set excelapp=nothing
        set excelbook=nothing
        set excelsheet=nothing
end function


在qtp中执行脚本时每次for循环都有提示信息如附件,问题是:如何不要提示信息,直接向excel中写内容

[ 本帖最后由 test321123 于 2009-12-2 23:39 编辑 ]
作者: test321123    时间: 2009-12-2 23:14
标题: 1
高手帮忙解决一下啊

[ 本帖最后由 test321123 于 2009-12-2 23:38 编辑 ]
作者: sunqiang1024    时间: 2009-12-3 12:07
因为你的脚本里面每次都是创建,所以会有提示 set excelapp=createobject("excel.application")
建议你创建时候判断一下文件是否存在,如果存在直接打开,写入,关闭。




欢迎光临 51Testing软件测试论坛 (http://bbs.51testing.com/) Powered by Discuz! X3.2