|
Word # per inserire il contenuto, da un textBox di VISUAL BASIC In un campo modulo di WORD di nome "Testo1"
Dim wdapp As Object Set wdapp = createObject("Word.Application") wdApp.visible = True wdApp.documents.open filename:="c:\documenti\doc2.doc" ' file gia' esistente contentente un campo modulo ' testo wdApp.activedocument.formFields("testo1").result = text1.text wdapp.activedocument.printOut wdApp.activedocument.Close wdapp.quit Set wdapp = Nothing |