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

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

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

גישה למערך פנימי בjson|קוד vba

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

    אני שולח בקשת HTTP בקוד vba, ומקבל בתגובה מערך json המכיל למשל { "Status" : "Error" , "Message" : "שגיאה לא ידועה" }.

    אני רוצה להקפיץ למשתמש רק את הודעת השגיאה (ולא את כל הjson).

    כרגע אני משתמש בקוד זה

    MsgBox "json", vbInformation, "כותרת החלון"
    

    שמקפיץ הודעה אבל רושם את כל הjson.

    ואני לא מצליח לגשת ל json.Erorr (להודעה עצמה).
    ושאלתי היא,
    האיך ניתן לגשת לאיבר בקובץ json בשביל לבודד את הודעת השגיאה משאר הjson.

    ניסתי לעשות כבר
    json.Erorr
    json("Erorr")
    json.("Erorr")
    וזה לא עבד.

    כיף לגלות דברים חדשים.
    חוק ה-50-50-90: בכל פעם שיש סיכוי של 50-50 שמשהו יעבוד, יש סיכוי של 90 אחוז שהוא לא. מקור

    מנחםמ תגובה 1 תגובה אחרונה
    0
    • צבי-שצ צבי-ש

      אני שולח בקשת HTTP בקוד vba, ומקבל בתגובה מערך json המכיל למשל { "Status" : "Error" , "Message" : "שגיאה לא ידועה" }.

      אני רוצה להקפיץ למשתמש רק את הודעת השגיאה (ולא את כל הjson).

      כרגע אני משתמש בקוד זה

      MsgBox "json", vbInformation, "כותרת החלון"
      

      שמקפיץ הודעה אבל רושם את כל הjson.

      ואני לא מצליח לגשת ל json.Erorr (להודעה עצמה).
      ושאלתי היא,
      האיך ניתן לגשת לאיבר בקובץ json בשביל לבודד את הודעת השגיאה משאר הjson.

      ניסתי לעשות כבר
      json.Erorr
      json("Erorr")
      json.("Erorr")
      וזה לא עבד.

      מנחםמ מנותק
      מנחםמ מנותק
      מנחם
      כתב ב נערך לאחרונה על ידי
      #2

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

      Dim ResponseJson As Object
      Set ResponseJson = JsonConverter.ParseJson(Response.Content)    
      Debug.Print ResponseJson("Message")
      
      צבי-שצ תגובה 1 תגובה אחרונה
      2
      • מנחםמ מנחם

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

        Dim ResponseJson As Object
        Set ResponseJson = JsonConverter.ParseJson(Response.Content)    
        Debug.Print ResponseJson("Message")
        
        צבי-שצ מחובר
        צבי-שצ מחובר
        צבי-ש
        כתב ב נערך לאחרונה על ידי
        #3

        @מנחם אמר בגישה למערך פנימי בjson|קוד vba:

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

        Dim ResponseJson As Object
        Set ResponseJson = JsonConverter.ParseJson(Response.Content)    
        Debug.Print ResponseJson("Message")
        

        תוכל להסביר מה זה כל דבר בדוגמא?
        מה תפקידה של כל שורה לעשות כדי שאני ילמד מה אני צריך לשנות כדי שזה יתאים אליי.

        כיף לגלות דברים חדשים.
        חוק ה-50-50-90: בכל פעם שיש סיכוי של 50-50 שמשהו יעבוד, יש סיכוי של 90 אחוז שהוא לא. מקור

        מנחםמ תגובה 1 תגובה אחרונה
        0
        • צבי-שצ צבי-ש

          @מנחם אמר בגישה למערך פנימי בjson|קוד vba:

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

          Dim ResponseJson As Object
          Set ResponseJson = JsonConverter.ParseJson(Response.Content)    
          Debug.Print ResponseJson("Message")
          

          תוכל להסביר מה זה כל דבר בדוגמא?
          מה תפקידה של כל שורה לעשות כדי שאני ילמד מה אני צריך לשנות כדי שזה יתאים אליי.

          מנחםמ מנותק
          מנחםמ מנותק
          מנחם
          כתב ב נערך לאחרונה על ידי
          #4

          @צבי-ש התשובה מתקבלת ב-JOSN, ויש להמירה למערך-אובייקט שמכיל מפתחות וערכים.
          בשורה הראשונה מצהירים על אובייקט
          בשורה השניה מתבצעת טעינת הערכים לאובייקט על ידי קריאה לפונקציה (*)JsonConverter.ParseJson
          הכוכביות זה בעצם ה-JOSN שאתה ממיר
          ובשורה האחרונה מתבצעת קריאה למפתח Message שבמקרה שלך הערך שלו הוא שגיאה לא ידועה

          צבי-שצ תגובה 1 תגובה אחרונה
          2
          • מנחםמ מנחם

            @צבי-ש התשובה מתקבלת ב-JOSN, ויש להמירה למערך-אובייקט שמכיל מפתחות וערכים.
            בשורה הראשונה מצהירים על אובייקט
            בשורה השניה מתבצעת טעינת הערכים לאובייקט על ידי קריאה לפונקציה (*)JsonConverter.ParseJson
            הכוכביות זה בעצם ה-JOSN שאתה ממיר
            ובשורה האחרונה מתבצעת קריאה למפתח Message שבמקרה שלך הערך שלו הוא שגיאה לא ידועה

            צבי-שצ מחובר
            צבי-שצ מחובר
            צבי-ש
            כתב ב נערך לאחרונה על ידי
            #5

            @מנחם הוא מעביר אותי לפונקציה שהם כתבו ועושה שם שגיאה.

            70dd44f8-49c4-4208-8351-d08fb460180f-image.png

            כיף לגלות דברים חדשים.
            חוק ה-50-50-90: בכל פעם שיש סיכוי של 50-50 שמשהו יעבוד, יש סיכוי של 90 אחוז שהוא לא. מקור

            צבי-שצ תגובה 1 תגובה אחרונה
            0
            • צבי-שצ צבי-ש

              @מנחם הוא מעביר אותי לפונקציה שהם כתבו ועושה שם שגיאה.

              70dd44f8-49c4-4208-8351-d08fb460180f-image.png

              צבי-שצ מחובר
              צבי-שצ מחובר
              צבי-ש
              כתב ב נערך לאחרונה על ידי צבי-ש
              #6

              הסתדרתי .
              דובר על זה גם פה.
              הפתרון הוא להוסיף כאן -
              20a298db-92a2-4043-84a1-bd87bad98aaf-image.png

              את הפונקציה הזאת -
              b261b67d-a777-421e-94c2-43e7923491ad-image.png
              וזהו.

              כיף לגלות דברים חדשים.
              חוק ה-50-50-90: בכל פעם שיש סיכוי של 50-50 שמשהו יעבוד, יש סיכוי של 90 אחוז שהוא לא. מקור

              תגובה 1 תגובה אחרונה
              0
              • dovidD dovid העביר נושא זה מ-תכנות ב-
              תגובה
              • תגובה כנושא
              התחברו כדי לפרסם תגובה
              • מהישן לחדש
              • מהחדש לישן
              • הכי הרבה הצבעות


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

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

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