자료실

부자는 돈을 써서 시간을 아끼지만 가난한 사람은 시간을 써서 돈을 아낀다

vb6.0/vba

IT HUB를 찾아주셔서 감사합니다.

vb6.0vba [vb6.0/vba] Function CheckFolder - 경로에 폴더가 없으면 폴더를 만든다

페이지 정보

profile_image
작성자 하나를하더라도최선을
댓글 0건 조회 5,116회 작성일 21-07-10 12:16

본문

Public Function CheckFolder(ByVal f_Spec As String)
    Dim fs As Object
    Set fs = CreateObject("Scripting.FileSystemObject")
    If fs.FolderExists(f_Spec) Then
        Set fs = Nothing
    Else
        fs.CreateFolder f_Spec
        Set fs = Nothing
    End If
End Function

댓글목록

등록된 댓글이 없습니다.