Hallo,
ich versuche momentan eine FTP-Chat zu erstellen,
habe eigentlich auch schon die ersten funktionen.
Aber jetzt möchte ich einfügen das man sich anmelden kann und dann
eine Textdatei(.txt) erstellt wird und auf den FTP-Server hochgeladen wird.
Die Textdatei soll so heißen wie der Benutzer (TextBox1.text).
Jedoch funktioniert das nicht was mache ich Falsch?
Hier ist mein Code
Was ist der Fehler? Wie kann ich ihn beheben?
Ich habe überall gesucht allerdings habe ich nichts gefunden.
"Vielen dank im voraus" für Antworten!
Edit by LaMa5:
- Formatierung in eine sinnvoll lesbare Variante geändert.
ich versuche momentan eine FTP-Chat zu erstellen,
habe eigentlich auch schon die ersten funktionen.
Aber jetzt möchte ich einfügen das man sich anmelden kann und dann
eine Textdatei(.txt) erstellt wird und auf den FTP-Server hochgeladen wird.
Die Textdatei soll so heißen wie der Benutzer (TextBox1.text).
Jedoch funktioniert das nicht was mache ich Falsch?
Hier ist mein Code
VB.NET-Quellcode
- Imports System.IO
- Public Class Anmelden
- Dim wc As New Net.WebClient
- Dim web As String = "ftp://server.de/ordner/"
- Dim na As String = "name"
- Dim pw As String = "Passwort"
- Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
- wait.Start()
- End Sub
- Private Sub wait_Tick(ByVal sender As Object, ByVal e As System.EventArgs) Handles wait.Tick
- My.Computer.Network.UploadFile(txt.Text, web, na, pw)
- wait.Stop()
- End Sub
- Private Sub Anmelden_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load
- End Sub
- Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click
- txt.Text = (Path.GetDirectoryName(Application.ExecutablePath)) & "\" & TextBox1.Text & ".txt"
- File.Create(txt.Text)
- End Sub
- End Class
Was ist der Fehler? Wie kann ich ihn beheben?
Ich habe überall gesucht allerdings habe ich nichts gefunden.
"Vielen dank im voraus" für Antworten!
Edit by LaMa5:
- Formatierung in eine sinnvoll lesbare Variante geändert.
Dieser Beitrag wurde bereits 1 mal editiert, zuletzt von „LaMa5“ ()