So funktioniert JustAnswer:

  • Fragen Sie einen Experten
    Tausende Experten in über 200 Kategorien.
  • Erhalten Sie eine professionelle Antwort
    Per E-Mail oder sofortiger Benachrichtigung, während Sie auf unserer Website warten.
    Stellen Sie ggf. weitere Anschlussfragen.
  • 100%ige Zufriedenheit garantiert
    Bewerten Sie die erhaltene Antwort.

Stellen Sie Ihre Frage an IT-Fachinformat...

IT-Fachinformatiker
IT-Fachinformatiker, Systemadministrator
Kategorie: Computer
Zufriedene Kunden: 6838
Erfahrung:  Software Entwicklung, Projekt Erfahrung, Windows-Netzwerke, Linux-Netzwerke, Windows/Linux-Server
32504664
Geben Sie Ihre Frage in der Kategorie Computer hier ein
IT-Fachinformatiker ist jetzt online.

Hallo justanswer.de, nun melde ich mich ein zweites Mal

Kundenfrage

Hallo justanswer.de,
nun melde ich mich ein zweites Mal bei Ihnen, ich komme hier mit dem Speichern unter Visual Studio 2013, bezüglich VB, nicht klar. Also: Ich habe in Visual Studio 2013 (kurz: VS) in einer Form z.B. 10 Textboxen (Name, Vorname, Straße, Wohnort, usw.). Die Inhalte dieser Textboxen möchte ich in einer einzigen Textdatei speichern. Ich habe das so gelöst:
My.Computer.FileSystem.WriteAllText("C:\Documents and Settings\All Users\Documents\daten.txt", TextBox1_Daten.Text, False)
My.Computer.FileSystem.WriteAllText("C:\Documents and Settings\All Users\Documents\daten.txt", TextBox2_Daten.Text, False)
Verlasse ich die Textbox1_Daten.Text mit Return, springt der Cursor weiter ins nächste Textfeld, nach Textbox2_Daten.Text. Beim Sprung ins nächste Textfeld wird der Inhalt des vorigen Textfeldes sofort gespeichert, das soll auch so sein. Nur leider wird beim Sprung in das neue Textfeld die vorherige Eingabe überschrieben bzw. gelöscht. Wie muss ich das machen, dass ich alle Textfelder in einer Datei speichere und natürlich auch wieder auslesen kann? Ich wiederhole: Beim Sprung in ein nächstes Textfeld soll die Eingabe des letzten Textfeldes immer automatisch gespeichert werden. Natürlich muss ich das dann auch wieder entsprechend auslesen können!
Vielen Dank ***** ***** Antwort.
Mit freundlichen Grüßen ***** *****
Peter Sierek
Gepostet: vor 2 Jahren.
Kategorie: Computer
Experte:  IT-Fachinformatiker hat geantwortet vor 2 Jahren.
Hallo

um optimal in eine Textdatei zu schreiben verwendet man üblicherweise das folgende Statement:

Dim myFileAs New StreamWriter("yourtextfile.txt", False)
myWriter.WriteLine (TextBox1.Text + vbCr + TextBox2.Text)
myWriter.Close()

damit werden die Inhalte beider Textboxen mit einem Zeilenumbruch gespeichert. Wenn Sie statt "false" den Wert "true" angeben werden spätere Daten (vor Close) an die Datei angehängt (Mode Append).

Es spielt keine Rolle, wie Sie sich in den Textboxen bewegen das hat keine Auswirkung auf das speichern oder auslesen der Textdatei. Gespeichert kann und wird nur jeweils der aktuelle Wert also der aktuelle Text der in den Textboxen enthalten ist.

Das heißt, wenn Sie es überschrieben und dann das schreiben in die Datei auslösen sind die letzten Daten natürlich nicht mehr da es sei denn, das Sie die Datne anhängen. Wenn es viele Datne sind macht es Sinn eine Datenbank zu verwenden und keine Textdatei.

Gruß Günter











Experte:  IT-Fachinformatiker hat geantwortet vor 2 Jahren.

Hallo

das speichern teilte ich Ihnen ja mit das ist nicht das Problem. Damit das aber automatisch passiert müssten Sie beim Event "LostFocus" pro TextBox das speichern auslösen am einfachsten wäre es, wenn Sie sich eine Methode erstellen die als Parameter die Inhalte der Textboxen entgegen nimmt. Dann könnten Sie automatisch speichern, sobald die Textbox den Fokus verliert. Das Laden selbst macht man normalerweise beim Ereignis OnLoad / Load des Formulars selbst. Ein einfaches Beispiel welches Sie für das auslesen verwenden können (Anpassung natürlich notwendig):

Dim myFileReader As New StreamReader("c:\temp\test.txt")
Dim currentRow As String
Dim arrTextArray As New ArrayList()

currentRow = ""

Do

currentRow = myFileReader.ReadLine()

If Not currentRow Is Nothing Then
arrTextArray.Add(currentRow)
End If

Loop Until currentRow Is Nothing

myFileReader.Close()

For Each currentRow In arrTextArray

Console.WriteLine(currentRow)

Next

Console.ReadLine()

damit liest man die Textdatei von der ersten Zeile bis zur letzten aus. natürlich müssen Sie pro Zeile logischerweise auch die Textboxen zuordnen daher macht es auf Dauer Sinn, wenn Sie eine Access Datenbank nutzen was mit VB.NET einfach ist damit können Sie pro Spalte eine Textbox binden und hätten sehr viel weniger Aufwand.

Gruß Günter









Experte:  IT-Fachinformatiker hat geantwortet vor 2 Jahren.
Hallo,

