Predmet:Re: downloader u vb6

---

Malo su te izigrali na toj tvojoj stranici.
Promijenili su ime fajla i to je jedan problem:
Putanja je sad:
url = "http://jedno.weebly.com/...opis.txt"
Druga stvar stavio si proceduru u novi modul pa ti onda ovaj red koda nevalja:
bData() = Inet1.OpenURL(strURL, icByteArray)
trebalo bi da stoji:
bData() = OmeTvojeforme.Inet1.OpenURL(strURL, icByteArray)

ili da stavis proceduru u modul forme i onda nista netrebas mijenjati.

Jps jedan problem je:
On Error GoTo Error
sto znaci da ako naidje na gresku da skoci na:
Error:
End
End Function

i iza toga slijedi end znaci izlaz i ti nista neznas sta se desilo.
On error re stavlja na karju kada se presretnu sve greske.
Znaci dok radis javljaju se greske i ti pises upute:
Error:
if err. number=neki broj then
Msgbox "Neka napomena sta treba da se uradi itd..
endif

To sto si ostavio cio dan nije nista ja sam nekad zano i vis ostaviti zbog banalne stvari kada sam ucio.
End Function

---