@OdedDvir אמר בשליחת POST לנדרים+ ב VBA:
@aaaa קצת דיבוג יעזור פה. תשנה את הקוד לקוד הבא:
Dim TCRequestItem As Object
Set TCRequestItem = CreateObject("WinHttp.WinHttpRequest.5.1")
TCRequestItem.Open "POST", "https://www.matara.pro/nedarimplus/V6/Files/WebServices/DebitCard.aspx", False
TCRequestItem.setRequestHeader "Content-Type", "application/xml"
TCRequestItem.setRequestHeader "Accept", "application/xml"
Dim Body As String
Body = "Mosad=123456&ClientName=&Adresse=&Phone=0512345678&ClientId=&CardNumber=4580458045804580&Tokef=1219&Amount=520&Tashloumim=12&Groupe=&Avour=Yemot&Token=&CVV=123&Zeout=123456789&Currency=1&MasofId=Online"
Debug.Print Body
Stop
TCRequestItem.send Body
Debug.Print TCRequestItem.responseText
וכשהוא מגיע לנקודת העצירה ב Stop תבדוק מה מודפס בחלון Immediate (ה"קונסול" של VBA)
(כמובן שתבנה את Body כפי שאתה רוצה לשלוח באמת...)
בדקתי בשבילו.. (גם לי יהיה שימוש עם אצליח לסלוק דרך אקסס)
זה מחזיר את כל הערכים עם & בין אחד לשני,
אבל כשאני ממשיך ותכלס שולח זה עושה לי ERORR
(ככה זה מחזיר [מספר מוסד הראשון שמצאתי בנדרים])
Mosad=7006059&ClientName=&Adresse=&Phone=0512345678&ClientId=&CardNumber=4580458045804580&Tokef=1219&Amount=520&Tashloumim=12&Groupe=&Avour=Yemot&Token=&CVV=123&Zeout=123456789&Currency=1&MasofId=Online
{ "Status" : "Error" , "Message" : "פרמטר Mosad ריק" }