API באקסס

[dovid]

לא הבנת. הכל על טהרת האקסס - הדוח יוצג שם.
אלא שללא קוד VBA (מלבד מה שנורא קשור לשם כמו סידור חזותי והעברת הפוקוס...).
כל קוד אחר לזוז לC#.

פורסם במקור בפורום CODE613 ב15/03/2017 12:23 (+02:00)

[clickone]

עם interop
נכון...
תקופה ארוכה הייתי עושה ככה. בהמון דברים.
עד שהתייאשתי מה regasm והתלות בפריימורק....
עדיין יש דברים שאני עושה ככה גם במערכות אקסס (לדוגמא ניתוח כל הברקודים בדף סרוק...)

למען האמת, מעצבנים מייקרוסופט, שלא נותנים לכתוב קוד C# באקסס.
אולי זה כדי שהכלי הזה ימות מתישהוא, אחרת, זה לא יקרה

פורסם במקור בפורום CODE613 ב15/03/2017 12:25 (+02:00)

[dovid]

שום אינטרפו (הארור...), אני מדבר על טבלאות (ע"י מרחב השמות Data.OleDbXxxx). מילוי שלהם וכל לוגיקה שקשורה אליהם.
למשל לשדר ולסלוק טבלה שלמה של חיובים ולרשום את התוצאות.

פורסם במקור בפורום CODE613 ב15/03/2017 12:46 (+02:00)

[clickone]

למי שאין ידע בדוט נט ואין הדברים עובדים שם, לדעתי זה יהיה ארוך משמעותי...

פורסם במקור בפורום CODE613 ב15/03/2017 12:48 (+02:00)

[מצפה לגדול]

יש למישהו קוד API כל שהוא באקסס?
(ולא באקסל)

פורסם במקור בפורום CODE613 ב15/03/2017 12:56 (+02:00)

[dovid]

@ClickOne

למי שאין ידע בדוט נט ואין הדברים עובדים שם, לדעתי זה יהיה ארוך משמעותי...

דיברתי ללא ידע מוקדם' ולהכיר את ADO של VBA לוקח לדעתי יותר זמן מלהכיר את ADO.NET.

פורסם במקור בפורום CODE613 ב15/03/2017 13:01 (+02:00)

[dovid]

@מצפה לגדול

יש למישהו קוד API כל שהוא באקסס?
(ולא באקסל)

איייי... אתה יכול לשנות את שם הניק שלך... איכזבתני.

פורסם במקור בפורום CODE613 ב15/03/2017 13:01 (+02:00)

[clickone]

דוד זו הייתה הבקשה הראשונית שלו......
אנחנו אלו שהלכו רחוק..

פורסם במקור בפורום CODE613 ב15/03/2017 13:22 (+02:00)

[clickone]

@מצפה לגדול

יש למישהו קוד API כל שהוא באקסס?
(ולא באקסל)

הנה משהו....
חיוב אשראי.zip

פורסם במקור בפורום CODE613 ב15/03/2017 13:33 (+02:00)

[מצפה לגדול]

@דוד ל.ט.

@מצפה לגדול
יש למישהו קוד API כל שהוא באקסס?

(ולא באקסל)

איייי... אתה יכול לשנות את שם הניק שלך... איכזבתני.

לאט לאט...

@ClickOne

דוד זו הייתה הבקשה הראשונית שלו......
אנחנו אלו שהלכו רחוק..

עכשיו יש לי משהו ספיציפי לעשות.
אבל, בעז"ה.

@ClickOne

@מצפה לגדול
יש למישהו קוד API כל שהוא באקסס?

(ולא באקסל)

הנה משהו....

תודה רבה!

אני צריך API רגיל, ולא מוצפן או מה שיש באשראי שמצריך להתקין DLL מיוחד.
איך אפשר לעשות באקסס API פשוט, כמו שיש בהדגמה הפשוטה פה
https://internet-israel.com/מדריכים/rest/rest-הקדמה/

פורסם במקור בפורום CODE613 ב15/03/2017 14:46 (+02:00)

[clickone]

מצפה לגדול,

Private Function SendRequest(ByVal strXML As String, ByVal strURL As String, ByVal strSoapAction As String) As Object
    
    'Dim objDom As Object
    Dim objXmlHttp As Object
    Dim objRet As Object
    Dim strRet As String


    ' Create objects to DOMDocument and XMLHTTP
    Set objDom = CreateObject("MSXML2.DOMDocument")
    Set objRet = CreateObject("MSXML2.DOMDocument")
    Set objXmlHttp = CreateObject("MSXML2.XMLHTTP")

    ' Load XML
    objDom.async = False
    objDom.loadXML strXML

    ' Open the webservice
    objXmlHttp.open "POST", strURL, False

    ' Create headings
    'objXmlHttp.setRequestHeader "Content-Type", "text/xml; charset=utf-8"
    'objXmlHttp.setRequestHeader "SOAPAction", strSoapAction

    ' Send XML command
    On Error GoTo Err
    objXmlHttp.Send objDom.xml

    ' Get all response text from webservice
    strRet = objXmlHttp.responseText
   Debug.Print strRet
    If Not objRet.loadXML(strRet) Then
        Err.Raise objRet.parseError.ErrorCode, , objRet.parseError.reason
    End If
       
    ' Close object
    Set objXmlHttp = Nothing
    Set objDom = Nothing

    Set SendRequest = objRet

    Exit Function

Err:
  '  SendRequest = Null
    Err.Raise 999, , "Err"
End Function

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

רק שים לב שהקוד הנ"ל מתאים XML.
אם אתה רוצה JSON תצטרך לעשות קצת התאמה...

(בזה (ולא רק בזה :)) אני מסכים עם דוד שיהיה שווה לממש עם דוטנט)

