Inhalt von online Textdatei auslesen und mit Textbox vergleichen

  • VB.NET

Es gibt 6 Antworten in diesem Thema. Der letzte Beitrag () ist von Jannik S..

    Inhalt von online Textdatei auslesen und mit Textbox vergleichen

    Hallo Leute ich habe ein kleines Problem.

    Ich habe ein Programm geschrieben, welches den Inhalt einer Textdatei auf einem server mit dem Inhalt einer Textbox vergleichen soll.
    Sind beide identisch soll später etwas passieren. Das Problem ist nun, dass ich den Inhalt zwar über Webclient herunterladen, in einer Variablen abspeichern und mir auch anzeigen lassen kann, aber wenn ich dann den heruntergeladenen String mit dem Inhalt der textbox vergleiche, sind die Inhalte scheinbar nicht indentisch.

    Hier mal der Code:

    VB.NET-Quellcode

    1. Imports System.IO
    2. Imports System.Net
    4. Public Class testvb
    5. Dim myString As String
    7. Private Sub Auslesen()
    9. Dim Verbindung As New WebClient
    11. Try
    12. myString = Verbindung.DownloadString("http://h1.ripway.com/Ninnik/InitReg.txt") 'InitReg.txt hat als Inhalt nur die Zahlen 1234
    13. TextBox2.Text = myString
    14. Catch
    15. MsgBox("Sorry der Fehler sollte nicht auftreten! Bitte versuchen Sie es erneut!")
    16. End Try
    20. End Sub
    23. Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click
    25. Auslesen()
    27. End Sub
    29. Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
    31. If myString = TextBox1.Text Then 'Textbox1.text beinhaltet eine per Hand eingegebene Zahlenfolge
    32. MessageBox.Show("läuft!")
    33. Else
    34. MessageBox.Show("fail")
    35. End If
    39. End Sub
    40. End Class


    Was muss ich nun ändern, um einen solchen Vergleich anstellen zu können?

    Mit freundlichen Grüßen

    Guck dir den Text mal an, den er downloaded. Es kann passieren dass beim download noch ein Sonderzeichen eingefügt wird, das wird es bei dir auch sein... Also downloade mal den Inhalt und lass ihn dir in einer TextBox anzeigen und guck ob ganz am Anfang oder Ende ein Sonderzeichen oder halt so ein Rechteck ist....

    Also das mit dem Sonderzeichen hör ich zum ersten Mal, glaub kaum das der bei ner .txt Datei nochn ihrgendwas hinzufügt, weil ers nicht lesen kann.

    VB.NET-Quellcode

    1. 'Mach die Abfrage mal so:
    2. If myString.Contains(TextBox1.Text) Then
    3. MessageBox.Show("läuft!")
    4. Else
    5. MessageBox.Show("fail")
    6. End If

    doch, das gibts auch, dass Encoding-Marker hinzugefügt werden (oder eben weggelassen). Ich tippe auch auf iwas mittm Encoding. Aber ist ja egal. So oder so muß der TE die Texte mal zeichenweise durchgehen, und die Stellen auffinden, die sich unterscheiden, wo er meint, sie sollten gleich sein.
    Das können auch Zeilvorschübe sein, oder der letzte Zeilvorschub der Datei oder immer kanns auch iwas ganz blödes sein, wo man sich mitte Hand vorn Kopp haut ;)

    VB.NET-Quellcode

    1. dim textaustextbox as string = textbox1.text
    2. dim ftp as new net.webclient
    3. ftp.credentials = new net.networkcredential ("ftpbenutzername","ftppasswort")
    4. dim textausdatei as string = ftp.downloadstring ("datei auf deinem server")
    5. if textaustextbox = textausdatei then
    6. msgbox ("Text identisch.")
    7. else
    8. msgbox ("Text unterschiedlich")
    9. end if

Facebook
Telefonspende