[access]actief formulier met info verzenden per mail

[Verwijderd]

Ok het volgende probleem doet zich voor, ik wil een access formulier wat ingevuld is verzenden als htm bestand, echter als ik dit doe dan stuurt hij de hele tabel en niet het actieve formulier. Iemand een idee hoe dit op te lossen?

[Boss]

Met code, denk ik!
Eerst de recordset openen in VBA en het juiste (Actieve) record selecteren. Dan veld voor veld de naam + waarde wegschrijven naar een string. Vervolgens die string in je mailje zetten.
Of wilde je een screenshot?

[Verwijderd]

ben voorlopig bezig met de wizards enz ben nog niet echt thuis in de strings heb je mischien een voorbeeld?

[Verwijderd]

screen shot mailen is ook goed btw

[Verwijderd]

iemand een idee

[Verwijderd]

Het is niet de netste manier, maar het is er een:

code:

Sub SendMessage()
Dim messageTo As String, messageCC As String, messageBCC As String
Dim messageSubject As String, messageBody As String, messageTotal As String

messageTo = "[e-mail]"
messageCC = "cc=[e-mail]"
messageBCC = "bcc=[e-mail]"
messageSubject = "subject=This is my Test E-mail"
messageBody = "body=This is my first email test. I hope it arrived. :-) Greetz, ME."

messageTotal = "Mailto:" & messageTo & "?" & messageCC & "&" & messageBCC & _
"&" & messageSubject & "&" & messageBody
    
Shell ("E:\Program Files\Internet Explorer\iexplore.exe " & messageTotal)

End Sub

[Verwijderd]

thnx ik ga het proberen

[Verwijderd]

nu een echte noob vraag hoe krijg ik bovenstaande code aan een knop gekoppeld?

[Verwijderd]

De manier om dat binnen VB te doen is de methode SendObject. Kijk eens in de help voor de argumenten. Op deze manier wordt het e-mail programma geopend (mits het MAPI ondersteund) en de mail voor je klaargemaakt.

[Paxlie]

Verwijderd schreef op 29 augustus 2002 @ 12:59:
nu een echte noob vraag hoe krijg ik bovenstaande code aan een knop gekoppeld?

Begin eerst eens met een beetje bladeren in de help enzow en kijk eens wat er gebeurt als je een event aanmaakt. (hint: als je een event aanmaakt creeert hij een sub en kijk nu eens naar bovenstaande code)

Over een meeltje sturen met behulp van VB

zoek in de help idd ff Docmd.SendObject
dan kan je ook formulieren doorsturen

[Verwijderd]

Er zit alleen 1 maar aan vast... Binnen VBA wordt alleen de Docmd.SendObject herkend binnen Access... Hoe doe je zoiets in bv Word en Excel? Daar kent hij namelijk het commando Docmd.SendObject niet...