I bunden af dette indlæg er den samme kode 2x
"Mikkel Ro Manzano Christensen" <usenet@openzipper.dk> skrev i en meddelelse news:9du1l8$26mc$1@news.cybercity.dk...
> Det var mig der skrev indlægget... Så her er lige en kopi:
>
> æhh... Jeg lavede på et tidspunkt et program som opdaterede sig selv....
> Altså kan du jo bare hente filerne ned fra serveren, og så vise dem fra din
> egen computer... Mener at kontrollen hed microsoft internet transfer
> protocol
>
> OK, jeg kunne ikke lade være med at prøve... Skal alligevel selv bruge det
> om et par dage...
>
> Den her virker ihvertfald, og med lidt tilpasning kan du bruge den til dit
> projekt...
>
>
> Du skal have en microsoft internet transfer protocol og en commandbutton på
> din form, den skulle være ret nem at forstå... Eksemplet er iøvrigt hentet
> fra hjælpfilen, og så modificeret lidt...
>
> Private Sub Command1_Click()
> Inet1.AccessType = icUseDefault
> Dim b() As Byte
> Dim strURL As String
>
> ' Presuming this is still a valid URL.
> strURL = "
http://www.openzipper.dk/klasseside/chip.bmp"
>
> ' Retrieve the file as a byte array.
> b() = Inet1.OpenURL(strURL, icByteArray)
>
> Open "C:\test.bmp" For Binary Access _
> Write As #1
> Put #1, , b()
> Close #1
> MsgBox "Hentet"
> Picture1.Picture = LoadPicture("C:\test.bmp")
> End Sub
>
>
>
> --
> Mvh. / Regards Mikkel Christensen
>
>
>
> "Asbjørn Sloth Tønnesen" <Asbjorn@caduceus.dk> wrote in message
> news:txrM6.12665$zv2.1698232@news010.worldonline.dk...
> > Ja i denne gruppe
> >
> > "Mikkel Ro Manzano Christensen" <usenet@openzipper.dk> skrev i en
> meddelelse news:9d4im7$iug$1@news.cybercity.dk...
> > > æhh... Jeg lavede på et tidspunkt et program som opdaterede sig selv....
> > > Altså kan du jo bare hente filerne ned fra serveren, og så vise dem fra
> din
> > > egen computer... Mener at kontrollen hed microsoft internet transfer
> > > protocol
> > >
> > > OK, jeg kunne ikke lade være med at prøve... Skal alligevel selv bruge
> det
> > > om et par dage...
> > >
> > > Den her virker ihvertfald, og med lidt tilpasning kan du bruge den til
> dit
> > > projekt...
> > >
> > >
> > > Du skal have en microsoft internet transfer protocol og en commandbutton
> på
> > > din form, den skulle være ret nem at forstå... Eksemplet er iøvrigt
> hentet
> > > fra hjælpfilen, og så modificeret lidt...
> > >
> > > Private Sub Command1_Click()
> > > Inet1.AccessType = icUseDefault
> > > Dim b() As Byte
> > > Dim strURL As String
> > >
> > > ' Presuming this is still a valid URL.
> > > strURL = "
http://www.openzipper.dk/klasseside/chip.bmp"
> > >
> > > ' Retrieve the file as a byte array.
> > > b() = Inet1.OpenURL(strURL, icByteArray)
> > >
> > > Open "C:\test.bmp" For Binary Access _
> > > Write As #1
> > > Put #1, , b()
> > > Close #1
> > > MsgBox "Hentet"
> > > Picture1.Picture = LoadPicture("C:\test.bmp")
> > > End Sub
> > >
> > >
> > >
> > > --
> > > Mvh. / Regards Mikkel Christensen
> > >
> > > "Christian Andersen" <chr-sa@mail1.stofanet.dk> wrote in message
> > > news:09bJ6.6913$Iq.1542854@news101.telia.com...
> > > > Ja, sådan kan man godt gøre det. Problemet er dog at man ikke kan
> ændre
> > > ret
> > > > mange properties på Microsoft Internet Control. Det betyder f.eks. at
> hver
> > > > billede har en vertikal scrollbar og det er ikke så godt!
> > > >
> > > > Er der overhovedet ikke andre måder at gøre det på? Evt. en
> tredjeparts
> > > > kontrol?
> > > >
> > > > Mvh
> > > > Christian Andersen
> > > >
> > > > "Niels" <ng@blommelunden.dk> wrote in message
> > > > news:zxaJ6.9676$T22.820798@news010.worldonline.dk...
> > > > > Det er muligt vis du bruger 'Microsoft Internet Controls'.
> > > > > Du skal bare vide at den, i virkeligheden bruger Internet Exploreren
> > > > > som kontrol.
> > > > >
> > > > > Til at loaded billedet skriver du eks:
> > > > >
> > > > > WebBrowser1.Navigate "
http://www.nowhere.dk/theimages.jpg"
> > > > >
> > > > > - Niels
> > > > >
> > > > > "Christian Andersen" <chr-sa@mail1.stofanet.dk> wrote in message
> > > > > news:67aJ6.6882$Iq.1535819@news101.telia.com...
> > > > > > Hej
> > > > > >
> > > > > > Er der nogen som ved hvorledes man i sin Visual Basic v6.0
> applikation
> > > > > viser
> > > > > > et billede ud fra en URL?
> > > > > >
> > > > > > Det som jeg gerne vil, er at vise en række billeder fra en
> webserver,
> > > > men
> > > > > så
> > > > > > vidt jeg kan se, kan man kun vise billeder indenfor det
> indeværende
> > > > > > filsystem. I hvert fald hvis man bruger Image eller PictureBox.
> > > > > >
> > > > > > Mvh
> > > > > > Christian Andersen
> > > > >
> > > > >
> > > > >
> > > >
> > > >
> > >
> > >
> >
>
>