Try the following function:
;; Get URL Text - Lee Mac
;; Retrieves all text data for the given URL
(defun LM:geturltext ( url / obj rtn )
(if (setq obj (vlax-create-object "winhttp.winhttprequest.5.1"))
(progn
(setq rtn
(vl-catch-all-apply
'(lambda nil
(vlax-invoke-method obj 'open "GET" url :vlax-false)
(vlax-invoke-method obj 'send)
(vlax-get-property obj 'responsebody)
)
)
)
(vlax-release-object obj)
(if (vl-catch-all-error-p rtn)
(prompt (vl-catch-all-error-message rtn))
(vl-list->string
(mapcar '(lambda ( x ) (lsh (lsh x 24) -24))
(vlax-safearray->list (vlax-variant-value rtn))
)
)
)
)
)
)
_$ (LM:geturltext "http://geocoder.us/service/csv/geocode?address=181+gould+rd+weare+nh")
"43.037423,-71.692220,181 Gould Rd,Weare,NH,03281\n"