Word-Dokumente sind für jedermann zu bearbeiten und Löschen von Inhalten offen . Aus diesem Grund sind die Entwickler mit der Umwandlung von Word-Dokumenten in PDF für offene Verteilung beauftragt. Die Word-Dokumente in PDF konvertiert werden, so kann das Unternehmen die PDF im Web , ohne daß es kopiert oder verändert zu verteilen. Der Code kann unter Verwendung der Visual Basic (VB) Sprache werden. Dies ist von Vorteil für jeden Coder , die Dokumente von einem Desktop- oder Web-Anwendung umwandeln muss. Anleitung
1
Öffnen Sie das Word -Dokument. Sie öffnen ein Word-Dokument durch die Initialisierung des Word-Anwendung -Klasse, die eine Variable, die alle Methoden und Eigenschaften für die Word-Datei enthält, ist Manipulation . Der folgende Code öffnet eine Datei namens " myfile.doc ":
Dim Wort = new ApplicationClass ();
Dim word_file = path as Object
Word.Document opened_doc = word.Documents.Open (ref word_file , ref null , null ref , ref null , null ref , ref null , null ref , ref null , null ref , ref null , null ref , ref null);
"null" Werte werden alle benötigt, da die Funktion "Öffnen" hat mehrere Parameter benötigt, um ein Dokument zu öffnen. Die Einstellung dieser Parameter auf " null " öffnet das Dokument nur mit den Standard-Eigenschaften .
2
Kopieren Sie den Inhalt des Word-Datei in die Zwischenablage. Dies geschieht mit Hilfe der " WholeStory " und " Copy" -Funktionen. Die " WholeStory "-Funktion ist ähnlich manuell Hervorhebung alle Inhalte in der Datei und "Kopieren" überträgt den markierten Bereich in die Zwischenablage. Der folgende Code kopiert die Word-Datei clip = Clipboard.GetDataObject
3
Erstellen Sie das PDF-Objekt Variable und übertragen Sie die Word- Inhalte . Der folgende Code überträgt den Inhalt von PDF :
Dim As New MyPDF mjwPDF
mypdf.PDFFileName = " word_transfer.pdf "
mypdf.PDFTextOut clip.ToString
4
Schließen Sie die Dokumente. Sobald die PDF erstellt wird, sowohl die Word-Dokumente und das PDF geschlossen werden, um die Speicher- Ressourcen, die für die Variablen freigeben :
Set word = nichts
Set opened_doc = nichts
< p > Set MyPDF = nichts