איך כותבים בVBA קוד לשליחת אימייל ישירות מהאקסס?
-
@הכוכב-שלנו
אני שם לך כאן קוד בשביל לחצן.
בגדול לא צריך שום שינוי בגימייל, אבל אם אתה מקבל שגיאה מגימייל, אז זו בעייה של רמת אבטחה שייתכן שצריך להוריד.On Error Resume Next Dim cdomsg As Object Set cdomsg = CreateObject("CDO.message") With cdomsg.Configuration.Fields .Item("http://schemas.microsoft.com/cdo/configuration/sendusing") = 2 'NTLM method .Item("http://schemas.microsoft.com/cdo/configuration/smtpserver") = "smtp.gmail.com" .Item("http://schemas.microsoft.com/cdo/configuration/smptserverport") = 465 .Item("http://schemas.microsoft.com/cdo/configuration/smtpauthenticate") = 1 .Item("http://schemas.microsoft.com/cdo/configuration/smtpusessl") = True .Item("http://schemas.microsoft.com/cdo/configuration/smtpconnectiontimeout") = 60 .Item("http://schemas.microsoft.com/cdo/configuration/sendusername") = "user@gmail.com" .Item("http://schemas.microsoft.com/cdo/configuration/sendpassword") = "password" .update End With ' build email parts With cdomsg .To = "to@gmail.com" .From = "from@gmail.com" '.sender = .Subject = "Subject" .TextBody = '"the full message body goes here. you may want to create a variable to hold the text" If Len(sFile) > 0 Then Dim arr As Variant arr = Split(sFile, ";") For i = 0 To UBound(arr) If Len(arr(i)) > 0 Then If Dir(CStr(arr(i)), vbNormal) <> vbNullString Then .AddAttachment arr(i) End If End If Next End If .Send End With Set cdomsg = Nothing If Err = 0 Then msgbox "Mail Send" Else msgbox Err.Description End If@clickone אמר באיך כותבים בVBA קוד לשליחת אימייל ישירות מהאקסס?:
בגדול לא צריך שום שינוי בגימייל, אבל אם אתה מקבל שגיאה מגימייל, אז זו בעייה של רמת אבטחה שייתכן שצריך להוריד.
לי הוא לא עבד ללא התרת אפלקציות לא מאובטחות.
השתנה משהו? אני לא מתווכח.. -
@clickone אמר באיך כותבים בVBA קוד לשליחת אימייל ישירות מהאקסס?:
@dovid
אני חושב שאם הוא יקח את הקוד הספציפי ויעבור עליו סטפ ביי סטפ הוא יכול ללמוד המון.זה עדיין קפיצה. הוא צריך קודם להציג msgbox וכדומה.
@dovid אמר באיך כותבים בVBA קוד לשליחת אימייל ישירות מהאקסס?:
@clickone אמר באיך כותבים בVBA קוד לשליחת אימייל ישירות מהאקסס?:
@dovid
אני חושב שאם הוא יקח את הקוד הספציפי ויעבור עליו סטפ ביי סטפ הוא יכול ללמוד המון.זה עדיין קפיצה. הוא צריך קודם להציג msgbox וכדומה.
- אני יודע לעשות Msgbox כולל נתונים לפי שדות בטבלה...
- אבל זה בסדר התגרת אותי!
-
@הכוכב-שלנו מעולה!
אתה כתבת בענוה יתירה שאתה לא יודע לכתוב קוד VBA. להבא, תיצמד לעובדות גם כשהם מחמיאות
- מנטור אישי בתכנות והמסתעף – להתקדם לשלב הבא!
- בכל נושא אפשר ליצור קשר dovid@tchumim.com
-
@clickone אמר באיך כותבים בVBA קוד לשליחת אימייל ישירות מהאקסס?:
בגדול לא צריך שום שינוי בגימייל, אבל אם אתה מקבל שגיאה מגימייל, אז זו בעייה של רמת אבטחה שייתכן שצריך להוריד.
לי הוא לא עבד ללא התרת אפלקציות לא מאובטחות.
השתנה משהו? אני לא מתווכח.. -
@הכוכב-שלנו מעולה!
אתה כתבת בענוה יתירה שאתה לא יודע לכתוב קוד VBA. להבא, תיצמד לעובדות גם כשהם מחמיאות@dovid השם ישמור אותי אם זה נקרא לדעת לכתוב....
דרך אגב אחד התאוות לכל מתחיל באקסס זה הודעות קופצות (זה שיושב לצידך מתפלא, בעיניים שלו זה שכלול יותר גדול משליחת אימייל באקסס למשל...)מעוניין לפעול בשביל תחבורה ציבורית! על כל רעיון תפנו אלי!!!
-
@dovid השם ישמור אותי אם זה נקרא לדעת לכתוב....
דרך אגב אחד התאוות לכל מתחיל באקסס זה הודעות קופצות (זה שיושב לצידך מתפלא, בעיניים שלו זה שכלול יותר גדול משליחת אימייל באקסס למשל...)המייל שלי urivpn@gmail.com
-
@הכוכב-שלנו אמר באיך כותבים בVBA קוד לשליחת אימייל ישירות מהאקסס?:
@dovid השם ישמור אותי אם זה נקרא לדעת לכתוב....
דרך אגב אחד התאוות לכל מתחיל באקסס זה הודעות קופצות (זה שיושב לצידך מתפלא, בעיניים שלו זה שכלול יותר גדול משליחת אימייל באקסס למשל...)אין פה מקום לענווה ולדרגות רבות. מי שיודע להציג msgbox הוא נחשב יודע לכתוב קוד VBA. זה 0-1...
אני אכן מציע שתלמד את הקוד שהועלה, תנסה תשאל על כל שורה לא מובנת ואל תוותר עד שתכבוש את הקוד הזה.- מנטור אישי בתכנות והמסתעף – להתקדם לשלב הבא!
- בכל נושא אפשר ליצור קשר dovid@tchumim.com
-
@הכוכב-שלנו אמר באיך כותבים בVBA קוד לשליחת אימייל ישירות מהאקסס?:
@dovid השם ישמור אותי אם זה נקרא לדעת לכתוב....
דרך אגב אחד התאוות לכל מתחיל באקסס זה הודעות קופצות (זה שיושב לצידך מתפלא, בעיניים שלו זה שכלול יותר גדול משליחת אימייל באקסס למשל...)אין פה מקום לענווה ולדרגות רבות. מי שיודע להציג msgbox הוא נחשב יודע לכתוב קוד VBA. זה 0-1...
אני אכן מציע שתלמד את הקוד שהועלה, תנסה תשאל על כל שורה לא מובנת ואל תוותר עד שתכבוש את הקוד הזה.@dovid בשביל ההבנה בכללי הפורום:
כאלו שאלות מותר לשאול?
מה הפירוש ABC?
לא נעים לשגע אנשים שלא חייבים לך כלום!
-
@clickone תודה.
בכל אופן אני מקווה ללמוד את השיטה ולשדרג אותה.
אני רוצה לעשות שבעת קבלת עדכון A ישלח מייל עם טקסט מסווים ל D
ובעת קבלת עדכון B ישלח מייל ל E
ועל זו הדרך- תעשה את זה עם טבלה....
- אם כבר, יש לי קלאס שלם של שליחת מיילים שבו אפשר להחזיק כמה חשבונות והוא טוען אותם לפי מה שביקשת. אם זה מעניין מישהו, אני יעלה את זה לכאן
המייל שלי urivpn@gmail.com
-
- תעשה את זה עם טבלה....
- אם כבר, יש לי קלאס שלם של שליחת מיילים שבו אפשר להחזיק כמה חשבונות והוא טוען אותם לפי מה שביקשת. אם זה מעניין מישהו, אני יעלה את זה לכאן
@clickone אמר באיך כותבים בVBA קוד לשליחת אימייל ישירות מהאקסס?:
- תעשה את זה עם טבלה....
- אם כבר, יש לי קלאס שלם של שליחת מיילים שבו אפשר להחזיק כמה חשבונות והוא טוען אותם לפי מה שביקשת. אם זה מעניין מישהו, אני יעלה את זה לכאן
מתפלא מהלב - זהב אבל אני מבקש ממך אל תעלה כי אתה נותן לי קביים תן לי ללכת לבד...
מעוניין לפעול בשביל תחבורה ציבורית! על כל רעיון תפנו אלי!!!
-
@clickone אמר באיך כותבים בVBA קוד לשליחת אימייל ישירות מהאקסס?:
- תעשה את זה עם טבלה....
- אם כבר, יש לי קלאס שלם של שליחת מיילים שבו אפשר להחזיק כמה חשבונות והוא טוען אותם לפי מה שביקשת. אם זה מעניין מישהו, אני יעלה את זה לכאן
מתפלא מהלב - זהב אבל אני מבקש ממך אל תעלה כי אתה נותן לי קביים תן לי ללכת לבד...
@הכוכב-שלנו את השאלה הבאה אתה שואל רק אם הבנת את כל הקוד + הוא עובד לך.
מבחינת חוקים - הפורום הוקם בשביל שאלות כאלה.
לא עוזרים לך בחינם, אלא פשוט אוהבים לשתף ולעזור אחד לשני - כל אחד גם מקבל תועלת גם מתשובות שלא אחרים וגם מתשובות שלו עצמו.@הכוכב-שלנו אמר באיך כותבים בVBA קוד לשליחת אימייל ישירות מהאקסס?:
מתפלא מהלב - זהב אבל אני מבקש ממך אל תעלה כי אתה נותן לי קביים תן לי ללכת לבד...
מצטרף! לשתי חלקי המשפט.
-
- תעשה את זה עם טבלה....
- אם כבר, יש לי קלאס שלם של שליחת מיילים שבו אפשר להחזיק כמה חשבונות והוא טוען אותם לפי מה שביקשת. אם זה מעניין מישהו, אני יעלה את זה לכאן
-
@clickone עם כל הנסיון שלי באקסס אני מופתע מהספריה הזו לגמרי
ויהיה לי מאוד שימושי אם תעלה את זה
אז סליחה מראש @הכוכב-שלנו
ותודה!@חבלזון אמר באיך כותבים בVBA קוד לשליחת אימייל ישירות מהאקסס?:
@clickone עם כל הנסיון שלי באקסס אני מופתע מהספריה הזו לגמרי
ויהיה לי מאוד שימושי אם תעלה את זה
אז סליחה מראש @הכוכב-שלנו
ותודה!אין שום קשר בין היכרות עם הספריה לבין הקוד של clickone.
הקוד שלו פשוט עובר עם לולאה מול טבלאות ועושה עבודה רגילה.- מנטור אישי בתכנות והמסתעף – להתקדם לשלב הבא!
- בכל נושא אפשר ליצור קשר dovid@tchumim.com
-
@חבלזון אמר באיך כותבים בVBA קוד לשליחת אימייל ישירות מהאקסס?:
@clickone עם כל הנסיון שלי באקסס אני מופתע מהספריה הזו לגמרי
ויהיה לי מאוד שימושי אם תעלה את זה
אז סליחה מראש @הכוכב-שלנו
ותודה!אין שום קשר בין היכרות עם הספריה לבין הקוד של clickone.
הקוד שלו פשוט עובר עם לולאה מול טבלאות ועושה עבודה רגילה. -
@הכוכב-שלנו אמר באיך כותבים בVBA קוד לשליחת אימייל ישירות מהאקסס?:
בכל אופן @clickone תעלה אולי אפשרות לשלוח במצב מאובטח, ואולי אף להסיר גישה דרך האקסס...
לשלוח במצב מאובטח של גימייל זה בעייה.
כי החסימה נמצאת בשרת שלהם.מה זה להסיר גישה? כמו הסרה של רשימת תפוצה?
המייל שלי urivpn@gmail.com
-
@הכוכב-שלנו אמר באיך כותבים בVBA קוד לשליחת אימייל ישירות מהאקסס?:
בכל אופן @clickone תעלה אולי אפשרות לשלוח במצב מאובטח, ואולי אף להסיר גישה דרך האקסס...
לשלוח במצב מאובטח של גימייל זה בעייה.
כי החסימה נמצאת בשרת שלהם.מה זה להסיר גישה? כמו הסרה של רשימת תפוצה?
@clickone לא.
כששולחים הודעה בג'ימל במצב מאובטח אפשר אחרי זה להיכנס לדואר יוצא לבחור במייל מסויים ללחוץ על הסרת גישה ואז הבן אדם לא יכול לראות את ההודעה ו/או קובץ מצורף (את שורת הנושא הוא כן יכול לראות)מעוניין לפעול בשביל תחבורה ציבורית! על כל רעיון תפנו אלי!!!
