[VB] Veldwaarde in word toewijzen aan var

[Verwijderd]

Hi,

Ik heb een access database en een word sjabloon (mail)

Vanuit access kan ik het sjabloon openen en adresgegevens uit de tabel invoeren in de velden van het document.

Nu wil ik dit document als email verzenden (dus niet als bijlage bij een mail), dit kan prima middels 'mailenvelope'. Ik moet dan alleen gegevens uit de samenvoegvelden aan een variabele toewijzen. Ik weet niet hoe ik naar deze velden moet verwijzen!

code:

Sub TESTJE()

   dim strRecipient as string

    strRecipient = de waarde uit het veld wil ik gebruiken HOE??

      'maak een mail header aan in het word document zodat deze via KOPIE mail  te sturen is
       ActiveDocument.MailEnvelope.Introduction = "TEST INTROTEKST."
       ActiveDocument.MailEnvelope.Item.Recipients.Add strRecipient


End Sub

[ Voor 9% gewijzigd door Verwijderd op 13-01-2005 13:56 ]

[Daos]

Je kan gewoon MailMerge hiervoor gebruiken. Je krijgt dan:

Visual Basic:

Private Sub Test()

    Set myMerge = ActiveDocument.MailMerge
    If myMerge.State = wdMainAndSourceAndHeader Or _
        myMerge.State = wdMainAndDataSource Then
        myMerge.DataSource.QueryString = "SELECT * from table"
    End If

    With myMerge
        .MailAsAttachment = False
        .MailSubject = "Test"
        .MailAddressFieldName = "EMAIL"
        .Destination = wdSendToEmail
        .Execute
    End With

End Sub