haben Sie mein Beispiel einmal versucht? Ich persönlich würde es aber viel eher mit einer reinen lokalen Datenbank (Access, ohne SQL-Server MS-Access ist nicht notwendig da das VS alle Tools an Board hat) machen denn dann würden Sie sich den Aufwand sparen das ganze wird nämlich später wenn es um Aktualisierungen und Validierungen geht sehr kompliziert und damit sehr fehleranfällig.

Gruß Günter

Bekannt aus:

 
 
 
„[...]mehr als Zehntausend Experten weltweit; 1500 davon in Deutschland. Acht Jahre nach dem Start ist das [...] Online-Unternehmen mit seinen 90 Mitarbeitern die größte Web-Seite für das Vermitteln von Experten von Anwälten über Ärzte bis hin zu Universitätsprofessoren.“
„Wer eine fachmänische Lösung für ein medizinisches, rechtliches oder technisches Problem sucht, kann das jetzt auch im Internet tun. Lebenshilfe auf die schnelle, unkomplizierte und vor allem erschwingliche Art bietet die Seite www.justanswer.de. Etwa 1500 Experten stehen per Mail für Fragen zu ca. 200 Fachgebieten rund um die Uhr zur Verfügung."
„Rat gewünscht? Rechtliche, medizinische oder allgemeine Fragen beantworten Experten unter www.justanswer.de."
„JustAnswer, die weltweit führende Online-Plattform für Expertenfragen und -antworten, bietet ab sofort noch mehr Sicherheit und Qualität für Verbraucher."
„Ob Vorbereitung, Notfall oder Reklamation nach dem Urlaub - JustAnswer bietet jederzeit schnelle, kompetente Antworten"
„Die Online-Plattform JustAnswer bringt Ratsuchende und Experten in über 200 Fachgebieten zusammen."
 
 
 

Was unsere Besucher über uns sagen:

 
 
 
  • Ich bedauere, dass ich nicht gleich bei Ihnen gelandet bin. Die Leerung des Cache hat das Problem gelöst. Danke Gerd Schönbuchner Grafrath
< Zurück | Weiter >
  • Ich bedauere, dass ich nicht gleich bei Ihnen gelandet bin. Die Leerung des Cache hat das Problem gelöst. Danke Gerd Schönbuchner Grafrath
  • Endlich ein Experte, der mir wirklich weiterhelfen konnte! DANKE! JustAnswer Kunde Taunusstein
  • Ihre Antwort hat mir sehr geholfen, die richtigen Entscheidungen zu treffen. Dass Sie mir darüber hinaus noch 2 Empfehlungen gegeben haben fand ich super. Vielen Dank! JustAnswer Kunde Freiburg
  • Die ausgearbeiteten Hilfen waren gut strukturiert, leicht verständlich und zu 100% hilfreich für mich. Vielen Dank Markus B. Karlsruhe
  • Sehr schnelle und kompetente Antwort, die für mich bares Geld bedeutet. Vielen Dank! S.Stober K.
  • Herzlichen Dank! Hab durch Ihre Antwort viel Geld gespart! Ben R. Deutschland
  • Sehr schnelle und kompetente Hilfestellung. Besonders für mich als Laien wurde alles sehr verständlich erklärt. Gerne wieder! Rosengl Bad Tölz
 
 
 

Lernen Sie unsere Experten kennen:

 
 
 
  • Tronic

    Tronic

    IT-Specialist

    Zufriedene Kunden:

    2269
    Elektroniker und EDV-Service
< Zurück | Weiter >
  • http://ww2.justanswer.com/uploads/PY/Pyroflash/2011-4-21_104934_tronic.64x64.jpg Avatar von Tronic

    Tronic

    IT-Specialist

    Zufriedene Kunden:

    2269
    Elektroniker und EDV-Service
  • http://ww2.justanswer.com/uploads/rufushoschi/2010-11-08_135947_bild.jpg Avatar von IT-Fachinformatiker

    IT-Fachinformatiker

    Systemadministrator

    Zufriedene Kunden:

    6338
    Software Entwicklung, Projekt Erfahrung, Windows-Netzwerke, Linux-Netzwerke, Windows/Linux-Server
  • http://ww2.justanswer.com/uploads/COMINAROSA/2010-02-03_172238_PASSBILD.JPG Avatar von COMIN IT-Service

    COMIN IT-Service

    Dipl.-Ing.

    Zufriedene Kunden:

    779
    Dipl.Ing (FH) ET, NT, IT
  • http://ww2.justanswer.com/uploads/RaubergerConcep/2010-03-02_102740_Portraet64.jpg Avatar von RaubergerConcept

    RaubergerConcept

    IT-Specialist

    Zufriedene Kunden:

    234
    Mehr als 10 Jahre Erfahrung in Softwareentwicklung und Netzwerktechnik
  • http://ww2.justanswer.com/uploads/LF/lfalkenburg/2015-2-8_01843_.64x64.jpg Avatar von Lutz Falkenburg

    Lutz Falkenburg

    IT-Specialist

    Zufriedene Kunden:

    96
    Seit über 20 Jahren beruflich im IT-/IUK-Bereich tätig. Egal ob EinzelPC der Netzwerk...
  • http://ww2.justanswer.com/uploads/BI/BigDaddyXD/2012-10-24_20126_WhySoSeriousJob.64x64.jpg Avatar von BigDaddyXD

    BigDaddyXD

    Informatiker

    Zufriedene Kunden:

    1588
    Microsoft Certified Professional, Microsoft Certified Desktop Support Technican,...
  • http://ww2.justanswer.com/uploads/PU/Pucky80/2011-5-14_54537_pucky80.64x64.jpg Avatar von Pucky80

    Pucky80

    IT-Systemkaufmann

    Zufriedene Kunden:

    1322
    MCITP (Microsoft Server 2008 Enterprise Administrator)
 
 
 

Ähnliche Fragen in der Kategorie Computer