.docx 및 .pdf를 .txt 파일로 변환하는 방법

Question

.docx 및 .pdf 파일을 .txt 기본 형식의 파일로 변환해야하는 응용 프로그램에서 작업하고 있습니다. 인터넷에서 검색했지만 무료 제 3 자 dll을 찾을 수 없습니다. 어느 누구나 나에게 가장 좋은 방법을 제안 할 수 있고 일부 dll은 이에 대한 참조입니다. 사전

Answer 1

http://support.microsoft.com/kb/316383에서

덕분에 당신이 아주 잘 .DOCX 파일을 사용하여 수행 할 작업을 설명합니다. http://visualbasic.about.com/od/quicktips/qt/disppdf.htm은 .pdf 파일과 동일하지만 설명합니다.

코드로 파일을 읽은 후에는 VB.NET의 내장 파일 쓰기 기능을 사용하여 txt 파일로 출력하십시오.

Answer 2

아래 코드는 귀하를 대신하여 처리합니다. 그것은 내가 큰 보스 하하를 위해 쓴 것입니다. 나는 그것이 도움이되기를 바랍니다. 이 코드는 작업 시트의 첫 번째 셀을 docx 파일이있는 폴더로 읽은 다음 동일한 폴더에 하나씩 저장하여 txt 파일로 변환합니다.

Const wdFormatText = 2 

If Not Len(Cells(1, "A").Value) > 0 Or Dir(Cells(1, "A").Value, vbDirectory) = "" Then 
    MsgBox ("Invalid Folder") 
    Exit Sub 
End If 

Dim StrFile As String 

    StrFile = Dir(Cells(1, "A").Value & "\*.docx") 
    Do While Len(StrFile) > 0 
     Set objWord = CreateObject("Word.Application") 
     Set objDoc = objWord.Documents.Open(Cells(1, "A").Value & "\" & StrFile, False, True) 
     objDoc.SaveAs Cells(1, "A").Value & "\" & StrFile & ".txt", wdFormatText 
     objWord.Quit 
     StrFile = Dir 
    Loop