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

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

💡 רוצה לזכור קריאת שמע בזמן? לחץ כאן!
א

ארי

@ארי
אודות
פוסטים
458
נושאים
86
שיתופים
0
קבוצות
0
עוקבים
2
עוקב אחרי
0

פוסטים

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

  • בעיה בשליחת API
    א ארי

    @dovid האמת שזה לא כ"כ נצרך.
    יותר סקרנות, ומחשבה שאולי יש איזה שגיאה באתר שיכולה להתנקם בי בהמשך גם באקסס.

    תכנות

  • בעיה בשליחת API
    א ארי

    @dovid

    Function SendRequest()
    Dim URL As String
    Dim objXmlHttp As Object
    Dim strRet As String
    
    Set objXmlHttp = CreateObject("MSXML2.XMLHTTP")
    
    URL = "https://kesherhk.info/ConnectToKesher/ConnectToKesher?userName=XXXXXXX&password=XXXXXXXXXXX&func=GetTrans&fromDate=02/18/2023&toDate=02/20/2023&format=json"
    
    objXmlHttp.Open "GET", URL, False
    objXmlHttp.send
    Debug.Print objXmlHttp.ResponseText
    
    objXmlHttp.abort
    Set objXmlHttp = Nothing
    End Function
    

    הקוד הזה עובד מצוין.

    תכנות

  • בעיה בשליחת API
    א ארי

    @ivrtikshoret זה הקישור שלי

    https://kesherhk.info/ConnectToKesher/ConnectToKesher?userName=XXXXXXXX&password=XXXXXXXXXXXX&func=GetTrans&fromDate=02/15/2023&toDate=02/15/2023&format=json
    

    בדפדפן אני אכן מכניס את הכתובת url למעלה בשורת החיפוש.
    גם בpostman (ובקוד VBA) אני שולח דרך GET.
    זה מה שנשלח בדפדפן:
    75504dfc-faf2-4ee8-b7fc-965a81a5c4da-image.png

    וזה מה שאני מקבל חזרה

    <Error>
    <Message>An error has occurred.</Message>
    </Error>
    

    ניסיתי לשחק בpostman עם הנתונים, ורק כשהכנסתי גם את הערך של Accept חזרה שגיאה.
    תודה.

    תכנות

  • בעיה בשליחת API
    א ארי

    שכחתי לציין ואולי זה רלוונטי, שאני מצפה לקבל חזרה מחרוזת json מהשרת.

    תכנות

  • בעיה בשליחת API
    א ארי

    @ivrtikshoret פשוט מכניס כתובת url

    תכנות

  • בעיה בשליחת API
    א ארי

    שלום וברכה.
    יש לי שגיאה משונה במחשב....
    יש לי כתובת לשליחת בקשת API - GET, וכשאני שולח אותה בדפדפן חוזרת שגיאה 500 Internal Server Error.
    אבל אם אני שולח את אותה בקשה בדיוק דרך VBA באקסס או דרך postman זה עובד מצוין.
    חפרתי קצת בpostman וגיליתי שכשאני שולח דרך הדפדפן נשלח גם Headers בשם Accept עם הערך הזה:

    text/html,application/xhtml+xml,application/xml;q=0.9,image/webp,image/apng,*/*;q=0.8,application/signed-exchange;v=b3;q=0.7
    

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

    תכנות

  • שגיאה בשליחת API - אקסס
    א ארי

    @clickone כתב בשגיאה בשליחת API - אקסס:

    בדיקה פשוטה שאפשר לעשות זה התקנת מחשב נקי ובדיקה, או בדיקה של הרצת הקוד במחשב אחר

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

    תכנות

  • שגיאה בשליחת API - אקסס
    א ארי

    @dovid אין לי נטפרי או רימון, אבל כן יש לי סינון של הספק שלי שיש לו white list, אבל אם בדפדפן זה עובד אז לא אמרוה להיות בעיה של תעודות אבטחה.

    תכנות

  • שגיאה בשליחת API - אקסס
    א ארי

    @OdedDvir כתב בשגיאה בשליחת API - אקסס:

    @ארי נסה להוסיף גם את הכותרת הבאה:

        oHttp.setRequestHeader "User-Agent", "Mozilla/5.0 (Windows NT 6.1) AppleWebKit/537.36 (KHTML, like Gecko) Chrome/59.0.3071.115 Safari/537.36"
    

    לא עזר

    @dovid כתב בשגיאה בשליחת API - אקסס:

    objHTTP.SetOption 2, objHTTP.GetOption(2)

    עזר!!!
    תודה!

    עכשין רק בשביל הידע של אחד שממש לא מבין ברשתות וSSL.... מה עשיתי שם?
    תודה.

    תכנות

  • שגיאה בשליחת API - אקסס
    א ארי

    @OdedDvir

    Dim oHttp   As MSXML2.ServerXMLHTTP60
    Dim sURL    As String
    Dim Body    As String
    
    Body = "{ ""Details"":{""ExternalIdentifier"":null,""NoVAT"":null,""SearchMode"":null,"""
    Body = Body & "Name"":""" & name & """,""Phone"":" & Phone & ",""EmailAddress"":" & Mail & ","""
    Body = Body & "City"":" & City & ",""Address"":" & Add & ",""ZipCode"":null,"""
    Body = Body & "CompanyNumber"":" & tz & ",""ID"":null,""Folder"":null},"""
    Body = Body & "Credentials"":{""CompanyID"":12345678,""APIKey"":""XXXXXXXXXXXXXXX""},""ResponseLanguage"":null}"""
    
    Set oHttp = New ServerXMLHTTP60
    sURL = "https://www.myofficeguy.com/api/accounting/customers/create/"
    oHttp.Open "POST", sURL, False
    oHttp.setRequestHeader "Accept", "text/plain"
    oHttp.setRequestHeader "Content-type", "application/json-patch+json"
    
    oHttp.send (Body)
    Customers = oHttp.responseText
    
    תכנות

  • שגיאה בשליחת API - אקסס
    א ארי

    @mekev לא נשלח פרמטר של תאריך.
    זה הפרמטרים שנשלחים (מתוך הדוגמא באתר).

    {
      "Details": {
        "ExternalIdentifier": null,
        "NoVAT": null,
        "SearchMode": null,
        "Name": "Danny Dean",
        "Phone": "050-1234567",
        "EmailAddress": "danny@dean.com",
        "City": null,
        "Address": null,
        "ZipCode": null,
        "CompanyNumber": "514000123",
        "ID": null,
        "Folder": null
      },
      "Credentials": {
        "CompanyID": 12345678,
        "APIKey": "AsOUq8u8Mk80G4IZ7AZEYhKccOEzHy9HQBNuf41jBGN6mekFIN"
      },
      "ResponseLanguage": null
    }
    

    זה בקשה להוספת לקוח במערכת (לא של הנפקת קבלה בפועל)
    תודה!

    תכנות

  • שגיאה בשליחת API - אקסס
    א ארי

    @mekev אכן התובנות נכונות.

    סתם בשביל הרחבת הידע, יש קשר בין התאריך של המחשב לפעולות שהוא מבצע ברשת?

    תכנות

  • שגיאה בשליחת API - אקסס
    א ארי

    @mekev זה תמונה מאתמול.....
    למה התאריך אמור להשפיע?

    תכנות

  • שגיאה בשליחת API - אקסס
    א ארי

    @mekev כן.
    שגיאת API3.png

    תכנות

  • שגיאה בשליחת API - אקסס
    א ארי

    שלום וברכה.
    יש לי אתר של הנפקת קבלות שיש לו API לשליחת בקשה, ובאתר שלהם יש דוגמא לשימוש בAPI. כשאני ממלא שם את כל הפרטים זה עובד מצוין.
    אמנם כשאני מנסה להשתמש בAPI הזה דרך אקסס זה מחזיר לי את השגיאה הבאה:
    שגיאת API2.png
    יצויין שאם אני שולח את הבקשה דרך הדוגמא באתר אני רואה בcontrol (F12) את הפרטים של הבקשה והם בדיוק כמו שאני שולח.
    יותר מזה קשה, שבכל מחשב אחר הקוד באקסס עובד מצוין, יש רק מחשב אחד שבו דרך האתר זה עובד ודרך הקוד לא.
    מה יכולה להיות הבעיה?
    תודה רבה!

    תכנות

  • יצירת מסנן לדו"ח באקסס עם תנאים
    א ארי

    @hp079 לפי הדוגמא שלך זה הקוד שאתה צריך

    Private Sub פקודה16_Click()
    Dim DynamicCondition As New Collection
    
    If Not IsNull(ts_active) Then DynamicCondition.Add "פעיל=" & ts_active
    If Not IsNull(ts_conected) Then DynamicCondition.Add "מחובר=" & ts_active
    If Len(txt_sug) > 0 Then DynamicCondition.Add "סוג='" & CStr(txt_sug) & "'"
    If Len(txt_name) > 0 Then DynamicCondition.Add "שם='" & CStr(txt_name) & "'"
    
    DoCmd.OpenReport "דוח1", acViewPreview, WhereCondition:=JoinCollection(DynamicCondition, " AND ")
    End Sub
    
    Function JoinCollection(col As Collection, operator As String)
        Dim result As String
        For i = 1 To col.Count
            If i <> 1 Then result = result & operator & " "
            result = result & "(" & col(i) & ") "
        Next
        JoinCollection = result
    End Function
    

    הקרדיט כמובן ל @dovid ו @OdedDvir

    תכנות

  • הרצת שאילתה בלולאה - VBA אקסס
    א ארי

    @סקרן-0 האמת שאף פעם לא שמעתי על אפשרות גרועה כ"כ, במיוחד שלפי מה שאתה טוען זו האפשרות היחידה....
    הקוד לכאו' אמור להיות די פשוט:

    for i = 1 to 10000
         'your code
    next i
    

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

    תכנות

  • הרצת שאילתה בלולאה - VBA אקסס
    א ארי

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

    תכנות

  • שליחת מייל מאקסס - עיצוב html
    א ארי

    @Shmuel754 תודה, אבל התשובה כאן פתרה את הבעיה.
    תודה לכולם!

    תכנות

  • שליחת מייל מאקסס - עיצוב html
    א ארי

    @mekev כתב בשליחת מייל מאקסס - עיצוב html:

    @ארי כתב בשליחת מייל מאקסס - עיצוב html:

    אם פותחים את המייל בג'ימייל זה נראה מעולה.
    הבעיה היא שאם אני פותח אותו בתוכנת דואר של ווינדוס

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

    במידה ואכן כך
    אולי הבעיה היא במילה div
    שזה CSS ולא HTML טהור
    תנסה להחליף אותה

    Html = "<th dir=" & Chr(34) & "rtl" & Chr(34) & ">"
    Html = Html & "<th>לכבוד פלוני אלמוני</th><br>"
    Html = Html & "<th>להלן קישור לפורום תחומים.</th><br>"
    Html = Html & "<th><a href = ""https://tchumim.com/post/149773"">לחצו כאן למעבר לפורום.</a><br></th>"
    Html = Html & "<th><br></th>"
    Html = Html & "<th>תודה.<br></th>"
       
    

    זה לא עזר...
    רק המשפט שהוספתי לעיל.

    תכנות
  • 1 / 1
  • התחברות

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

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