opening wordpro in vb

[suna]

i'm trying to open a wordpro document in vb6 and generate a letter,by which part of the data are from the database.

for now, i'm using this method but i don't think it is a good practice....

could anyone please give me any idea to do this the right way?

Dim oword As Object
Dim WordProDoc As Object

Set oword = CreateObject("Word.Application&quot
With oword

.Documents.Add 'Open blank MSWord document
.Selection.Font.Name = "Arial"
.
.
.

.Selection.TypeParagraph
.Selection.TypeParagraph
.Selection.Font.Bold = True
.Selection.Font.Underline = True
.Selection.TypeText ("LETTER OF APPOINTMENT&quot
.Selection.Font.Bold = False
.Selection.Font.Underline = False
.
.

'to insert data from db
.Selection.TypeText ("( " & rsInduk!P_name & " )&quot
.Selection.TypeParagraph


.ActiveDocument.SaveAs ("E:\SPAN\MySpan2\pelantikan tetap.lwp&quot
.Quit

End With


Set WordProDoc = GetObject("E:\SPAN\MySpan2\pelantikan tetap.lwp", "WordPro.Document&quot
WordProDoc.Application.ActiveDocWindow.Show

'clear the recordset on the way out
Set rsInduk = Nothing
MsgBox "process completed, double click on the Wordpro icon to view the letter", vbInformation
OLE1.Enabled = True