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

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

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

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

מתוזמן נעוץ נעול הועבר תכנות
42 פוסטים 4 כותבים 992 צפיות
  • מהישן לחדש
  • מהחדש לישן
  • הכי הרבה הצבעות
התחברו כדי לפרסם תגובה
נושא זה נמחק. רק משתמשים עם הרשאות מתאימות יוכלו לצפות בו.
  • א מנותק
    א מנותק
    ארי
    כתב ב נערך לאחרונה על ידי
    #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
                        • דף הבית
                        • קטגוריות
                        • פוסטים אחרונים
                        • משתמשים
                        • חיפוש
                        • חוקי הפורום