Downloading kai Visual Basic

Συζητήσεις για τις γλώσσες του dot Net και για του Visual Studio της Microsoft

Συντονιστές: WebDev Moderators, Super-Moderators

Απάντηση
Άβαταρ μέλους
giannis19
Δημοσιεύσεις: 38
Εγγραφή: 11 Ιουν 2006 14:12
Τοποθεσία: London, UK

Downloading kai Visual Basic

Δημοσίευση από giannis19 » 21 Φεβ 2008 00:16

Prospatho na ftiakso ena mikro downloader stin VB
Vriskome sto stadio opou to file katevenei kanonika sto directory to opoio orizo

tha ithela na to emploutiso ligo topothetontas progress bar kai tin dinatotia pause etsi wste na ksero se poio stadio vriskete to downloading kai an xreiastei na to diakopsw prosorina

gia progress bar mallon tha prepei me kapoio tropo na entopizete to size tou file prin to katevasma kai kata to katevasma me tin xrisi kapoiou timer na fortonei to bar

gia to pause ipotheto pws tha apothikevete prosorina, meros tou file kai tha sinexizete ap'ekeino to simeio tin epomeni fora

auta theoritika omws :oops:

me tin vb asxoloume entelws erasitexnika opote oi gnoseis mou ine poly periorismenes

Diafotiste me

Κώδικας: Επιλογή όλων

dim dt() as byte

lblStatus.Caption = "Downloading"
Inet1.URL = MyUrl 
Do
dt= Inet1.OpenURL(, icByteArray)

Loop While Inet1.StillExecuting

Open "C:\test.jpg" For Binary Access Write As #1
Put #1, , dt()
Close #1

lblStatus.Caption = "DONE"

Απάντηση

Επιστροφή στο “dot Net και Visual Studio”

Μέλη σε σύνδεση

Μέλη σε αυτήν τη Δ. Συζήτηση: Δεν υπάρχουν εγγεγραμμένα μέλη και 0 επισκέπτες