Visual Basic Forum

Visual Basic Forum
für VB6 und VB.NET Programmierer
 
RegistrierenRegistrieren  LoginLogin
Neues Thema eröffnen   Neue Antwort erstellen    Visual Basic Forum Foren-Übersicht -> [VB6] Fragen - Antworten
Autor
Nachricht
august_
Poster
Poster

Anmeldedatum: 04.08.2007
Beiträge: 181

Wort aus einer Text Datei löschn
Verfasst am: 08.02.2008, 00:18

Wie kann ich es machen,dass aus einer Text Datei ein bestimmtes Wort gelöscht wird.
zb: Er öffnet die Text Datei,sucht nach "blabla",löscht es und speicher wieder ab
 
Marduk_
« Moderator »<b><font color=green>« Moderator »</font



Anmeldedatum: 17.06.2007
Beiträge: 389


Verfasst am: 08.02.2008, 00:37

Am einfachsten machst du es, wenn du den Inhalt der Datei in eine Variable lädst, sie anschliessend nach dem gesuchten Wort durchsuchst und das Wort löscht. Den Inhalt der Datei dann wieder in die Datei schreiben, aber jetzt muss man die alte Datei entweder löschen und die Neue erstellen, oder gleich die alte Datei überschreiben lassen.
 
august_
Poster
Poster

Anmeldedatum: 04.08.2007
Beiträge: 181


Verfasst am: 08.02.2008, 01:02

Kannst du mir das bitte genauer erklären?
 
Hamtaro_
« Moderator »<b><font color=green>« Moderator »</font



Anmeldedatum: 06.05.2007
Beiträge: 217
Wohnort: NRW


Verfasst am: 08.02.2008, 09:04

1x googlen Rolling Eyes
http://www.schmittis-page.de/vb/t72.htm nach dem einlesen ersetzt du mit Mid(), InStr() und so deinen String..dann speicherst du die Textdatei wieder:
Code:
Dim a
Dim b

  a = FreeFile
  Open PfadzurDatei For Output As a
    Write #a, DeinText
  Close a


noch was:
http://www.activevb.de/tutorials/tut_text/textdateien.html

Link editiert
Wie findet ihr meine Sig?
 
RaG3!_
Poster
Poster

Anmeldedatum: 26.07.2007
Beiträge: 104


Verfasst am: 08.02.2008, 14:10

Hamtaro hat Folgendes geschrieben:
1x googlen Rolling Eyes
http://www.schmittis-page.de/vb/t72.htmnach dem einlesen ersetzt du mit Mid(), InStr() und so deinen String..dann speicherst du die Textdatei wieder:


Zitat:
Not Found
The requested URL /vb/t72.htmnach was not found on this server.
Wink
MFG RaG3
 
r4z3r_
« Webmaster »<b><font color=red>« Webmaster »</fo



Anmeldedatum: 06.02.2007
Beiträge: 252


Verfasst am: 08.02.2008, 14:22

Vielleicht wäre es auch mal angebracht das korrekte Dateisuffix zu verwenden und nicht .htmnach ... dann funktionierts auch

link editiert...
 
august_
Poster
Poster

Anmeldedatum: 04.08.2007
Beiträge: 181


Verfasst am: 08.02.2008, 16:11

Ich muss die erste und letzte Zeile löschen...?
 
ZiG_
Überflieger
Überflieger

Anmeldedatum: 07.03.2007
Beiträge: 1248


Verfasst am: 08.02.2008, 20:04

Wer sagt das du die erste und letzte Zeile löschen sollst?
Den Gedankengang kapier ich jetzt nicht ganz.^^

Also.
Einlesen mußt du die komplette Datei wie r4z3r schon sagte.
Liegt einfach daran, dass es so leicht ist die Position des gesuchten Wortes zu ermitteln.
Und weil schreiben/löschen einzelner Zeichen in einer Datei meist zu Blödsinn führt.

Beispiel einlesen:
Code:

Dim buffer as string
Open "Pfad" for Binary as #1
buffer = Space(LOF(1))
Get #1, , buffer
close #1


In buffer ist jetzt die komplette Datei.
Wenn es ein Wort an einer bestimmten Stelle sein soll, dann hilft die Instr und Mid weiter.
Ansonsten einfach per Replace das Wort oder die Wörter ersetzen.
Wer nicht auf seine Weise denkt, denkt überhaupt nicht. (Oscar Wilde)
 
august_
Poster
Poster

Anmeldedatum: 04.08.2007
Beiträge: 181


Verfasst am: 08.02.2008, 21:50

Ich hab damit gemeint, ich muss nur die 1. und letzte Zeile von einer Text Datei löschen,wie mach ich das?
 
ZiG_
Überflieger
Überflieger

Anmeldedatum: 07.03.2007
Beiträge: 1248


Verfasst am: 08.02.2008, 22:06


Eine Möglichkeit wäre, einfach die Datei Zeilenweise einzulesen und beim wieder schreiben die erste und letzte eben nicht schreiben.

Kannst die Zeilen in ein Array, ListView oder auch ne Listbox einlesen und dann wieder schreiben.
Wer nicht auf seine Weise denkt, denkt überhaupt nicht. (Oscar Wilde)
 
Neues Thema eröffnen   Neue Antwort erstellen    Visual Basic Forum Foren-Übersicht -> [VB6] Fragen - Antworten

Tags: datei, wort

 
 Verwandte Themen   Aufrufe   Letzter Beitrag 
Keine neuen Beiträge Überprüfen ob datei existiert 856 29.04.2007, 17:39
Keine neuen Beiträge Datei mit Listbox erstellen 742 28.03.2007, 13:39
Keine neuen Beiträge Mit Dateien arbeiten: Lehrzeile in Datei schreiben 602 19.03.2007, 16:45
Keine neuen Beiträge Textbox an php datei 756 23.02.2007, 21:09
Keine neuen Beiträge Datei einlesen.... 831 28.01.2007, 05:21
 


[ Time: 0.0951s ][ Queries: 109 (0.0350s) ][ GZIP on - Debug on ]