How to pass data from a ms access form into a new Word document

[Ronny Sigo]

Hello all,
I am a newbie to access.
I try to pass data from a form into a new Word document
Below you see how far I got ... can anybody help ?

Private Sub btnMaakbrief_Click()

If lGoon = False Then
' Here I check some of the controls to see if they contain required
data, if not a msgbox is displayed
Else
Dim oWord As Object

' Declaration of the variables, actually there are a lot more, but I
wanted to keep this
'post a short as possible
Dim sNaamschrijver As String, sFunctiechrijver As String
Dim sTelefoonschrijver As String, sEmailschrijver As String

' Here the varialbles get their values from the form
sNaamschrijver = Nz(Trim(Me!txtNaamschrijver.Value))
sFunctiechrijver = Nz(Trim(Me!txtFunctiechrijver.Value))
sTelefoonschrijver = Nz(Trim(Me!txtTelefoonschrijver.Value))
sEmailschrijver = Nz(Trim(Me!txtEmailschrijver.Value))

' I am totally confused here ... could somebody give me help on
openig a new Word document, and then how to place these variables into a
specific line in the document ?

Set oWord = CreateObject("word.application")
oWord.AppShow
oWord.FileOpen Name:="c:\program files\access developer demo\ps.dot"

With oWord
.appmaximize
'.filenew "c:\program files\access developer demo\ps.dot"
Application.FollowHyperlink "c:\program files\access developer
demo\ps.dot"

.viewpage
End With
End If
End Sub

[Albert D. Kallal]

I have a nice working example of how to do this.

In fact, the example is designed to be placed into existing applications.
You can word enable any ms-access form with ONE line of code. The default is
to only merge the current record you are looking at.

Try my sample...and read the notes on how to use it:

http://www.attcanada.net/~kallal.msn.../msaccess.html

--
Albert D. Kallal (MVP)
Edmonton, Alberta Canada
ka****@msn.com
http://www.attcanada.net/~kallal.msn