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

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

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

הורדת קבלות מאתר איזיקאונט (ezcount)

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

    שלום וברכה.
    אני משתמש בפלטפורמה של איזיקאונט (www.ezcount.co.il) להנפקה של קבלות.
    אני מנסה לכתוב קוד להוריד קבלות אחרי שהם כבר הונפקו באמצעות הקישור של הקבלה.
    אמנם בקודים הרגילים של ההורדה (URLDownloadToFile וכדו') אני נתקל בשגיאות.
    האם מישהו משתמש באתר שלהם ויש לו ניסיון בזה?
    יצויין שאני מנסה להוריד דרך VBA באקסס.
    תודה רבה.

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

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

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

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

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

        @חוקר לא.
        אחרי כמה ימים.
        הקבלה קיימת כבר, ואפשר להוריד אותה דרך האתר, אבל אני מחפש API שיעשה את זה.
        תודה.

        מלאמ תגובה 1 תגובה אחרונה
        1
        • א ארי

          @חוקר לא.
          אחרי כמה ימים.
          הקבלה קיימת כבר, ואפשר להוריד אותה דרך האתר, אבל אני מחפש API שיעשה את זה.
          תודה.

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

          @ארי
          יש לך את הקישור לPDF שהם נותנים בעת יצירה?

          אם כן
          אני מוריד קבלות עם הקוד הזה
          זה ההצרה והפונקציה

          Option Compare Database
          Private Declare Function URLDownloadToFile Lib "urlmon" Alias _
              "URLDownloadToFileA" (ByVal pCaller As Long, ByVal szURL As String, ByVal _
              szFileName As String, ByVal dwReserved As Long, ByVal lpfnCB As Long) As Long
          
          
          Function DownloadFile(URL As String, LocalFilename As String) As Boolean
              Dim lngRetVal As Long
              lngRetVal = URLDownloadToFile(0, URL, LocalFilename, 0, 0)
              If lngRetVal = 0 Then DownloadFile = True
          End Function
          

          וככה אני מוריד

          Private Sub txtOrginalFileLink_DblClick(Cancel As Integer)
              Dim strPDFLink As String
              Dim strPDFFile As String
              Dim Result As Boolean
              strPDFLink = Me.txtOrginalFileLink
              strPDFFile = CurrentProject.Path & "\חשבוניות\" &  Me.מס_חשבונית & ".pdf"
              Result = DownloadFile(strPDFLink, strPDFFile)
              MsgBox Result
          
          End Sub
          
          
          א תגובה 1 תגובה אחרונה
          2
          • מלאמ מלא

            @ארי
            יש לך את הקישור לPDF שהם נותנים בעת יצירה?

            אם כן
            אני מוריד קבלות עם הקוד הזה
            זה ההצרה והפונקציה

            Option Compare Database
            Private Declare Function URLDownloadToFile Lib "urlmon" Alias _
                "URLDownloadToFileA" (ByVal pCaller As Long, ByVal szURL As String, ByVal _
                szFileName As String, ByVal dwReserved As Long, ByVal lpfnCB As Long) As Long
            
            
            Function DownloadFile(URL As String, LocalFilename As String) As Boolean
                Dim lngRetVal As Long
                lngRetVal = URLDownloadToFile(0, URL, LocalFilename, 0, 0)
                If lngRetVal = 0 Then DownloadFile = True
            End Function
            

            וככה אני מוריד

            Private Sub txtOrginalFileLink_DblClick(Cancel As Integer)
                Dim strPDFLink As String
                Dim strPDFFile As String
                Dim Result As Boolean
                strPDFLink = Me.txtOrginalFileLink
                strPDFFile = CurrentProject.Path & "\חשבוניות\" &  Me.מס_חשבונית & ".pdf"
                Result = DownloadFile(strPDFLink, strPDFFile)
                MsgBox Result
            
            End Sub
            
            
            א מנותק
            א מנותק
            ארי
            כתב ב נערך לאחרונה על ידי
            #5

            @מלא את הקוד הזה אני מכיר. תודה.
            אבל יש חלק מהקבלות שהוא מוריד אותם והקובץ הוא בגודל 2KB, מה שאומר שהוא לא באמת מצליח להוריד.

            מלאמ תגובה 1 תגובה אחרונה
            0
            • א ארי

              @מלא את הקוד הזה אני מכיר. תודה.
              אבל יש חלק מהקבלות שהוא מוריד אותם והקובץ הוא בגודל 2KB, מה שאומר שהוא לא באמת מצליח להוריד.

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

              @ארי
              אני מוריד איתו מסמכים לאורך זמן ולא ידוע לי על שום בעיה איתו.
              הורדתי איתו מאות ואולי אלפי מסמכים

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

              א תגובה 1 תגובה אחרונה
              0
              • מלאמ מלא

                @ארי
                אני מוריד איתו מסמכים לאורך זמן ולא ידוע לי על שום בעיה איתו.
                הורדתי איתו מאות ואולי אלפי מסמכים

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

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

                @מלא מוזר.
                כי הקישורים עובדים לי, וכשניסיתי להריץ אותו על איזה 70 קבלות בערך חצי מהם הוא לא הוריד.

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

                  @מלא מוזר.
                  כי הקישורים עובדים לי, וכשניסיתי להריץ אותו על איזה 70 קבלות בערך חצי מהם הוא לא הוריד.

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

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

                  מלאמ תגובה 1 תגובה אחרונה
                  0
                  • א ארי

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

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

                    @ארי כתב בהורדת קבלות מאתר איזיקאונט (ezcount):

                    דוגמא של קישור

                    https://files.ezcount.co.il/front/documents/get/00e96269-f39e-407a-8d64-f8***9a0

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

                      @ארי כתב בהורדת קבלות מאתר איזיקאונט (ezcount):

                      דוגמא של קישור

                      https://files.ezcount.co.il/front/documents/get/00e96269-f39e-407a-8d64-f8***9a0

                      צבי-שצ מחובר
                      צבי-שצ מחובר
                      צבי-ש
                      כתב ב נערך לאחרונה על ידי
                      #10
                      פוסט זה נמחק!
                      תגובה 1 תגובה אחרונה
                      0
                      • א מנותק
                        א מנותק
                        ארי
                        כתב ב נערך לאחרונה על ידי
                        #11

                        @מלא עובד לי!
                        ממש תודה!

                        מלאמ תגובה 1 תגובה אחרונה
                        0
                        • א ארי

                          @מלא עובד לי!
                          ממש תודה!

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

                          @ארי
                          מה היתה התקלה? סתם בשביל הסקרנות, ואולי גם ללימוד....

                          א תגובה 1 תגובה אחרונה
                          1
                          • מלאמ מלא

                            @ארי
                            מה היתה התקלה? סתם בשביל הסקרנות, ואולי גם ללימוד....

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

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

                            תגובה 1 תגובה אחרונה
                            2
                            תגובה
                            • תגובה כנושא
                            התחברו כדי לפרסם תגובה
                            • מהישן לחדש
                            • מהחדש לישן
                            • הכי הרבה הצבעות


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

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

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