loXmlHttp = NEWOBJECT( "Microsoft.XMLHTTP" ) lcURL = "http://finance.yahoo.com/d/quotes.csv" loXmlHttp.open( "POST" , lcURL, .F. ) loXmlHttp.send( "s=MSFT,^DJI&f=sl1d1t1c1ohgv&e=.csv" ) IF loXmlHttp.STATUS != 200 lcMessage = TEXTMERGE( ; "An error occurred - status = <<loXmlHttp.STATUS>><<loXmlHttp.statustext>>" ) MESSAGEBOX( lcMessage, 16, PROGRAM() ) EXIT ENDIF lcFile = SYS( 2015 ) STRTOFILE( loXmlHttp.responsetext, lcFile )