Split 인덱스가 배열 범위를 벗어났습니다.
아이폰
2023.04.01
Dim WinHttp As WinHttp.WinHttpRequest = New WinHttp.WinHttpRequest
Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
WinHttp.Open(GET, http://주소)
WinHttp.Send()
Dim Temp As String
Temp = System.Text.Encoding.UTF8.GetString(WinHttp.ResponseBody)
Dim A As String
A = Split(Split(Temp, /TITLE)(0), TITLE)(1)
MsgBox(A)
End Sub
소스는 위의 소스입니다만.
Winhttp를 이용해서 해당 홈페이지의 타이틀을 따오는겁니다.
그런데 인덱스가 배열 범위를 벗어났다는 런타임 오류가 뜨더군요..
어디부분이 왜 잘못되었는지 알려주실수있으신가요..
