FoxPro – Read Url


E-BODA Essential A200
Tableta E-BODA Essential A200 cu procesor Cortex A8 1.0GHz, 7 inch

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

Samsung 40EH5450 Pret
Televizor LED Samsung, 101 cm, Full HD 40EH5450








Leave a Reply

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