미리 지정된 양식 사용은 4개의 띄어쓰기로 들여쓰세요.
Try
Dim url As String = "https://dapi.kakao.com/v2/local/search/address.json?" & "query=" + Addr
Dim resPonse As HttpWebResponse = Nothing
Dim Reader As StreamReader = Nothing
Dim Request As HttpWebRequest = DirectCast(HttpWebRequest.Create(url), HttpWebRequest)
Request.Headers.Add("Authorization", "KakaoAK " & apiKey)
Request.AllowAutoRedirect = False
Request.ContentType = "application/json;charset=UTF-8"
Request.Method = "GET"
resPonse = DirectCast(Request.GetResponse(), HttpWebResponse)
....
Catch ex As SystemException
MessageBox.Show("좌표 찾기실패: " & ex.Message)
Finally
End Try
특정 사용자 자리에서는 이러한 에러 메세지가 나오고 정상적으로 호출되는 경우도 있습니다.
위의 request, response 과정상의 문제가 있는 것인지 의문입니다.
같은 코드로 정상적으로 호출이 되어 결과 값을 받는 경우도 있기 때문에 문제가 어디서 발생하는 것인지 판단하지 못하고 있습니다.