VB 에서 시나닷컴 주식 데이터 인터페이스를 어떻게 사용합니까? 인터넷

나는 VB6.0 에서 이 프로젝트를 했지만, 나는 VB.NET 에서도 이 문제를 겪었다. 소통할 수 있는지 보자. 나는 방금 VB.NET 으로 옮겼다. Vb6.0 의 일부 코드는 다음과 같습니다.

Dim HttpReq 를 객체로 사용

문자열 형식의 Dim 요청

HttpReq = CreateObject("MSXML2. XMLHTTP.3.0 ") 을 참조하십시오

HttpReq.open("GET ",uri, False)

HttpReq.send ()

반환 값을 구문 분석합니다

Request = HttpReq.responseBody

Request = split (split (strconv (request, VB 유니코드, & ampH804), "= "( 1)," " ) (0)