Kopier filer fra Internettet direkte ned på Computeren.

lille eksempel, med webrequest og webresponse, kan du få filen fra nettet som en stream, så skal du bare gemme din stream. :-)

Regner med at du kan gemme streamen selv, ellers siger du bare til

        Dim imageUri As New System.Uri(TextBox9.Text)
        Try
            Dim req As WebRequest = WebRequest.Create(imageUri)
            Dim resp As WebResponse = req.GetResponse()
            Dim stream as Stream = resp.GetResponseStream())
        Catch ex As Exception

        End Try

Ok... jeg glemte da vidst at sige at jeg er temmelig nybegynder!

hehe, bikser lige et koplet eksempel op så

many tanx

Hvis du er i tvivl om noget i dette eksempel, så bare spørg løs

Dim imageUri As New System.Uri(TextBox9.Text)
        Try
            'kald op til serveren
            Dim req As WebRequest = WebRequest.Create(imageUri)
            'hent serverens svar, (som er filen)
            Dim resp As WebResponse = req.GetResponse()
            'slet den midlertidige fil
            File.Delete("c:\fil.temp")
            'streams
            Dim fileStream As New FileStream("c:\fil.temp", FileMode.CreateNew)
            Dim binaryWriter As New BinaryWriter(fileStream)
            Dim stream As Stream = resp.GetResponseStream()

            'hent alle bytesne der er i streamen
            Dim arrayList As New ArrayList
            Dim aByte As Byte = stream.ReadByte()
            While aByte > -1
                Try
                    arrayList.Add(aByte)
                    aByte = stream.ReadByte()
                Catch ex As Exception
                    Exit While
                End Try
            End While

            'Skriv bytesne til filen
            Dim bytes() As Byte = CType(arrayList.ToArray(GetType(Byte)), Byte())
            binaryWriter.Write(bytes, 0, bytes.Length)
            binaryWriter.Close()
            'PictureBox1.Image = Bitmap.FromStream(resp.GetResponseStream())
        Catch ex As Exception
            Label4.Text = ex.Message
        End Try

Her:
Dim imageUri As New System.Uri(TextBox9.Text)

Er det stien på nettet? Feks: http://www.testcenter.dk/fil.zip?

Ja det kunne se således ud
Dim imageUri As New System.Uri("http://www.testcenter.dk/fil.zip")

du skal også skrive disse to linier øverst på siden (uden for formen eller klassen)

Imports System.IO
Imports System.Net

Når jeg klipper/klister det ind i mit Projekt, kommer den med 7Errors

Type 'WebRequest' is not defined
Type 'WebResponse' is not defined
Type 'File' is not defined
Type 'FileStream' is not defined
Type 'BinaryWriter' is not defined
Type 'Strwam' is not defined

Aha... det hjalp på de fejl....

:)

hmmm, der skal ikke stå Strwam, men Stream, hvis du stadig har fejl på den

Kanont!

Kan jeg så få VB til at pakke alle de filer ud i et bestemt bibliotek?

Feks: C:\TestCenter\

umiddelbart tror jeg ikke at der findes noget unzip værktøj i .NET biblioteket, men du kan jo bygge en selvudpakkende zip fil, som du så kan eksekvere, da det så er blevet til en exe fil.

Det med en nyere version på nettet kan du klare ved at ligge en versions tekst fil, samme sted, og så hente den først, og se om du har sat en nyere version i denne fil.

Det skal jeg nok få til at virke....

Kan du klarer denne her også?

http://www.eksperten.dk/spm/759960

Vedlægger lige et svar, og kigger på den anden så

for UNZIP i .NET kan man enten hente #ZipLib eller udnytte J# supporten og bruge
java.util.zip