ביטול הודעת אזהרה של אאוטלוק בעת שליחת איימיל מאקסס

[clickone]

@חייםיודלביץ
בבקשה
היו עוד כמה שינויים בקוד שלא תיעדתי.... אבל כעת הקוד נראה לי עובד.
תבדוק עם שם משתמש וסיסמא.
שים לב שכאן עבדתי עם קוד VBA מאחורה.
תעבור עליו ותנסה להבין. זה חשוב.
אם לא, תשאל. יענו לך.
0_1542148424751_1542146896140-אנשי-קשר.accdb

[חייםיודלביץ]

@clickone תודה רבה רבה על כל ההשקעה!

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

שימחת אותי מאד מאד!

את הקובץ האחרון אני ינסה ללמוד כבר מחר .

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

[חייםיודלביץ]

@clickone זה פשוט עובד מדהים!!

יש אפשרות שהוא לא יתן לי הודעה אחרי כל שליחת מייל, אני פשוט מריץ את זה בלולאה.

זה קשור לשורה הזאת לא?

MsgBox SendMail([כתובת מייל], "טלפון", "מספר טלפון גוף ההודעה", ssfile)

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

[WWW]

@חייםיודלביץ אמר בביטול הודעת אזהרה של אאוטלוק בעת שליחת איימיל מאקסס:

זה קשור לשורה הזאת לא?

 MsgBox SendMail([כתובת מייל], "טלפון", "מספר טלפון גוף ההודעה", ssfile)

תודה רבה רבה

תסיר את המילה MsgBox.

[חייםיודלביץ]

@www נסיתי הוא מחזיר שגיאה השורה נהפכת לאדומה.

[WWW]

@חייםיודלביץ אמר בביטול הודעת אזהרה של אאוטלוק בעת שליחת איימיל מאקסס:

@www נסיתי הוא מחזיר שגיאה השורה נהפכת לאדומה.

במקום זה תכתוב:

Send =

[חייםיודלביץ]

@www אמר בביטול הודעת אזהרה של אאוטלוק בעת שליחת איימיל מאקסס:

Send =

תודה, אכן עובד מצוין!

[clickone]

@www
@חייםיודלביץ
אפשר גם לדלג בכלל על הסוגריים.
בVBA, בניגוד לשפות אחרות, אם אתה משתמש בפונקצייה, ולא רוצה לקבל את הערך שחזר, אסור להשתמש בסוגריים.
ולכן השורה צריכה להיראות ככה:

 SendMail [כתובת מייל], "טלפון", "מספר טלפון גוף ההודעה", ssfile

[WWW]

@clickone אמר בביטול הודעת אזהרה של אאוטלוק בעת שליחת איימיל מאקסס:

בVBA

כבר שכחתי מאיזה צד מסתכלים על זה
ברוך ה'!

[ליבל]

@חייםיודלביץ למה שלא תשים בתחילת השורה גרש בודד כזה ' ואז כל השורה מסומן כהערה

[clickone]

@ליבל בגלל שהא מעוניין בשורה.
רק לא מעונן בודעה.
ובגלל ששירשרתי שם 2 פונקציות, אז אם הוא מכניס להערה את כל השורה, גם המייל לא יישלח.
ולכן צריך להוציא את הMsgBox מהשורה, ולהוציא את הקריאה לפונקציה כפונקצייה שמחזירה ערך (= להוריד את הסוגריים שמורים לVBA שכאן יש החזר ערך עם שמה למשתנה או פונקצייה משורשרת) או לחילופין להכניס אותו לתוך משתנה אחר