Database automatisch naar e-mail versturen

[Ewergreen]

Mijn database is serieuze proporties aan het aannemen. Daarom zoek ik nu ook een goede manier om back-ups te maken. Ideaal voor mij zou zijn om telkens een kopie van de database te versturen naar bijvoorbeeld een gmail adres (wegens hoge opslagmogelijheden). Is dit mogelijk? Is het mogelijk om de mail rechtstreeks vanuit access te versturen, dus zonder het gebruik van outlook?

 

[Dolfke]

Hallo erwergreen ,

Een email versturen is altijd mogelijk .
Maar dit gaat volgens mij toch via een mail programma moeten gaan.

Je kan het mail programma automatisch activeren , mail versturen en terug sluiten .

Maar zonder programma gaat niet

Groetjes
Dolfke

 

[Poppoll]

Misschien is dit iets, gaat wel via outlook, maar u dient geen handelingen uit te voeren als outlook open staat.

' code afkomstig van
'http://www.utteraccess.com/forums/printthread.php?Cat=&Board=89&main=1107240&type=thread
Private Sub CmdZendMail_Click()

Dim olapp As Object
Dim olns As Object
Dim olfolder As Object
Dim olitem As Object
Dim olattach As Object

Set olapp = CreateObject("Outlook.Application")
Set olns = olapp.GetNamespace("MAPI")
Set olfolder = olns.getdefaultfolder(6)
Set olitem = olapp.createitem(0)
Set olattach = olitem.attachments
' emailadres onvanger
olitem.To = "me@provider.com"
' emailadres ontvanger CC
'olitem.CC = "me@provider.com"
olitem.Subject = "Test zend bijlage"
olitem.body = "Tekst van de mail" & Chr(13) & Chr(10)
'Hier path en bestand naar eerste bijlage
olattach.Add "c:\temp\test.mdb", 1
'Hier eventueel nog path en bestandsnaam voor 2e bijlage
'olattach.Add "PathTo2ndFile", 1
'Hier eventueel nog path en bestandsnaam voor 3e bijlage
'olattach.Add "pathTo3rdFile", 1

olitem.display

olitem.send

Set olitem = Nothing
Set rs = Nothing
Set db = Nothing
Set olfolder = Nothing
Set olns = Nothing
Set olapp = Nothing
End Sub

PP

 

[Ewergreen]

Ik ga dit even bekijken, alvast bedankt!

 

[ReneDirks]

Google eens op CDoSYS of CDONTS. Dan ben je niet afhankelijk van Outlook. Zo kun je in VB (zelfs VBA) code schrijven om een bestand automatisch te mailen. Als je nu je database splits in een FE en BE dan kun je nét voor de FE wordt afgesloten automatisch de BE mailen...

 

[Poppoll]

Rene,
Bedankt voor de tip CDO werkt uitstekend.
hier meer uitleg: http://www.paulsadowski.com/WSH/cdo.htm

PP

 

[Dolfke]

Google eens op CDoSYS of CDONTS. Dan ben je niet afhankelijk van Outlook. Zo kun je in VB (zelfs VBA) code schrijven om een bestand automatisch te mailen. Als je nu je database splits in een FE en BE dan kun je nét voor de FE wordt afgesloten automatisch de BE mailen...

Ook weer iets bijgeleerd Thanks

Groetjes
Dolfke