vbs常用函数

Posted 2021-01-03 silenceret

tags:

篇首语：本文由小常识网(cha138.com)小编为大家整理，主要介绍了vbs常用函数相关的知识，希望对你有一定的参考价值。

‘删除文件夹
sub DeleteFolder(objFolder)
    call OutputLog(objFolder.Path,true)
    err.Clear
    On Error Resume Next
    objFolder.attributes=0
    objFolder.delete
    On Error Goto 0
    if Err.Number then
        Msgbox "删除文件夹[" & objFolder.Path & "]失败" & vbcrlf & Err.Description
    end if
end sub

‘删除文件
sub DeleteFile(objFile)
    ‘call OutputLog(objFile.Path,false)
    err.Clear
    On Error Resume Next
    objFile.attributes=0
    objFile.delete
    On Error Goto 0
    if Err.Number then
        Msgbox "删除文件[" & objFolder.Path & "]失败" & vbcrlf & Err.Description
    end if
end sub

以上是关于vbs常用函数的主要内容，如果未能解决你的问题，请参考以下文章

JS常用代码片段-127个常用罗列-值得收藏