דילוג לתוכן
  • דף הבית
  • קטגוריות
  • פוסטים אחרונים
  • משתמשים
  • חיפוש
  • חוקי הפורום
כיווץ
תחומים

תחומים - פורום חרדי מקצועי

💡 רוצה לזכור קריאת שמע בזמן? לחץ כאן!
  1. דף הבית
  2. תכנות
  3. שמירת שאילתא באקסס

שמירת שאילתא באקסס

מתוזמן נעוץ נעול הועבר תכנות
42 פוסטים 4 כותבים 992 צפיות
  • מהישן לחדש
  • מהחדש לישן
  • הכי הרבה הצבעות
התחברו כדי לפרסם תגובה
נושא זה נמחק. רק משתמשים עם הרשאות מתאימות יוכלו לצפות בו.
  • א מנותק
    א מנותק
    ארי
    כתב ב נערך לאחרונה על ידי
    #29

    @one1010 שמתי לב, עדיף ככה.

    תגובה 1 תגובה אחרונה
    1
    • א מנותק
      א מנותק
      ארי
      כתב ב נערך לאחרונה על ידי ארי
      #30

      מצורף קובץ חדש.
      תמחק את המודול הישן, ואז תעלה את החדש לתוכנה (מקש ימני כנ"ל ואז Impot File).
      מקווה שיעבוד.
      יש לך כמה מקומות שאתה צריך לעדכן בקוד של השליחת מייל, אתה צריך להכניס את הכתובת מייל שלך והסיסמא שלך, וגם את הכתובת מייל של המייל שאליו אתה רוצה שהמייל יישלח (זה יכול להיות אותו מייל שממנו נשלח).

      השינויים הם בשורות הבאות:
      להכניס את הכתובת מייל שלך (במקום YourEmail@gmail.com) :

          .Item("http://schemas.microsoft.com/cdo/configuration/sendusername") = "YourEmail@gmail.com"
      

      את הסיסמא (במקום YourPasswoed) :

          .Item("http://schemas.microsoft.com/cdo/configuration/sendpassword") = "YourPasswoed"
      

      את המייל של הנמען (במקום "To name SendTo@gmail.com" תכתוב פשוט את הכתובת מייל (מוקפת בגרשיים כמובן) :

      msgOne.To = "To name <SendTo@gmail.com>"
      

      את המייל שלך שוב (במקום Your Name YourEmail@gmail.com) :

      msgOne.From = "Your Name <YourEmail@gmail.com>"
      

      בהצלחה

      form_searchpage2.cls

      O תגובה 1 תגובה אחרונה
      1
      • O מנותק
        O מנותק
        one1010
        השיב לארי ב נערך לאחרונה על ידי
        #31

        @ארי אפרופו כפית של זהב ולהאכיל...:
        55336b7e-4dda-4616-be90-1062d8e998f3-image.png

        אני מקבל את זה כשאני מייבא כפי שהסברת

        תגובה 1 תגובה אחרונה
        0
        • א מנותק
          א מנותק
          ארי
          כתב ב נערך לאחרונה על ידי
          #32

          מחקת את הישן לפני?

          O תגובה 1 תגובה אחרונה
          0
          • O מנותק
            O מנותק
            one1010
            השיב לארי ב נערך לאחרונה על ידי
            #33

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

            תגובה 1 תגובה אחרונה
            0
            • א מנותק
              א מנותק
              ארי
              כתב ב נערך לאחרונה על ידי
              #34

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

              O תגובה 1 תגובה אחרונה
              1
              • O מנותק
                O מנותק
                one1010
                השיב לארי ב נערך לאחרונה על ידי
                #35

                @ארי עשיתי אפי שאמרת, כרגע אין שגיאה.
                בהזדמנות קרובה אבדוק האם זה מבצע את הפעולות בפועל ואעדכן
                תודה רבה!!

                תגובה 1 תגובה אחרונה
                0
                • O מנותק
                  O מנותק
                  one1010
                  כתב ב נערך לאחרונה על ידי
                  #36

                  @ארי מקבל את השגיאה הבאה כשהמילה CLASS בשורה הראשונה מודגשת

                  image.png

                  תגובה 1 תגובה אחרונה
                  0
                  • א מנותק
                    א מנותק
                    ארי
                    כתב ב נערך לאחרונה על ידי
                    #37

                    תמחק את ה9 שורות הראשונות (עד השורה הכחולה שמתחילה בOption).

                    O תגובה 1 תגובה אחרונה
                    1
                    • O מנותק
                      O מנותק
                      one1010
                      השיב לארי ב נערך לאחרונה על ידי
                      #38

                      @ארי צודק...
                      נראה שהמבנה של הקוד תקין, אבל אני מקבל הודעה "התרחשה שגיאה במהלך שליחת המייל"

                      איך אני יכול לבדוק במה הבעיה?

                      תגובה 1 תגובה אחרונה
                      0
                      • א מנותק
                        א מנותק
                        ארי
                        כתב ב נערך לאחרונה על ידי
                        #39

                        תחליף את הפונקציה האחרונה במודול שלך (Send) לזה:

                        Public Function Send(strBodyText) as string
                        'on error goto SendErr
                        Dim cdoConfig
                        Dim msgOne
                        Dim ErrStr
                         
                        Set cdoConfig = CreateObject("CDO.Configuration")
                        With cdoConfig.Fields
                            .Item("http://schemas.microsoft.com/cdo/configuration/sendusing") = 2
                            .Item("http://schemas.microsoft.com/cdo/configuration/smtpserver") = 465
                            .Item("http://schemas.microsoft.com/cdo/configuration/smtpserver") = "smtp.gmail.com"
                            .Item("http://schemas.microsoft.com/cdo/configuration/sendusername") = "YourEmail@gmail.com"
                            .Item("http://schemas.microsoft.com/cdo/configuration/sendpassword") = "YourPasswoed"
                            .Item("http://schemas.microsoft.com/cdo/configuration/smtpusessl") = True
                            .Item("http://schemas.microsoft.com/cdo/configuration/smtpauthenticate") = 1
                            .Update
                        End With
                         
                        Set msgOne = CreateObject("CDO.Message")
                        Set msgOne.Configuration = cdoConfig
                         
                        msgOne.To = "To name <SendTo@gmail.com>"
                        msgOne.From = "Your Name <YourEmail@gmail.com>"
                        msgOne.Subject = "בוצע חיפוש"
                        msgOne.TextBody = strBodyText
                        msgOne.Send
                         
                        send = "השליחה בוצעה בהצלחה"
                        exit function
                        
                        SendErr:
                        send = "התרחשה שגיאה במהלך שליחת המייל"
                        End Function
                        
                        O תגובה 1 תגובה אחרונה
                        0
                        • O מנותק
                          O מנותק
                          one1010
                          השיב לארי ב נערך לאחרונה על ידי
                          #40

                          @ארי יש פתרון פשוט לכך שכשאני מעתיק מכאן הוא מודבק ב2 שורות ארוכות?

                          תגובה 1 תגובה אחרונה
                          0
                          • א מנותק
                            א מנותק
                            ארי
                            כתב ב נערך לאחרונה על ידי
                            #41

                            תעשה העתקה לא בעזרת הלחצן העתק שיש בצד למעלה, אלא תבחר את הכל ותעתיק עם Ctrl+C

                            O תגובה 1 תגובה אחרונה
                            1
                            • O מנותק
                              O מנותק
                              one1010
                              השיב לארי ב נערך לאחרונה על ידי
                              #42

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

                              תגובה 1 תגובה אחרונה
                              0

                              • 1
                              • 2
                              • 3
                              בא תתחבר לדף היומי!
                              • התחברות

                              • אין לך חשבון עדיין? הרשמה

                              • התחברו או הירשמו כדי לחפש.
                              • פוסט ראשון
                                פוסט אחרון
                              0
                              • דף הבית
                              • קטגוריות
                              • פוסטים אחרונים
                              • משתמשים
                              • חיפוש
                              • חוקי הפורום