Sie sind aktuell nicht angemeldet.

Funktionen: Einloggen  |  Neu registrieren  |  Suchen

Text einlesen 2
Autor: Atlan
Datum: 12.01.02 00:43
Ich versuch es nochmal da ich immer noch nicht weiter gekommen bin. '****************************************************************** Also speichern wie folgt: Private Sub cmdSpeichern_Click() Open "Adressen.txt" For Append As #1 Print #1, txt0.Text, txt1.Text, txt2.Text, txt3.Text, txt4.Text, txt5.Text, txt6.Text, txt7.Text, txt8.Text, txt9.Text, txt10.Text, txt11.Text, txt12.Text, txt13.Text Close #1 End Sub '****************************************************************** Laden in List1: Private Sub Form_Load() On Error GoTo Error Dim Text, Pfad Pfad = "Adressen.txt" Open Pfad For Input As #1 While Not EOF(1) Line Input #1, Text If InStr(1, Text, "") Then List1.AddItem Text Wend Close #1 End Sub '****************************************************************** Dies sind die Textfelder: Sub Neu() Form1.txt0.SetFocus Form1.txt0.Text = "Nachname:" Form1.txt1.Text = "Vorname:" Form1.txt2.Text = "Adresse:" Form1.txt3.Text = "Plz:" Form1.txt4.Text = "Land:" Form1.txt5.Text = "Wohnort:" Form1.txt6.Text = "Telefon Privat:" Form1.txt7.Text = "Telefon. Firma:" Form1.txt8.Text = "Telefon. Handy:" Form1.txt9.Text = "Faxnummer:" Form1.txt10.Text = "M@iladresse:" Form1.txt11.Text = "http://www." Form1.txt12.Text = "Sonstiges:" Form1.txt13.Text = "Bemerkungen:" End Sub '************************************************************** Was mir dabei fehlt ist, das die Einträge die zuvor in der Adressen.txt gespeichert wurden, und sich beim laden dann auch in dem List1.List Feld befinden, dann sollen alle gemachten Einträge wenn ich nach dem Namen suche, in dem txtSuchen.Text in die dafür vorgesehenen Text-Felder geschrieben werden. gruß Atlan

Text einlesen 2	93	Atlan	12.01.02 00:43
Na, da wollen wir Dich vor einem schweren Designfehler schüt...	239	unbekannt	12.01.02 12:35
Teil 1: Done.	244	unbekannt	12.01.02 16:05
Re: Teil 2: Done.	234	unbekannt	12.01.02 16:35
Re: Teil 3: Done.	251	unbekannt	12.01.02 16:45
Re: Teil 4: Done.	216	unbekannt	12.01.02 17:28
Das war's mal, aber:	224	unbekannt	12.01.02 17:36
Re: Das war's mal, aber:	37	Atlan	12.01.02 21:27
Wieso, das ist doch keine Datenbank? Naja, ich fasse es mal ...	261	unbekannt	12.01.02 21:35
Re: Wieso, das ist doch keine Datenbank? Naja, ich fasse es ...	72	Atlan	13.01.02 00:10
Re: Wieso, das ist doch keine Datenbank? Naja, ich fasse es ...	239	unbekannt	13.01.02 00:23
Re: Wieso, das ist doch keine Datenbank? Naja, ich fasse es ...	68	Atlan	13.01.02 01:46
Re: Wieso, das ist doch keine Datenbank? Naja, ich fasse es ...	214	unbekannt	13.01.02 01:48
Komplett und funkt	344	unbekannt	13.01.02 15:03
Re: Komplett und funkt	47	Atlan	13.01.02 16:07
Na, löschen wir mal ...	432	unbekannt	13.01.02 18:11
Re: Na, löschen wir mal ...	42	Atlan	13.01.02 18:36
Re: Na, löschen wir mal ...	284	unbekannt	13.01.02 19:11
Re: Na, löschen wir mal ...	38	Atlan	13.01.02 20:09
Re: Na, löschen wir mal ...	240	unbekannt	13.01.02 20:15
Re: Na, löschen wir mal ...	58	Atlan	13.01.02 21:10
Re: Na, löschen wir mal ...	252	unbekannt	14.01.02 00:22
Re: Na, löschen wir mal ...	44	Atlan	14.01.02 23:37
Re: Na, löschen wir mal ...	35	Atlan	16.01.02 09:56
Re: Na, löschen wir mal ...	43	Atlan	16.01.02 19:59
Hi ... Hi ....	438	unbekannt	16.01.02 20:06
Re: Hi ... Hi ....	46	Atlan	16.01.02 21:50
So isses ... fast ... Good work! (oT)	240	unbekannt	16.01.02 21:55
Naja, wenn einige bei Snake so mitgedacht hätten ... uiii	361	unbekannt	16.01.02 22:11
Re: Naja, wenn einige bei Snake so mitgedacht hätten ... uii...	44	Atlan	17.01.02 10:56
Hi Lordchen	37	Atlan	20.01.02 11:29

Sie sind nicht angemeldet! Um auf diesen Beitrag zu antworten oder neue Beiträge schreiben zu können, müssen Sie sich zunächst anmelden. Einloggen  |  Neu registrieren

Funktionen:  Zum Thema  |  Gesamtübersicht

Suchen