תחומים
    • הרשמה
    • התחברות
    • חיפוש
    • קטגוריות
    • פוסטים אחרונים
    • משתמשים
    • חיפוש
    חוקי הפורום

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

    תכנות
    5
    34
    1955
    טוען פוסטים נוספים
    • מהישן לחדש
    • מהחדש לישן
    • הכי הרבה הצבעות
    תגובה
    • הגיבו כנושא
    התחברו בכדי לפרסם תגובה
    נושא זה נמחק. רק משתמשים עם הרשאות מתאימות יוכלו לצפות בו.
    • חייםיודלביץ
      חייםיודלביץ נערך לאחרונה על ידי

      שלום
      מישהו יוכל לעזור לי איך לבטל את ההודעה הזאת של אאוטלוק שנפתחת לי כאשר אני שולח מייל באופן אוטומטי מתוך האקסס,
      יש לי אנטי וירוס חוקי מעודכן וכן עשיתי לפי ההוראות של מיקרוסופט לביטול ההודעה הזאת [באפשרויות >מרכז האמון> בגישה תכנותית]
      מה עוד אני יכול לעשות זה נורא חשוב לי!0_1542003748785_הודעה מאקסס.jpg

      אשמח מאד מאד לעזרה![alt text](image url)

      תגובה 1 תגובה אחרונה תגובה ציטוט 0
      • yossiz
        yossiz נערך לאחרונה על ידי

        קישור זה שהעליתי בפרוג לא עזר לך?

        חייםיודלביץ תגובה 1 תגובה אחרונה תגובה ציטוט 1
        • חייםיודלביץ
          חייםיודלביץ @yossiz נערך לאחרונה על ידי חייםיודלביץ

          @yossiz

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

          תודה

          תגובה 1 תגובה אחרונה תגובה ציטוט 0
          • yossiz
            yossiz נערך לאחרונה על ידי

            מתוך הדף הנ"ל:

            הערה אם אפשרויות אלה אינן זמינות, צא מ- Outlook ולאחר מכן התחל שוב Outlook במצב מוגברות. כדי לעשות זאת, הקלד Outlook בשולחן העבודה או בתיבה התחל חיפוש , לחץ לחיצה ימנית על תוצאת החיפוש ב- Microsoft Outlook , לחץ על מאפיינים, לחץ על הכרטיסיה תאימות ולאחר מכן לחץ על הפעל תוכנית זו כ מנהל

            מה רשום לך פה בAntivirus Status:

            חייםיודלביץ תגובה 1 תגובה אחרונה תגובה ציטוט 2
            • חייםיודלביץ
              חייםיודלביץ @yossiz נערך לאחרונה על ידי

              @yossiz

              אכן ניסתי כמו שכתוב ונכנסתי כמנהל ואז הוא נתן לי לשנות

              למטה רשום לי אנטי וירוס חוקי

              אבל עדיין גם אחרי שהגדרתי אותו שלא ישלח התראות[האפשרות השלישית] הוא עדיין נותן לי את ההתראה הנ"ל!

              תודה.

              תגובה 1 תגובה אחרונה תגובה ציטוט 0
              • yossiz
                yossiz נערך לאחרונה על ידי

                בשלב זה אני מרים ידיים
                אולי תבדוק בregistry כפי ההוראות בדף הנ"ל.

                דרך אגב, למה דפי התמיכה של מייקרוסופט בעברית נראים על הפנים (כאילו שחסר קובץ CSS), האם זה קשור לנטפרי?

                תגובה 1 תגובה אחרונה תגובה ציטוט 2
                • חייםיודלביץ
                  חייםיודלביץ נערך לאחרונה על ידי

                  אולי מישהו יודע?

                  איך כולם שולחים מייל מאקסס?

                  הדבר חשוב ודחוף לי
                  אשמח מאד מאד לעזרה!!

                  בתודה מראש

                  clickone תגובה 1 תגובה אחרונה תגובה ציטוט 0
                  • clickone
                    clickone @חייםיודלביץ נערך לאחרונה על ידי

                    @חייםיודלביץ
                    שולחים עם אובייקט CDO.
                    בעבר העלתי כאן דוגמאות קוד (זה בתיכנות אקסלוסיבי. אם אין לך מנוי שם תכתוב ואני אדביק כאן את הפונקצייה ששמתי שם [אפשרות אחרת זה לשלם מנוי לפורום הזה. מנסיון - שווה כל שקל])
                    http://tchumim.com/post/27711

                    אין טסט כמו פרודקשן.

                    המייל שלי urivpn@gmail.com

                    yossiz תגובה 1 תגובה אחרונה תגובה ציטוט 2
                    • חייםיודלביץ
                      חייםיודלביץ נערך לאחרונה על ידי חייםיודלביץ

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

                      cdo עובד דרך אאוטלוק? ובעצם אשמח לדעת מה זה בכללץ
                      אשמח מאד מאד אם תוכל לעלות את הקוד!
                      בתודה רבה רבה מראש

                      clickone תגובה 1 תגובה אחרונה תגובה ציטוט 0
                      • clickone
                        clickone @חייםיודלביץ נערך לאחרונה על ידי

                        @חייםיודלביץ לדעתי תנסה לפחות חודש.
                        תראה שזה שווה כל שקל. במיוחד אם אתה מתחיל. (אין לי אחוזים שם 😛 )
                        ה8 ש"ח האלו זה פחות מ2 שקיות חלב בחודש. והזמן שזה יחסוך לך שווה המון.

                        CDO זה האובייקט שדרכו אאוטלוק עובר.
                        מצ"ב הקוד

                        
                               Function SendMail(sEmail As String, Title As String, sText As String, Optional sFile As String = "") As String
                        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"
                        If Me.HtmlBody Then
                          .HtmlBody = sText
                        Else
                            .TextBody =  '"the full message body goes here. you may want to create a variable to hold the text"
                        End If
                        
                        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
                        SendMail = "Mail Send"
                        Else
                        SendMail = Err.Description
                        End If
                        End Function
                        

                        אין טסט כמו פרודקשן.

                        המייל שלי urivpn@gmail.com

                        חייםיודלביץ תגובה 1 תגובה אחרונה תגובה ציטוט 2
                        • yossiz
                          yossiz @clickone נערך לאחרונה על ידי

                          פוסט זה נמחק!
                          clickone תגובה 1 תגובה אחרונה תגובה ציטוט 0
                          • clickone
                            clickone @yossiz נערך לאחרונה על ידי clickone

                            @yossiz בעל הפורום, @dovid , מודע לזה. ולא חוסם את זה מסיבותיו שלו.
                            לא חושב שזה "פייר" להינות בחינם מתוכן שבעל המקום רוצה שיהיה בתשלום כאשר כלל האכסניה היא בחינם. (אני באופן אישי משלם ונהנה)
                            סליחה על ההערה

                            אין טסט כמו פרודקשן.

                            המייל שלי urivpn@gmail.com

                            תגובה 1 תגובה אחרונה תגובה ציטוט 2
                            • חייםיודלביץ
                              חייםיודלביץ @clickone נערך לאחרונה על ידי חייםיודלביץ

                              @clickone ווואו! תודה!

                              ב to לרשום את הכתובת, אך מה זה From?

                              אשמח אם תכול להסביר לי קצת על הפרמטרים של הקוד

                              יש אפשרות גם לצרף קבצים כלומר דוח?

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

                              clickone תגובה 1 תגובה אחרונה תגובה ציטוט 1
                              • clickone
                                clickone @חייםיודלביץ נערך לאחרונה על ידי

                                @חייםיודלביץ
                                TO זה לאן לשלוח
                                FROM זה הכתובת שתוצג ככתובת השולחת. לא זוכר כעת כמה זה עובד בגימייל. (בשרתים אחרים זה עובד מצויין)
                                sFile זה הקובץ לצרף למייל.
                                אם אתה רוצה לצרף כמה, תפריד בי שמות הקבצים עם נקודה פסיק = ;
                                שים לב שצריך לשים נתיב מלא לקובץ

                                אין טסט כמו פרודקשן.

                                המייל שלי urivpn@gmail.com

                                חייםיודלביץ תגובה 1 תגובה אחרונה תגובה ציטוט 1
                                • חייםיודלביץ
                                  חייםיודלביץ @clickone נערך לאחרונה על ידי

                                  @clickone תודה רבה על על הזמן שאתה מקדיש כדי לעזור לי, למרות שראיתי כאן שאתה מאד עסוק בימים אלה, מקווה שאני לא מפריע לך.

                                  יש אפשרות בצירוף קובץ לשלוח דוח מתוך האקסס בפורמט PDF כמו שניתן במאקרו של שליחת מייל ?

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

                                  clickone תגובה 1 תגובה אחרונה תגובה ציטוט 0
                                  • clickone
                                    clickone @חייםיודלביץ נערך לאחרונה על ידי

                                    @חייםיודלביץ
                                    כן.
                                    אתה צריך לייצא את הקובץ לפני לPDF, ואז לתת אותו בפרמטר
                                    דוגמא:

                                    Dim ssfile As String
                                    ssfile = CurrentProject.Path & "\" & "rptName" & Format(Now, "ddmmyynnss") & ".pdf"
                                    sFile = ssfile
                                        DoCmd.OutputTo 3, srpt, acFormatPDF, ssfile, False, , , acExportQualityPrint
                                    
                                    

                                    ואז תעביר לפונקצייה את sFile

                                    אין טסט כמו פרודקשן.

                                    המייל שלי urivpn@gmail.com

                                    חייםיודלביץ תגובה 1 תגובה אחרונה תגובה ציטוט 3
                                    • חייםיודלביץ
                                      חייםיודלביץ @clickone נערך לאחרונה על ידי

                                      @clickone כלומר זה ייצא אותו לתקייה זמנית במחשב, לא בתוך האקסס נכון?

                                      באיזה שורה למקם אותו במודול?

                                      תודה רבה רבה! שימחת אותי מאד בעזרה שלך!

                                      clickone תגובה 1 תגובה אחרונה תגובה ציטוט 0
                                      • clickone
                                        clickone @חייםיודלביץ נערך לאחרונה על ידי

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

                                        אין טסט כמו פרודקשן.

                                        המייל שלי urivpn@gmail.com

                                        תגובה 1 תגובה אחרונה תגובה ציטוט 2
                                        • חייםיודלביץ
                                          חייםיודלביץ נערך לאחרונה על ידי

                                          תודה!
                                          בפועל אני רואה שאני בכלל לא מסתדר
                                          מצ"ב הקובץ שאיתו אני מנסה
                                          בטופס פרטי איש קשר הוספתי לחצן "שלח מייל" וכתבתי את הפרמטרים אבל הוא נותן לי שגיאה "שגיאה בהקלדה"
                                          בתודה מראש
                                          0_1542146893129_אנשי קשר.accdb

                                          clickone תגובה 1 תגובה אחרונה תגובה ציטוט 0
                                          • clickone
                                            clickone @חייםיודלביץ נערך לאחרונה על ידי

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

                                            אין טסט כמו פרודקשן.

                                            המייל שלי urivpn@gmail.com

                                            חייםיודלביץ תגובה 1 תגובה אחרונה תגובה ציטוט 3
                                            • חייםיודלביץ
                                              חייםיודלביץ @clickone נערך לאחרונה על ידי

                                              @clickone תודה!

                                              איפה הוספת את הקוד של להמיר לPDF?

                                              תודה.

                                              clickone תגובה 1 תגובה אחרונה תגובה ציטוט 0
                                              • clickone
                                                clickone @חייםיודלביץ נערך לאחרונה על ידי

                                                @חייםיודלביץ
                                                לא הוספתי.
                                                כי הבנתי שאתה רוצה קודם לפתור את הבעייה הספציפית הזו.
                                                איזה דוח אתה רוצה לייצא?

                                                אין טסט כמו פרודקשן.

                                                המייל שלי urivpn@gmail.com

                                                חייםיודלביץ תגובה 1 תגובה אחרונה תגובה ציטוט 1
                                                • חייםיודלביץ
                                                  חייםיודלביץ @clickone נערך לאחרונה על ידי

                                                  @clickone לדוגמא "רשימת אנשי קשר"

                                                  תודה רבה על המאמץ לעזור!

                                                  clickone תגובה 1 תגובה אחרונה תגובה ציטוט 0
                                                  • clickone
                                                    clickone @חייםיודלביץ נערך לאחרונה על ידי

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

                                                    אין טסט כמו פרודקשן.

                                                    המייל שלי urivpn@gmail.com

                                                    חייםיודלביץ תגובה 1 תגובה אחרונה תגובה ציטוט 4
                                                    • חייםיודלביץ
                                                      חייםיודלביץ נערך לאחרונה על ידי

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

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

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

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

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

                                                      תגובה 1 תגובה אחרונה תגובה ציטוט 3
                                                      • חייםיודלביץ
                                                        חייםיודלביץ @clickone נערך לאחרונה על ידי

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

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

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

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

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

                                                        WWW תגובה 1 תגובה אחרונה תגובה ציטוט 3
                                                        • WWW
                                                          WWW @חייםיודלביץ נערך לאחרונה על ידי

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

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

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

                                                          תודה רבה רבה

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

                                                          WWW.netfree@gmail.com || קשבק! החזר כספי לבנק על רכישות באינטרנט || עונים על סקרים ומרוויחים כסף!

                                                          חייםיודלביץ תגובה 1 תגובה אחרונה תגובה ציטוט 1
                                                          • חייםיודלביץ
                                                            חייםיודלביץ @WWW נערך לאחרונה על ידי

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

                                                            WWW תגובה 1 תגובה אחרונה תגובה ציטוט 0
                                                            • WWW
                                                              WWW @חייםיודלביץ נערך לאחרונה על ידי

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

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

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

                                                              Send =
                                                              

                                                              WWW.netfree@gmail.com || קשבק! החזר כספי לבנק על רכישות באינטרנט || עונים על סקרים ומרוויחים כסף!

                                                              חייםיודלביץ clickone 2 תגובות תגובה אחרונה תגובה ציטוט 2
                                                              • חייםיודלביץ
                                                                חייםיודלביץ @WWW נערך לאחרונה על ידי

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

                                                                Send =

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

                                                                תגובה 1 תגובה אחרונה תגובה ציטוט 1
                                                                • 1
                                                                • 2
                                                                • 1 / 2
                                                                • פוסט ראשון
                                                                  פוסט אחרון
                                                                בא תתחבר לדף היומי!