[internet] avattu ftp serverin pidike
[maski] tiedostomaski joka haetaan
Funktio palauttaa vektorin maskiin sopivista tiedostoista ja hakemistoista.
Vektorin muodostuu seuraavasti: {{tiedosto/hakemistonimi,koko,päivä,atribuutti},{{tiedosto/hake...jne.}}.
Atribuutti on 128 jos on kyse tiedostosta ja 16 jos hakemistosta.
Funktiolla voidaan haetaan listaus ftp serverillä olevista tiedostoista ja hakemistoista.
Ennen latausta täytyy yhdistyä internettiin ja ftp-serverille internet() -funktiolla.
ihan1=internet(,) /* yhdistetään internettiin */
if ihan1<=0
? "Internet ei onnistu"
return
endif
ihan2=internet(ihan1,"ftp.datamike.biz","kayttajatunnus","salasana") /* yhdistetään ftp serveriin */
if ihan2<=0
internet(ihan1) /* suljetaan internet yhteys */
? "tunnukset väärin"
return
endif
apu=ftpdir(ihan2,"*.htm") /* hae vektoriksi htm tiedostot muuttujaan apu */
if !empty(apu)
wlist(apu) /* näytetään lista htm tiedostoista */
endif
internet(ihan2) /* suljetaan ftp yhteys */
internet(ihan1) /* suljetaan internet yhteys */