hvordan man kan konvertere Word-filer til PDF ved hjælp vb

Indlæg af Allan Busk-Mathiasen     opdateret: 2012-01-21

Word- dokumenter er åbne for alle at redigere og slette indhold . Af denne grund er udviklerne til opgave at konvertere Word- dokumenter til PDF for åben distribution . Word- dokumenter er konverteret til PDF , så virksomheden kan distribuere PDF på internettet uden at det er kopieret eller ændret . Koden kan gennemføres ved hjælp af Visual Basic ( VB ) sprog . Dette er til gavn for alle coder der har brug for at konvertere dokumenter fra en desktop eller webapplikation

Du skal bruge: .
Apple computer med AppleScript .


1 .
Åbn dit Word- dokument . Du åbner et Word- dokument ved initialisering af Word ansøgningen klasse , som 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=new ApplicationClass () ;
Dim word_file=kanal, som Objekt
Word. Document opened_doc=word. Documents. Open ( ref word_file , ref null , ref null , ref null , ref null , ref null , ref null , ref null , ref null , ref null , ref null , ref null ) ;

De " nul " værdier er alle nødvendige, fordi " Open " -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 " Copy " funktioner . Den " WholeStory " funktionen svarer til manuelt at fremhæve alt indhold i filen og "Kopier " overførsler 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 objektvariabel 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 dokumenter . Når PDF-filen er oprettet, er både Word- dokumenter og PDF lukket for at frigøre hukommelse ressourcer afsat til det variabler :

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


Previous:vbs tutorial Next:hvordan man åbner en postsættet



 

Kommentarer

Code:
change