json (Vba)에서 문자열 가져 오기

Question

저는 Vba에 매우 익숙하며 여러분이 저를 도울 수 있기를 바랍니다. json 구문을 사용하여 텍스트/스트림을 제공하는 URL 만 있습니다. 이제이 "json text"가 exel에 표시되어야합니다. 그래서 내가 alreday 내 코드에서 direktly 설정 한 exel에 문자열을 표시하게했다. 하지만 지금 내 질문은 : URL에서 문자열을 얻으려면 어떻게해야합니까?

Answer 1

이 같은 시도 할 수 있습니다 : 당신이 POST를 사용하는 대신에 당신을 얻을하려는 경우

Const HTTPREQUEST_PROXYSETTING_PROXY = 2 
Dim oRequest As Object 
Set oRequest = CreateObject("WinHttp.WinHttpRequest.5.1") 
oRequest.setProxy HTTPREQUEST_PROXYSETTING_PROXY, "http://proxy.intern:8080" 
oRequest.Open "GET", "http://www.cboden.de" 
oRequest.Send 
MsgBox oRequest.ResponseText 

과 : 프록시 서버 뒤에있는 경우

Dim oRequest As Object 
Set oRequest = CreateObject("WinHttp.WinHttpRequest.5.1") 
oRequest.Open "GET", "http://www.cboden.de" 
oRequest.Send 
MsgBox oRequest.ResponseText 

, 그것은 다음과 같이 수를 다음과 같이 시도 할 수 있습니다.

Dim oRequest As Object 
Set oRequest = CreateObject("WinHttp.WinHttpRequest.5.1") 
oRequest.Open "POST", "http://www.cboden.de/misc/posttest.php" 
oRequest.SetRequestHeader "Content-Typ", "application/x-www-form-urlencoded" 
oRequest.Send "Formularfeld1=123&Formularfeld2=test" 
MsgBox oRequest.ResponseText 

VBA를 처음 사용하는 사람이라면 이해하기 어려울 수 있습니다. 그러나 추가 정보를위한 google에 각종 명령하십시오.