• 쇼핑몰
  • 커뮤니티
  • 북마크

vb6.0/vba


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

하나를하더라도최선을
2021.07.10 12:16 103 0

본문



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


댓글목록 0

등록된 댓글이 없습니다.