Sådan Konverter Word-filer til PDF Brug VB

Konvertere dine Word-dokumenter til PDF . dokument billede ved Marvin Gerste fra & lt; a href = 'http: //www.fotolia.com'> Fotolia.com & lt; / a & gt;

Word-dokumenter er åbne for alle, for at redigere og slette indhold.Af denne grund er udviklere til opgave at konvertere Word-dokumenter til PDF for åben distribution.De Word-dokumenter konverteres til PDF, så virksomheden kan distribuere PDF på nettet uden at blive kopieret eller ændret.Koden kan implementeres ved hjælp af Visual Basic (VB) sprog.Dette er til gavn for nogen koder, der har brug for at konvertere dokumenter fra en stationær eller webapplikation.

Instruktioner

  1. Åbn Word-dokumentet.Du åbner et Word-dokument ved at initialisere Word ansøgning klassen, hvilket er en variabel, der indeholder alle de metoder og egenskaber til Word-fil manipulation.Følgende kode åbner en fil med navnet "myfile.doc":

    Dim ord = ny ApplicationClass ();
    Dim word_file = sti som Object
    Word.Document opened_doc = word.Documents.Open (ref word_file, ref null, ref null, r

    ef null, ref null, ref null, ref null, ref null, ref null, ref null, refnull, ref null);

    De "null" værdier er alle behov, fordi den "Åbn" funktionen har flere parametre, der kræves for at åbne et dokument.Indstilling af disse parametre til "nul" åbner dokumentet med kun standard egenskaber.

  2. Kopier indholdet af Word-fil til Udklipsholder.Dette opnås ved hjælp af "WholeStory" og "kopi" funktioner.Den "WholeStory" funktion svarer til manuelt at fremhæve alt indhold i filen og "Kopier" overfører den fremhævede del til Udklipsholder.Følgende kode kopierer Word-fil indhold:

    opened_doc.ActiveWindow.Selection.WholeStory
    opened_doc.ActiveWindow.Selection.Copy
    Dim klip = Clipboard.GetDataObject

  3. Opret PDF objekt variabel og overføre Word indhold.Følgende kode overfører indhold til PDF:

    Dim mypdf som ny mjwPDF
    mypdf.PDFFileName = "word_transfer.pdf"
    mypdf.PDFTextOut clip.ToString

  4. Luk dokumenterne.Når PDF er oprettet, er både Word-dokumenter og PDF lukket for at frigøre hukommelse ressourcer til variablerne:

    Set ord = intet
    Set opened_doc = intet
    Set mypdf = intet

107
0
1
Portable Document Format