2013-11-15 2 views
0

저는 stackoverflow 포럼에 초보입니다. 용서해주세요. 여기 내가하려는 일이 있습니다. gfh 디렉토리의 exm : \ edm \ 4123 \ gfh에 .pdf 파일이있는 두 개의 하위 폴더 내에 .pdf 파일이 있습니다. 이 PDF 파일을 가져 와서 이름을 바꾸고 루트 디렉토리 (\ edm)에 복사 할 수 있어야합니다. Visual Studio 2013을 사용하고 있으며 여기에서 (온라인에서 찾은 일부 코드로) 시작합니다.하위 폴더에서 PDF 파일을 이동하고 이름을 바꿉니다.

Sub ListFiles() 
    Dim objFSO As Scripting.FileSystemObject 
    Dim objTopFolder As Scripting.Folder 
    Dim strTopFolderName As String 


    strTopFolderName = "\\10.30.5.249\edmbursting\Olympus" 

    SetAttr objFSO - CreateObject (Scripting.FileSystemObject)" 

어떤 도움에 명시

옵션 주시면 감사하겠습니다 - 또한, 나는 모듈에이 코드를 입력하고, 올바른 것입니다? 여기

내가 지금 사용하고있는 코드입니다 :

모듈 Module1의

Sub Main() 
    For Each foundFile As String In My.Computer.FileSystem.GetFiles(
     "\\10.30.5.249\edmfiles\Olympus", 
Microsoft.VisualBasic.FileIO.SearchOption.SearchAllSubDirectories, "*.pdf*") 

     My.Computer.FileSystem.MoveFile() 


    Next 

End Sub 

엔드 모듈 내가 파일을 이동하는 것을 시도하고 문제를 겪고

(변수 : foundFile) 위치로. 어떤 아이디어?

답변

0

전년 동기 대비 사용할 수 File.Copy()

System.IO.File.Copy("\edm\4123\gfh\FILE.pdf", "\edm\FILERENAMED.pdf") 
+0

겠습니까 대신 "file.pdf"의 .PDF 문서의이 작품 – user2997811

관련 문제