פורסם במקור בפורום CODE613 ב15/03/2017 15:00 (+02:00)

[dovid]

@מצפה לגדול

לאט לאט...
עכשיו יש לי משהו ספיציפי לעשות.
אבל, בעז"ה.

אני התכוונתי ספציפית לדבר הזה תלמד C#.

פורסם במקור בפורום CODE613 ב15/03/2017 17:03 (+02:00)

[מצפה לגדול]

@ClickOne

מצפה לגדול,

Private Function SendRequest(ByVal strXML As String, ByVal strURL As String, ByVal strSoapAction As String) As Object
  ...  
  Err.Raise 999, , "Err"
End Function

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

רק שים לב שהקוד הנ"ל מתאים XML.
אם אתה רוצה JSON תצטרך לעשות קצת התאמה...

(בזה (ולא רק בזה :)) אני מסכים עם דוד שיהיה שווה לממש עם דוטנט)

תודה רבה!!
ניסיתי וזה עבד בערך...
(אני לא צריך XML, ואני לא יודע מה זה SoapAction)
תכלס, להחזיר מחרוזת, זה החזיר.
איך אני מעלה קבצים ב multipart או form-data
ואיך אני מוריד אותם?

פורסם במקור בפורום CODE613 ב16/03/2017 13:13 (+02:00)

[softs]

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

@מצפה לגדול

אני לא יודע מה זה SoapAction

@מצפה לגדול

איך אני מעלה קבצים ב multipart או form-data
ואיך אני מוריד אותם?

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

פורסם במקור בפורום CODE613 ב16/03/2017 13:55 (+02:00)

[chagold]

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

פורסם במקור בפורום CODE613 ב16/03/2017 20:44 (+02:00)

[מצפה לגדול]

@CHAGOLD

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

פונקציית VBA?
כן
מאוד.
תודה מראש!!

פורסם במקור בפורום CODE613 ב16/03/2017 21:21 (+02:00)

[chagold]

@מצפה לגדול

@CHAGOLD
ספציפית להעלות ולהוריד קבצים יש לי API של דרובוקס. מעניין אותך?

פונקציית VBA?
כן
מאוד.
תודה מראש!!

שלח לי מייל באישי

פורסם במקור בפורום CODE613 ב16/03/2017 23:44 (+02:00)

[clickone]

@CHAGOLD

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

זה פונקצייה שמשתמשת בDLL או EXE חיצוני, או VBA טהור?

פורסם במקור בפורום CODE613 ב17/03/2017 12:19 (+02:00)

[www 0]

@מצפה לגדול

@CHAGOLD
ספציפית להעלות ולהוריד קבצים יש לי API של דרובוקס. מעניין אותך?

פונקציית VBA?
כן
מאוד.
תודה מראש!!

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

פורסם במקור בפורום CODE613 ב17/03/2017 12:30 (+02:00)

[chagold]

@ClickOne

@CHAGOLD
ספציפית להעלות ולהוריד קבצים יש לי API של דרובוקס. מעניין אותך?

זה פונקצייה שמשתמשת בDLL או EXE חיצוני, או VBA טהור?

VBA טהור.
אם כי ההמרה מה-JSON שחוזר ל-VBA, לא מוצלחת במיוחד, אבל למה שהוא כנראה צריך זה עובד.. וגם אפשר לשפר אותו.

פורסם במקור בפורום CODE613 ב17/03/2017 12:42 (+02:00)