Trimitere email din Access 2010
Trimitere email din Access 2010
Salutare.
Va rog, pe cei care aveti in exemplu de trimitere email din acces, sa ma ajutati si pe mine cu el.
Ce vreau eu sa realizez ca sa faca programelul meu :
-Am lista de clienti gen "Multiple Items".
-Am coloana "email" si langa ea am coloana cu butonul "email" . La apasarea lui vrea sa se creeze un email nou catre adresa de email din campul "email".
-Am coloana "Data ultimei trimiteri" si as vrea ca aici sa imi apara data ultimului email trimis.
Acum, am urmatoarele intrebari :
1) Cum fac ca email-ul sa se trimita catre adresa de email scrisa in coloana precedenta.
2) Cum fac ca email-ul sa contina un text ( Prezentare) + semnatura mea. Pot sa creez un template de email pe care sa il trimita ? Poate fi si HTML ?
3) Daca la un client am mai multe adrese de email, cum sa il fac sa trimita ambelor adrese ?
4) Cum fac ca in campul " data ultimei trimiteri" sa apara data ultimului email trimis ? As fi incercat cu data ultimei modificari a clientului insa daca modific altceva gen "nume" o sa ma pacalesc..
Nu doresc rezolvarea de catre voi, vreau sa invat sa il fac singur da as avea nevoie doar de idei/sfaturi.
Va multumesc mult.
Va rog, pe cei care aveti in exemplu de trimitere email din acces, sa ma ajutati si pe mine cu el.
Ce vreau eu sa realizez ca sa faca programelul meu :
-Am lista de clienti gen "Multiple Items".
-Am coloana "email" si langa ea am coloana cu butonul "email" . La apasarea lui vrea sa se creeze un email nou catre adresa de email din campul "email".
-Am coloana "Data ultimei trimiteri" si as vrea ca aici sa imi apara data ultimului email trimis.
Acum, am urmatoarele intrebari :
1) Cum fac ca email-ul sa se trimita catre adresa de email scrisa in coloana precedenta.
2) Cum fac ca email-ul sa contina un text ( Prezentare) + semnatura mea. Pot sa creez un template de email pe care sa il trimita ? Poate fi si HTML ?
3) Daca la un client am mai multe adrese de email, cum sa il fac sa trimita ambelor adrese ?
4) Cum fac ca in campul " data ultimei trimiteri" sa apara data ultimului email trimis ? As fi incercat cu data ultimei modificari a clientului insa daca modific altceva gen "nume" o sa ma pacalesc..
Nu doresc rezolvarea de catre voi, vreau sa invat sa il fac singur da as avea nevoie doar de idei/sfaturi.
Va multumesc mult.
Nu aveţi permisiunea de a vizualiza fişierele ataşate acestui mesaj.
Re: Trimitere email din Access 2010
Oare chiar nu trimite nimeni email din soft ?
Re: Trimitere email din Access 2010
Din soft, da. Dar nu din Access, ci din SQL Server.SharQue99 scrie:Oare chiar nu trimite nimeni email din soft ?
Vezi daca te ajuta: https://msdn.microsoft.com/en-us/librar ... e.11).aspx
- mesersmith
- Mesaje: 2088
- Membru din: Sâm Oct 23, 2010 6:44 am
- Localitate: calarasi
- Contact:
Re: Trimitere email din Access 2010
Da, eu am folosit aceasta optiune.
Eu la o apasare de buton dintr-un raport care este in fapt o factura fiscala, chem un macro care se ocupa de tot.
Iti ridic un print screen cu ce cuprinde acest macro din care ar trebui sa te prinzi cum lucreaza.
De asemenea, poti citi aici:
https://msdn.microsoft.com/en-us/librar ... 96469.aspx
Eu la o apasare de buton dintr-un raport care este in fapt o factura fiscala, chem un macro care se ocupa de tot.
Iti ridic un print screen cu ce cuprinde acest macro din care ar trebui sa te prinzi cum lucreaza.
De asemenea, poti citi aici:
https://msdn.microsoft.com/en-us/librar ... 96469.aspx
Nu aveţi permisiunea de a vizualiza fişierele ataşate acestui mesaj.
Re: Trimitere email din Access 2010
Multumesc frumos insa mie imi trebuia ca sa trimit textul in continutul email-ului si nu in atasament.
Pentru cei ce doresc sa faca acelasi lucru, am gasit urmatorul exemplu : http://www.blueclaw-db.com/download/dow ... xample.htm
Multumesc tuturor pentru ajutor.
Pentru cei ce doresc sa faca acelasi lucru, am gasit urmatorul exemplu : http://www.blueclaw-db.com/download/dow ... xample.htm
Multumesc tuturor pentru ajutor.
Re: Trimitere email din Access 2010
Salutare,
Am si eu BD din atasament si doresc ca in formularul "F_Mailings", campul "Message Body" sa setez ca si "Default Value" un text HTML.
Aveti idee cum as putea seta asa ceva ?
Va multumesc frumos anticipat.
Am si eu BD din atasament si doresc ca in formularul "F_Mailings", campul "Message Body" sa setez ca si "Default Value" un text HTML.
Aveti idee cum as putea seta asa ceva ?
Va multumesc frumos anticipat.
Nu aveţi permisiunea de a vizualiza fişierele ataşate acestui mesaj.
Re: Trimitere email din Access 2010
Sau macar sa aduc din alta parte textul dar sa se respecte formatul html ( culori text, spatii, etc ) ????
Va rog, daca aveti vre-o idee, chiar daca este posibil sa nu functioneze, sa mi-o spuneti.
Va multumesc.
Va rog, daca aveti vre-o idee, chiar daca este posibil sa nu functioneze, sa mi-o spuneti.
Va multumesc.
Re: Trimitere email din Access 2010
Buna ziua,
Am si eu nevoie de ajutorul vostru si va rog mult sa ma ajutati.
Am codul urmator care , la apasarea unui buton, trimite email prin aplicatia outlook. E am gasit acest cod intr-o baza de date 2003 si functioneaza f bine.
Incerc sa il folosesc intr-o baza de date 2010 si imi aparea eroare : " user-defined type not defined" . Ma poate ajuta cineva sa convertesc acest cod astfel incat sa mearga si la 2010 ? La VBA chiar nu ma pricep absolut deloc.
Va multumesc mult.
Am si eu nevoie de ajutorul vostru si va rog mult sa ma ajutati.
Am codul urmator care , la apasarea unui buton, trimite email prin aplicatia outlook. E am gasit acest cod intr-o baza de date 2003 si functioneaza f bine.
Cod: Selectaţi tot
Private Sub Command20_Click()
Dim mess_body As String
Dim appOutLook As Outlook.Application
Dim MailOutLook As Outlook.MailItem
Set appOutLook = CreateObject("Outlook.Application")
Set MailOutLook = appOutLook.CreateItem(olMailItem)
Set appOutLook = CreateObject("Outlook.Application")
Set MailOutLook = appOutLook.CreateItem(olMailItem)
With MailOutLook
.BodyFormat = olFormatRichText
.To = Me.Email_Address
.Subject = Me.Mess_Subject
.HTMLBody = Me.Mess_Text
If Left(Me.Mail_Attachment_Path, 1) <> "<" Then
.Attachments.Add (Me.Mail_Attachment_Path)
End If
'.DeleteAfterSubmit = True 'This would let Outlook send th note without storing it in your sent bin
.Send
End With
'MsgBox MailOutLook.Body
Exit Sub
email_error:
MsgBox "An error was encountered." & vbCrLf & "The error message is: " & Err.Description
Resume Error_out
Error_out:
End Sub
Va multumesc mult.
Re: Trimitere email din Access 2010
SharQue99 scrie:Buna ziua,
Am si eu nevoie de ajutorul vostru si va rog mult sa ma ajutati.
Am codul urmator care , la apasarea unui buton, trimite email prin aplicatia outlook. Eu am gasit acest cod intr-o baza de date 2003 si functioneaza f bine.Incerc sa il folosesc intr-o baza de date 2010 si imi aparea eroare : " user-defined type not defined" . Ma poate ajuta cineva sa convertesc acest cod astfel incat sa mearga si la 2010 ? La VBA chiar nu ma pricep absolut deloc.Cod: Selectaţi tot
Private Sub Command20_Click() Dim mess_body As String Dim appOutLook As Outlook.Application Dim MailOutLook As Outlook.MailItem Set appOutLook = CreateObject("Outlook.Application") Set MailOutLook = appOutLook.CreateItem(olMailItem) Set appOutLook = CreateObject("Outlook.Application") Set MailOutLook = appOutLook.CreateItem(olMailItem) With MailOutLook .BodyFormat = olFormatRichText .To = Me.Email_Address .Subject = Me.Mess_Subject .HTMLBody = Me.Mess_Text If Left(Me.Mail_Attachment_Path, 1) <> "<" Then .Attachments.Add (Me.Mail_Attachment_Path) End If '.DeleteAfterSubmit = True 'This would let Outlook send th note without storing it in your sent bin .Send End With 'MsgBox MailOutLook.Body Exit Sub email_error: MsgBox "An error was encountered." & vbCrLf & "The error message is: " & Err.Description Resume Error_out Error_out: End Sub
Va multumesc mult.
Re: Trimitere email din Access 2010
Scuze pentru deranj insa am rezolvat bifand MIcrosoft Outlook 14.0 Object Library in References .
Scuze inca o data insa am prostul obicei de a nu ma lasa pana nu scotocesc si eu si pana la urma rezolv singur.
Scuze inca o data insa am prostul obicei de a nu ma lasa pana nu scotocesc si eu si pana la urma rezolv singur.