newtype
::: newtype의 지식창고 :::
newtype
전체 방문자
603,295
오늘
36
어제
40
  • 분류 전체보기 (387)
    • it (209)
      • c (43)
      • VB (5)
      • csharp (2)
      • etc (32)
      • devOps (6)
      • python (2)
      • go (5)
      • emb (25)
      • win (4)
      • db (20)
      • www (49)
      • sqlce (7)
      • gmap (6)
      • cygwin (2)
      • ruby (1)
    • 명언 (10)
    • 모임 (18)
      • 붕주회 (3)
      • 신흥컴정 (14)
      • 웹20기 (1)
    • 사진 (8)
    • 불펌 (29)
    • 막글 (98)
    • 게임 (6)
    • 여행 (8)

블로그 메뉴

  • 홈
  • 태그
  • 방명록
  • 관리

공지사항

  • whoami
02-01 12:21
hELLO · Designed By 정상우.
newtype

::: newtype의 지식창고 :::

it/VB

폴더 만들기 ( 부모 폴더가 없을경우에는 부모 폴더도 만듬)

2003. 7. 18. 17:34
' 경로를 만든다.
Public Function MakeDir(ByVal strpath As String) As Boolean

   If strpath = "" Then Exit Function
   
   strpath = Replace(strpath, "/", "\")

   If Right(strpath, 1) = "\" Then strpath = Mid(strpath, 0, Len(strpath) - 1)
   
   If Dir(strpath, vbDirectory) <> "" Then
   
       MakeDir = True
       Exit Function
   
   End If
   
   MakeDir = MakeDir(ExtractDir(strpath))
   
   MkDir (strpath)

End Function
반응형
    'it/VB' 카테고리의 다른 글
    • VB 에서 오라클 DB 조회
    • MDI에서 특정 자식창을 하나만 띄우기
    • 항상 위 효과 내기
    • 전체 경로를 받아 파일명 또는 폴더명만 얻기
    Visual Basic, 폴더 생성
    newtype
    newtype
    지극히 개인적인 지식의 창고
    댓글쓰기
    다음 글
    항상 위 효과 내기
    이전 글
    전체 경로를 받아 파일명 또는 폴더명만 얻기

    티스토리툴바