FoxPro – Read Url


Samsung 32ES5500 Pret Review
Televizor LED Samsung, 80 cm, Full HD 32ES5500

Cautand dupa o solutie de a face un http request din fox, am dat peste acest wiki interesant:
http://fox.wikis.com/wc.dll?Wiki~ReadUrl

Acest cod, in special, m-a ajutat mult:

#DEFINE ccUrl ‘http://fox.wikis.com/wc.dll?Wiki~ReadUrl’
#DEFINE ccTarget ‘c: emp est.htm’

IF DownloadUrl(ccUrl, ccTarget)
MODI FILE ccTarget
ENDIF

FUNCTION DownloadUrl(cRemote, cLocal)
LOCAL lResult

DECLARE INTEGER URLDownloadToFile IN urlmon;
INTEGER, STRING, STRING, INTEGER, INTEGER

WAIT WINDOW NOWAIT “Downloading remote file…”
lResult = URLDownloadToFile(0, cRemote, cLocal, 0,0) = 0
WAIT CLEAR
RETURN lResult
ENDFUNC

Carcase NOX
SUPER carcasele NOX - Vezi pret!








Leave a Reply

Your email address will not be published. Required fields are marked *