[VB 프로그래밍] iRename, 다수의 파일 이름을 한번에 바꾸기 프로젝트 소스 파일

*세*
개인인증판매자스토어
최초 등록일
2011.07.06
최종 저작일
2009.10
파일확장자 압축파일
가격 1,500원 할인쿠폰받기
다운로드
장바구니
인스타 팔로우이벤트

소개글

수 천개 이상의 파일의 이름을 규칙에 따라 한번에 변경하기 위한 프로그램.
파일에 대한 접근 방법, UI의 기본적인 구성 등을 배울 수 있는 소스.

VB6로 작성한 프로그램이므로, 실행이 안 되는 경우
포함된 VB6KO.DLL, COMDLG32.OCX를 c:\windows\sysyem32 (64bit는 system64)폴더에 복사해 넣어야 실행이 가능합니다.

컴파일 실행환경

VB

본문내용

Private Function OpenFolder()
Dim fd, Fs, f, f1
Dim pItem As ListItem
Dim dir As String

Path = ShowFolderBrowser()
dir = Path
Child_OpenOle.List1.AddItem dir

If SO.FolderExists(dir) = True Then
List1.ListItems.Clear

Set fd = SO.GetFolder(dir)
Set Fs = fd.Files

For Each f In Fs

If Not (f.Attributes And 2) = 2 And Not (f.Attributes And 4) = 4 And IsProtectedExt(f.name) = False Then
Set pItem = List1.ListItems.Add(, f.name, f.name, SelectImage(f.name), SelectImage(f.name))
pItem.SubItems(1) = Int(f.Size / 1024) & " KB"
pItem.SubItems(2) = f.DateCreated
pItem.SubItems(3) = f.Type
End If
Next

End If
List1.Refresh

StatusBar1.Panels(4).Visible = True
StatusBar1.Panels(4).Text = Path
End Function

압축파일 내 파일목록

ActionModule.bas
Child_Arrange.frm
Child_Classify.frm
Child_OpenOle.frm
child_Prog.frm
child_Progress.frm
Child_ProtectExt.frm
Child_ProtectExt.frx
Child_Rename.frm
Child_WordChange.frm
Child_WordChange.frx
frmAbout.frm
frmAbout.frx
frmBrowser.frm
frmBrowser.frx
iRename.exe
Main.frm
Main.frx
MoreModule.bas
Project1.PDM
Project1.vbp
Project1.vbw
SysModule.bas
이 폴더 안의 파일을 window폴더 system32폴더로 복사해 넣으세요/comdlg32.inf
이 폴더 안의 파일을 window폴더 system32폴더로 복사해 넣으세요/comdlg32.ocx
이 폴더 안의 파일을 window폴더 system32폴더로 복사해 넣으세요/VB6KO.DLL

참고 자료

없음
*세*
판매자 유형Bronze개인인증

주의사항

저작권 자료의 정보 및 내용의 진실성에 대하여 해피캠퍼스는 보증하지 않으며, 해당 정보 및 게시물 저작권과 기타 법적 책임은 자료 등록자에게 있습니다.
자료 및 게시물 내용의 불법적 이용, 무단 전재∙배포는 금지되어 있습니다.
저작권침해, 명예훼손 등 분쟁 요소 발견 시 고객센터의 저작권침해 신고센터를 이용해 주시기 바랍니다.
환불정책

해피캠퍼스는 구매자와 판매자 모두가 만족하는 서비스가 되도록 노력하고 있으며, 아래의 4가지 자료환불 조건을 꼭 확인해주시기 바랍니다.

파일오류 중복자료 저작권 없음 설명과 실제 내용 불일치
파일의 다운로드가 제대로 되지 않거나 파일형식에 맞는 프로그램으로 정상 작동하지 않는 경우 다른 자료와 70% 이상 내용이 일치하는 경우 (중복임을 확인할 수 있는 근거 필요함) 인터넷의 다른 사이트, 연구기관, 학교, 서적 등의 자료를 도용한 경우 자료의 설명과 실제 자료의 내용이 일치하지 않는 경우
우수 콘텐츠 서비스 품질인증 획득
최근 본 자료더보기
  [VB 프로그래밍] iRename, 다수의 파일 이름을 한번에 바꾸기 프로젝트 소스 파일