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

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

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

חיבור סורק ברקוד לאקסס

מתוזמן נעוץ נעול הועבר תוכנה
23 פוסטים 6 כותבים 516 צפיות
  • מהישן לחדש
  • מהחדש לישן
  • הכי הרבה הצבעות
התחברו כדי לפרסם תגובה
נושא זה נמחק. רק משתמשים עם הרשאות מתאימות יוכלו לצפות בו.
  • א מנותק
    א מנותק
    איש פלוני
    השיב למלא ב נערך לאחרונה על ידי
    #10

    @מלא לא נבחר

    א מלאמ 2 תגובות תגובה אחרונה
    0
    • א מנותק
      א מנותק
      ארי
      השיב לאיש פלוני ב נערך לאחרונה על ידי
      #11

      @איש-פלוני מה קורה כשאתה כותב כך:

      DoCmd.OpenForm "מחברקודספרברקוד", acFormDS, , "ID = " & ScanValue
      Form_מחברקודספרברקוד.מדף.SetFocus
      
      א תגובה 1 תגובה אחרונה
      0
      • מלאמ מנותק
        מלאמ מנותק
        מלא
        השיב לאיש פלוני ב נערך לאחרונה על ידי
        #12

        @איש-פלוני
        זה משהו מוזר,
        בדרך כלל בפתיחת טפסים השדה הראשון נבחר כל הטקסט.
        בכל הטפסים שלך זה כן ככה?

        א 2 תגובות תגובה אחרונה
        0
        • א מנותק
          א מנותק
          איש פלוני
          השיב לארי ב נערך לאחרונה על ידי
          #13

          @ארי אותו דבר. נכנס לי לשדה, אבל לא בוחר את הטקסט.

          א 2 תגובות תגובה אחרונה
          0
          • א מנותק
            א מנותק
            ארי
            השיב לאיש פלוני ב נערך לאחרונה על ידי
            #14

            @איש-פלוני שתי השורות שהבאת הם כל הקוד?
            או שיש חלק שאתה לא מראה לנו?

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

              @איש-פלוני תגיד, הטופס נפתח בתצוגת טופס או כטבלה?

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

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

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

                  @ארי תצוגת גליון נתונים

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

                    @ארי את כל הקוד בעצם הבאתי למעלה, מצורף שוב (הכנסתי את שאר האופציות הנוספות שהציעו פה כדי שיכנס ישר לשדה ספציפי בהערה בקוד):

                    Private Sub מדף_AfterUpdate()
                    Dim ScanValue As String
                    ScanValue = InputBox("אנא הקלד את הערך שסרק הסורק:")
                    
                    'בדיקת תקינות הערך שסרק הסורק
                    If IsNumeric(ScanValue) Then
                        'בדיקת קיומו של הערך בטבלה
                        Dim RecordExists As Boolean
                        RecordExists = Not IsNull(DLookup("ID", "מחברקודספר", "ID = " & ScanValue))
                    
                        If RecordExists Then
                            DoCmd.OpenForm "מחברקודספרברקוד", acFormDS, , "ID = " & ScanValue
                                  Forms("מחברקודספרברקוד").Controls("מדף").SetFocus
                    
                            'Form_מחברקודספרברקוד.מדף.SetFocus
                            'Me.מדף.SetFocus
                    
                        Else
                            MsgBox "ערך לא קיים במאגר הנתונים, אנא נסה שוב"
                        End If
                    Else
                        MsgBox "ערך לא תקין, אנא נסה שוב"
                    End If
                    
                    End Sub
                    
                    תגובה 1 תגובה אחרונה
                    0
                    • א מנותק
                      א מנותק
                      איש פלוני
                      השיב למלא ב נערך לאחרונה על ידי
                      #19

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

                      תודה רבה לכל העוזרים והמסייעים!

                      תגובה 1 תגובה אחרונה
                      1
                      • Y.Excel.AccessY מנותק
                        Y.Excel.AccessY מנותק
                        Y.Excel.Access
                        כתב ב נערך לאחרונה על ידי
                        #20

                        @איש-פלוני כתב בחיבור סורק ברקוד לאקסס:

                        שלום וברכה,
                        אני רוצה להוסיף לקוד שלי שבעת פתיחת הטופס הפוקוס שלו יעבור לשדה מסויים ('מדף') והטקסט בשדה יבחר, כדי שאוכל להתחיל להקליד בו מיד.
                        בינתיים אני משתמש בקוד הזה:

                        DoCmd.OpenForm "מחברקודספרברקוד", acFormDS, , "ID = " & ScanValue
                        Forms("מחברקודספרברקוד").Controls("מדף").SetFocus
                        

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

                        לוודא שזו לא הגדרה פשוטה:
                        האם וידאת שהבעיה לא נעוצה בהגדרות הכלליות של אקסס?
                        נווט ל - אפשרויות - הגדרות לקוח - עריכה - אופן הפעולה בעת כניסה לשדה
                        ובחר "בחר בשדה כולו"

                        Y.Excel.Access @ gmail.com

                        S א 2 תגובות תגובה אחרונה
                        2
                        • S מנותק
                          S מנותק
                          Shmuel754
                          השיב לY.Excel.Access ב נערך לאחרונה על ידי
                          #21

                          @איש-פלוני
                          יש פקודה בשם seltext

                          Forms("מחברקודספרברקוד").Controls("מדף").seltext = me.מדף.value
                          

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

                          או

                          Forms("מחברקודספרברקוד").Controls("מדף").selStart = 1 
                          Forms("מחברקודספרברקוד").Controls("מדף").SelLength = 3
                          

                          השורה הראשונה זה מאיזה תו לסמן,
                          השורה השניה זה האורך של המחרוזת שיהיה מסומן, לרוב אתה יכול לשים את האורך של הנתון של השדה שאתה נכנס אליו.

                          ואת האירוע אתה ממקם בעת קבלת מוקד.

                          א תגובה 1 תגובה אחרונה
                          2
                          • א מנותק
                            א מנותק
                            איש פלוני
                            השיב לY.Excel.Access ב נערך לאחרונה על ידי
                            #22

                            @Y-Excel-Access זה כבר ככה.

                            תגובה 1 תגובה אחרונה
                            1
                            • א מנותק
                              א מנותק
                              איש פלוני
                              השיב לShmuel754 ב נערך לאחרונה על ידי איש פלוני
                              #23

                              @Shmuel754 כתב בחיבור סורק ברקוד לאקסס:

                              Forms("מחברקודספרברקוד").Controls("מדף").seltext = me.מדף.value

                              זה התגובה:
                              72dd4b98-4b33-41d4-9162-72fc26009ac7-image.png

                              והשני סתם לא עובד🤔

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

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

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

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

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