Level Extreme platform
Subscription
Corporate profile
Products & Services
Support
Legal
Français
How Grab Stock Market Data
Message
 
 
To
13/03/2004 07:42:42
General information
Forum:
Visual FoxPro
Category:
Coding, syntax & commands
Miscellaneous
Thread ID:
00885913
Message ID:
00885924
Views:
15
Tom,

If I understand this code correctly, is this saving the info on MSFT in a file (using STRTOFILE) ? If so, I don't see it being saved anywhere - or perhaps I just missing something.

Thanks,
Mel Cummings
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 )
Previous
Next
Reply
Map
View

Click here to load this message in the networking platform