שליחת דוא"ל מאקסס

[רושם]

יש לי מסד נתונים עם רשימת עובדים וכתובות המייל שלהם. המערכת בונה להם תוכנית עבודה יומית, ואני רוצה שכל עובד יקבל את התוכנית שלו למייל שלו (או לוואטסאפ אם יש אפשרות...).

האם יש קוד כזה? נדמה לי שהיה כאן בעבר אבל אינני מוצא כעת.

תודה רבה!

 

[iFax]

יש לך את זה שזה דרך אאוטלוק

Sub sendOutlookEmail()
Dim oApp As Outlook.Application
Dim oMail As MailItem
Set oApp = CreateObject("Outlook.application")

Set oMail = oApp.CreateItem(olMailItem)
oMail.Body = "Body of the email"
oMail.Subject = "Test Subject"
oMail.To = "<לא ניתן לפרסם מיילים באופן פומבי>"
oMail.Send
Set oMail = Nothing
Set oApp = Nothing


End Sub

וכמובן שצריך ליצור הפנייה בvba לאובייקט של אאוטלוק

 

[רושם]

תודה רבה.
1. מה הכוונה "ליצור הפנייה בVBA לאובייקט של אאוטלוק".
2. מה דעתכם על הפקודה "EmailSubject", האם זה יכול לתת מענה?

 

[iFax]

בחלון הVB מתחת לתפריט tools יש אפשרות לבחור refrences זה מאפשר את זה....

 

[רושם]

תודה רבה!
זה עובד!

האם יש אפשרות שה"BODY" יהיה דוח או רק טקסט?

 

[iFax]

לדעתי זה גם יכול להכיל html תהפוך את הדוח ל html ותשלח,
תנסה קודם אם סתם html בסיסי

 

[רושם]

האם יש למישהו איזה רעיון לשליחת דוח לאימייל?
מדובר על דוח כ-15 עד 20 דוחות שונים שמשתנים מידי יום, שצריכים להשלח כל אחד לנמען אחר,
(תוכנית עבודה יומית לפועלים).

אקסס יודע להכין את התכנית לכל אחד, אני מחפש דרך לשלוח את של כל אחד למייל שלו.

תודה על העזרה!

 

[iFax]

לא הבנתי איפה הבעיה תעשה לולאה שתעבור על הרשימה תפיק דו"ח לכל אחד ותשלח את הדוח

 

[רושם]

סליחה על הבורות, איך מכנים את תוכן הרשומה בלולאה?

 

[iFax]

לא בורות ולא נעליים כולנו למדנו ולומדים דברים חדשים
דוגמא:

Dim strSQL As String
Dim rs As DAO.Recordset

strSQL = "SELECT * FROM employee_tbl" 'define the SQL result that you want to loop
Set rs = CurrentDb.OpenRecordset(strSQL)

If Not rs.BOF And Not rs.EOF Then
rs.MoveFirst
While (Not rs.EOF)
Debug.Print rs.Fields("Employee Name") 'define the field you want to return data
rs.MoveNext
Wend
End If
rs.Close
Set rs = Nothing

 

[רושם]

זהו, זה עובד!
למחר כבר קיבלו 17 עובדים את תוכנית העבודה שלהם, כל אחד את שלו למייל שלו!

תודה לאייפקס על העזרה.

אגב, יש דרך להחיל באמצעות הקוד עיצוב על הטקסטים שנשלחים לאווטלוק?
כגון הדגשה, קו תחתי, יישור לימין וכדומה.

שוב תודה על כל העזרה!!

 

[iFax]

עם html אתה יכול לכאורה, פשוט תקיף את השדות בתגיות html, בד"כ במייל עושים טבלת html תחפש בגוגל

 

[ארי4791]

מישהו יכול להסביר לי איך אפשר לצרף דוח או קובץ html, מה צריך לכתוב בקוד.
וגם איך הופכים דוח לhtml.
תודה רבה.