问题：QTP中判断文件对象是否存在时提示：类型不匹配: fileexistsLine (4): If fileexists(test.txt) Then. 代码如下：文件系统操作Dim fso,feSet fso = CreateObject(Scripting.FileSystemObject)If fileexists(test.txt) Then 放在脚本目录下 msgbox(存在) Set fe = fso.GetFIle(test.txt)Else msgbox(不存在)End If
Dim fso,fe
Set fso = CreateObject("Scripting.FileSystemObject")
If fso.fileexists("test.txt") Then '放在脚本目录下,这里错了
'If fileexists("test.txt") Then '放在脚本目录下
msgbox("存在")
Set fe = fso.GetFIle("test.txt")
Else
msgbox("不存在")
End If
如果你对QTP中判断文件对象是否存在时提示：类型不匹配: fileexistsLine (4): If fileexists(test.txt) Then. 代码如下：文件系统操作Dim fso,feSet fso = CreateObject(Scripting.FileSystemObject)If fileexists(test.txt) Then 放在脚本目录下 msgbox(存在) Set fe = fso.GetFIle(test.txt)Else msgbox(不存在)End If这个问题有好的意见或
建议，请留言
|
您当前的位置：
百科371 → 电脑/网络 → VB → 电脑/网络内容
退出登录 
减小字体
增大字体