[internet] avattu ftp serverin pidike
[tiedosto] tiedosto joka haetaan serveriltä
[tallennetaan] nimi johon tallennetaan omalla kovalevyllä
[vek] vektori, johon funktio lähettää valmius prosentin, esim.{ikkuna,y,x}
Funktio palauttaa numeron 1 jos onnistui, 0 tai -1 jos ei onnistunut
Funktiolla voidaan hakea ftp serveriltä tiedosto ja tallentaa se omalle kovalevylle.
Ennen latausta täytyy yhdistyä internettiin ja ftp-serverille internet() -funktiolla.
ihan1=internet(,) /* yhdistetään internettiin */
if ihan1<=0
? "Internet ei onnistu"
return
endif
apu=HTTP(ihan1,"http://www.datamike.fi/dmsetup.txt","apu.bak") /* haetaan tiedosto http://www.datamike.fi/dmsetup.txt ja tallennetaan se apu.bak */
/* Jos haetaan tiedosto https -osoitteesta Windows käyttää salattua kanavaa */
if apu#1
? "Tiedoston haku epäonnistui"
else
? "Haku onnistui"
endif
internet(ihan1) /* suljetaan internet yhteys */