documentos do Word são abertos para qualquer pessoa para editar e apagar conteúdo. Por esta razão, os desenvolvedores têm a tarefa de converter documentos do Word para PDF para distribuição aberta. Os documentos do Word são convertidos em PDF, para que a empresa pode distribuir o PDF na Web sem que seja copiado ou alterado. O código pode ser implementada utilizando a linguagem de Visual Basic (VB). Isso é benéfico para qualquer programador que precisa para converter documentos de um aplicativo de desktop ou web.
Abra o documento do Word. Você abre um documento do Word por inicializar a classe de aplicativo Word, que é uma variável que contém todos os métodos e propriedades do arquivo manipulação Word. O código a seguir abre um arquivo chamado "myfile.doc":
palavra Dim = new ApplicationClass () -
word_file Dim = caminho como objeto
Word.Document opened_doc = word.Documents.Open (word_file ref, null ref, null ref, null ref, null ref, null ref, null ref, null ref, null ref, null ref, null ref, null ref);o "nulo" Os valores são todas necessárias, porque o "Aberto" função tem vários parâmetros necessários para abrir um documento. Configurar esses parâmetros para "nulo" abre o documento com apenas as propriedades padrão.
Copie o conteúdo do arquivo do Word para a área de transferência. Isto é conseguido utilizando o "Toda a história" e "Cópia" funções. o "Toda a história" função é semelhante à destacando manualmente todo o conteúdo no arquivo e "Cópia" transfere a parte destacada na área de transferência. Os seguintes cópias de código O conteúdo do arquivo do Word:
opened_doc.ActiveWindow.Selection.WholeStory
opened_doc.ActiveWindow.Selection.Copy
clipe de Dim = Clipboard.GetDataObjectCriar a variável PDF objeto e transferir o conteúdo da Palavra. O código a seguir transfere o conteúdo para PDF:
mypdf Dim As New mjwPDF
mypdf.PDFFileName = "word_transfer.pdf"
mypdf.PDFTextOut clip.ToStringFeche os documentos. Uma vez que o PDF é criado, ambos os documentos do Word e PDF estão fechadas para liberar os recursos de memória dedicados às variáveis:
Set word = nada
Definir opened_doc = nada
Definir mypdf = nada