SET PROCEDURE TO wwUtils ADDITIVE
SET CLASSLIB TO wwIPStuff ADDITIVE
LOCAL loIP, lnBuf, lcData, lnCode, lcSite, lcPath
loIP = CREATE( 'wwIpStuff')
lnBuf = 0 && reset before every Get!!!
lcData = '' && reset before every Get!!!
lcName = 'joe'
lcPass = 'joe'
lcSite = '192.168.200.131:8808'  && note: no leading 'http://'
lcPath = '/std.out.gz'
lnCode = loIp.HTTPConnect( m.lcSite,m.lcName,m.lcPass)
IF m.lnCode # 0
  * error, deal with loIp.cErrorMsg
  ? loIp.cErrorMsg
ELSE
  lnCode = loIp.HTTPGetEX( m.lcPath, @lcData, @lnBuf)
  ? m.lnCode
  IF m.lnCode = 0
    * success:
    * lnBuf = # of bytes returned
    * lcData has your data
	? lnBuf
	strtofile(lcData,'h:\temp\temp\std.out.gz')
  ENDIF
ENDIF
= loIp.HTTPClose()  && no matter what