-
Code:
Warnung 1 Die wc-Variable wird verwendet, bevor ihr ein Wert zugewiesen wird. Zur Laufzeit kann eine Nullverweisausnahme auftreten. C:\Users\DS\documents\visual studio 2010\Projects\WindowsApplication1\WindowsApplication1\Form1.vb 15 13 WindowsApplication1
Und beim savedialoge muss ich den namen + dateiendung selbst eingeben.
Und die datei ist aber unauffinbar wenn ich speichern drücke.
-
Guck im eigenschaften fenster beim Filter des SaveFileDailoges
hast du denn System.net inkludiert und wc als Variable deklariert??
Hier ein Projekt, weil du es nicht verstehst, kannste C&P XD
localhostr.com - share … anything
-
hab mir das angesehen, und sethet eigentlich das selbe wie bei mir
Code:
Imports System.Net
Public Class Form1
Private Sub Label1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Label1.Click
MsgBox("LoL")
End Sub
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
If CheckBox1.Checked Then
SaveFileDialog1.ShowDialog()
Dim wc As WebClient
wc.DownloadFile(TextBox1.Text, SaveFileDialog1.filename)
Else
MsgBox("Check")
End If
End Sub
End Class
Und ich wills eben versetehn was da falsch is, wenn ichs weiß, dann weiß ichs nächtes mal auch^^
-
Hier hab ich mal schnell was zamgeschrieben:
Code:
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
If CheckBox1.Checked Then
Dim save As New SaveFileDialog
Dim wc As New System.Net.WebClient
With save
.Title = "Wo soll die Datei gespeichert werden?"
.Filter = "Bild (*.jpg)|*.jpg|Anwendung (*.exe)|*.exe|Textdokument (*.txt)|*.txt| Alle Dateien (*.*)|*.*"
.FileName = "dloaded"
.AddExtension = True
.InitialDirectory = My.Computer.FileSystem.SpecialDirectories.MyDocuments
If save.ShowDialog = Windows.Forms.DialogResult.OK Then
wc.DownloadFile(TextBox1.Text, .FileName)
End If
End With
Else
MsgBox("Bitte die Checkbox anklicken")
End If
End Sub
Wenn du die beiden Snippets vergleichst wirst du ja feststellen warum bei dir der SaveFileDialog so nicht funktioniert.
LG Apfel
-
So das funktioniert danke :)
hab aber noch was anderes ... weil ich ein anderes projekt als test machen möchte, nur ich mich mit dem deklaieren nicht auskenne :(
Code:
Public Class Form1
Dim ProgressBar1
Friend WithEvents MyWebClient As New Net.WebClient
Private Sub MyWebClient_DownloadProgressChanged(ByVal sender As Object, ByVal e As System.Net.DownloadProgressChangedEventArgs) Handles MyWebClient.DownloadProgressChanged
ProgressBar1.Value = e.ProgressPercentage
End Sub
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
MyWebClient.DownloadFileAsync(New Uri("http://shelter.kilu.de/lol/lol.exe"), "C:\lol.exe")
End Sub
End Class
Also
Dim Progressbar [.wie gehts da weiter`?.]
-
Auch wenn es anscheinend funktioniert muss ich dir noch was sagen. Du hast keine Ahnung was ein Member ist und somit auch keine Ahnung von OOP. Das ist keine Schande doch das zeichnet *.Net nun mal aus. Nimm ein Buch oder ein Openbook (von Galileo) und lern mal die Grundlagen. Kannst ja kein Member (zB vom SaveFileDialog) aufrufen ohne dessen Klasse zu initialisieren.
Also lies das doch kluger Weise ;).
Galileo Computing: Einstieg in VB.NET
-
Danke für die antwort, hab mir das mit members mal durchgelesen, und auch noch weiter vorne gekuckt, nur versteh ich es nicht. Ich weiß zwar dass man es so defenieren kann, aber nicht, was ich dann machen muss^^
Und ja mhm.. ich tu mir schwer, wenn ich den code nicht weiß, wie das gehört. ich kann es nur so lernen^^ , denn dann weiß ich, was für eine funktion was bewirkt.
Wenn ich an meine SA-MP zeiten denke, wo eine c ähnliche sprache war, hab ichs nur durch souce codes gelernt.