getHTTP مع (اكسل) VBA؟
-
03-07-2019 - |
سؤال
وأنا في البحث عن استعلام عن التفوق VBA الكلي للحصول على رمز صفحة ويب HTML كسلسلة. لقد وجدت بعض المصادر مع getHTTPrequest ولكن لا يمكنني تسجيل صافي framwork system.dll أو ربطه.
وأي قصاصة ودية وغر هناك؟ ؛-) شكرا!
المحلول
وإغلاق ما يكفي: <لأ href = "https://stackoverflow.com/questions/158633/how-can-i-send-an-http-post-request-to-a-server-from-excel-using -vba "> كيف يمكنني إرسال طلب HTTP POST إلى ملقم من Excel باستخدام VBA - إنها حتى لبرنامج Excel.؟ -)
ومجرد استخدام طلب GET بدلا من ذلك:
objHTTP.Open "GET", URL, False
وMSDN: باستخدام كائن WinHttpRequest COM - استرداد البيانات باستخدام Visual الأساسية
نصائح أخرى
وهنا وظيفة المدمجة التي يعود مصدر تقريبا أي URL محددة، بما في ذلك HTTP و JSON.
و(لا المراجع المطلوبة.)
Public Function getHTTP(ByVal url As String) As String
With CreateObject("MSXML2.XMLHTTP")
.Open "GET", url, False: .Send
getHTTP = StrConv(.responseBody, vbUnicode)
End With
End Function
لا تنتمي إلى StackOverflow