1325831977 发表于 2011-5-24 11:07:50

想把在判断之前判断某个文件是否存在的代码放在一个函数里面

我在测软件的时候，有一个导出功能，这个导出功能在每个模块都有，我想判断一下，在触发导出事件之后，这个文件是否存在，这个代码我知道怎么写，但是我想把这个代码块封装到一个function里面，然后在每个模块去调用它，该怎么做呢

17800455 发表于 2011-5-24 11:32:30

Public Function IsFileExist(FPath)
        Set fso = CreateObject("Scripting.FileSystemObject")
        If fso.FileExists(FPath) Then
                IsFileExist = true
        Else
                IsFileExist = false       
        End If
        Set fso = nothing
End Function

fly_away 发表于 2011-5-24 13:12:40

授人以鱼不如授人以渔{:4_97:}

lyscser 发表于 2011-5-24 16:16:37

授人以鱼不如授人以渔
fly_away 发表于 2011-5-24 13:12 http://bbs.51testing.com/images/common/back.gif


    说得好！

wscqb 发表于 2011-5-30 14:57:38

可以把上面的代码保存为.VBS格式，在资源中把这个VBS文件加载进去，这样就可以在不同的功能脚本代码中去调用这个函数了

1325831977 发表于 2011-6-3 16:51:59

谢谢了，今天才知道我要学的还有很多，谢谢大家的帮助，
页: [1]
查看完整版本: 想把在判断之前判断某个文件是否存在的代码放在一个函数里面