|
| Autor |
Nachricht |
base_1001 Tutorial Leser

Anmeldedatum: 01.05.2008 Beiträge: 22
|
TextDatei aus Zeile Zeichen entfernen
Verfasst am: 26.09.2008, 19:48 |
|
|
Hallo Leutz Ich wollte ein Prog schreiben, dass aus eine Text datei einliest. Dann in in jeder Zeile, von 1. Teichen bis zum 17. Zeichen alles entfernt. Sagen wir wir haben in jeder Zeile sowas stehen:
asdasdasdsfasf Hallo guten Tag asdasdasdsfasf Hey Ho wie gehts asdasdasdsfasf Juten Tach asdasdasdsfasf Ja das Ananas
Dann will ich, dass es immer "asdasdasdsfasf" das entfernt, und abspeichert. Kann da jemand behilflich sein?
Danke schonmal im voraus |
|
| |
|
 |
LooneyToons Poster

Anmeldedatum: 01.05.2008 Beiträge: 125
|
Verfasst am: 26.09.2008, 19:54 |
|
|
ich könnte dir jetzt den source Code geben , aber da lernste ja nix xD
also Du liest die Datei in einen String ein. Dannach Replacest du die sachen die du weg haben willst mit dem command -Replace() Dannach schreibste wieder in die datei rein x) |
|
| |
|
 |
base_1001 Tutorial Leser

Anmeldedatum: 01.05.2008 Beiträge: 22
|
Verfasst am: 26.09.2008, 19:58 |
|
|
Ja, ich hatte vor 6 Monaten noch VB programmiert. Aber hab alles wieder vergessen... Ich brauch das unbedingt für eine Datei...
Ich glaub da war irgendwas mit Open Dateiname for Input as #1 usw...
Das mit dem SourceCode könnte mir helfen... =)
Edit: Ein Problem ist auch noch, dass die Zeichen unterschiedlich sind.
001asdasdasd002 Hallo Guten Tag 001asdahhhsd002 Hallo Guten Tag 001asdasdasd002 Hallo Guten Tag 0015asasdasd002 Hallo Guten Tag 001asda5dhsd002 Hallo Guten Tag
Da am Anfang steht immter sowas, aber es fängt immer z.B mit 001 an, und hört mit 002 auf. Aber mittendrin steht immer etwas anderes. |
|
| |
|
 |
sollniss Überflieger

Anmeldedatum: 01.05.2008 Beiträge: 699
|
Verfasst am: 26.09.2008, 20:42 |
|
|
Gibts in VB6 nicht sowas wie Substring oder Remove? Damit wärs ganz easy, weils ja immer 17 Zeichen sind. |
|
| |
|
 |
christopher.g Überflieger

Anmeldedatum: 03.05.2008 Beiträge: 565
|
Verfasst am: 26.09.2008, 20:56 |
|
|
und was hälst du von mid$??
ganz leicht
Visual Basic: [code]
Dim data As String
text1.Text = Mid$(data, 17, Len(data))
[/code]
heisst...
data = der string den du eingelesen hast
17 = der startpunkt
len(data) = gibt die länge des strings zurück... somit hast du anfangpunkt und endpunkt und kannst den teil auslesen den du brauchst |
|
| |
|
 |
sollniss Überflieger

Anmeldedatum: 01.05.2008 Beiträge: 699
|
Verfasst am: 27.09.2008, 11:40 |
|
|
Das is doch das selbe wie Substring.  |
|
| |
|
 |