Tach,
Hab jetzt bisschen mit FTP rumexperementiert und schicke Texte an den FTP Server.
Ich habe 2 Textboxen. Eine Überschrift (Datum) und den Text dazu. Aber wenn ich halt in diese beide Textboxen schreib und im FTP checke, dann sieht das ganze so aus: 12.07.2012Heute habe ich Pizza gegessen. Ich möchte aber das da ein Strich oder Leerzeichen ist, also: 12.07.2012 - Heute habe ich Pizza gegessen. Außerdem kriege ich es nicht hin eine Nachricht zu erstellen, nachdem der Vorgang erfolgreich war. Also wenn es erfolgreich gesendet hat, dann soll die Meldung "Notiz gesendet" erscheinen
Bitte schreibt mir jetzt nicht solche großen Reden hin, ich checke die ganzen Begriffe eh nicht. Bitte korrigiert einfach das was ich da gekrickelt habe.
Dankeschön! Hier ist der Code:
Dankeschön!
Hab jetzt bisschen mit FTP rumexperementiert und schicke Texte an den FTP Server.
Ich habe 2 Textboxen. Eine Überschrift (Datum) und den Text dazu. Aber wenn ich halt in diese beide Textboxen schreib und im FTP checke, dann sieht das ganze so aus: 12.07.2012Heute habe ich Pizza gegessen. Ich möchte aber das da ein Strich oder Leerzeichen ist, also: 12.07.2012 - Heute habe ich Pizza gegessen. Außerdem kriege ich es nicht hin eine Nachricht zu erstellen, nachdem der Vorgang erfolgreich war. Also wenn es erfolgreich gesendet hat, dann soll die Meldung "Notiz gesendet" erscheinen
Bitte schreibt mir jetzt nicht solche großen Reden hin, ich checke die ganzen Begriffe eh nicht. Bitte korrigiert einfach das was ich da gekrickelt habe.
Dankeschön! Hier ist der Code:
VB.NET-Quellcode
- Public Class Form1
- Private Sub PictureBox1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles PictureBox1.Click
- Dim client As New Net.WebClient
- Dim bisher_txt As String = client.DownloadString("http://BLABLA.com" & "/Notiz.txt")
- client.Credentials = New Net.NetworkCredential("Name", "Passwort")
- client.UploadString("ftp://BLABLA.com" & "/Notiz.txt", bisher_txt & vbNewLine & vbNewLine & TextBox1.Text & TextBox2.Text)
- TextBox2.Text = "Gesendet."
- End Sub
- Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
- Me.Close()
- End Sub
- End Class
Dankeschön!