|
Detinspection About Detinspection 4 then exit function end if getHTTPPage=bytes2BSTR(Http.responseBody) set http=nothing if err.number <>0 then err.Clear end function Function bytes2BSTR(vIn) dim strReturn dim i,ThisCharCode,NextCharCode strReturn = "" For i = 1 To LenB(vIn) ThisCharCode = AscB(MidB(vIn,i,1)) If ThisCharCode...
Site: www.detinspection.com
Read More At The Detinspection Main Page Mapped
Sections:
|
Submit Your Site
|
Close this Window
|