@אריה אמר בAPI לשליחת קמפיין הודעות אישיות דרך אקסס:
@יעקב139
Sub SendURL(strURL) Dim Http As Object Set Http = CreateObject("MSXML2.ServerXMLHTTP.6.0") Http.Open "GET", strURL, False Http.send Debug.Print Http.responseText End Sub
זה קוד קצר ובסיסי לשליחת בקשת GET דרך אקסס
תשלח את ה URL כפרמטר לקוד
@אריה מה צריך לשנות בקוד הזה כדי שישלח את הפקודה בPOST ולא בGET?