| |
Visual-Basic EinsteigerMehrere Textdateien gleichzeitig öffnen | | | Autor: Spike | Datum: 17.09.01 20:49 |
| Und nochmal brauche ich Hilfe
Ich möchte innerhalb einer Schleife zwei Dateien öffnen.
Die erste ist eine Textdatei, aus der ich Informationen hole und in die zweite Datei (INI-Datei) möchte ich etwas schreiben!
Nun bekomme ich aber immer die Meldung, das die Datei bereits geöffnet sei! | |
Re: Mehrere Textdateien gleichzeitig öffnen | | | Autor: Dieter (Moderator) | Datum: 17.09.01 20:55 |
| Hi Spike,
Du musst jeder Datei mit einer eigenen File-Nummer öffnen. Also nicht mit Open... As #1 oder so, sondern folgendermassen:
<code>Dim F As Integer
F = FreeFIle
Open "Datei1.txt" For Input As #F
Dim N As Integer
N = FreeFIle
Open "Datei2.txt" For Output As #N</code> FreeFile ermittelt automatisch die nächste "freie" Dateinummer.
Cu
Dieter | |
Re: Mehrere Textdateien gleichzeitig öffnen | | | Autor: Spike | Datum: 17.09.01 21:02 |
| Er bringt aber trotzdem die Fehlermeldung, das die Datei bereits geöffnet ist! | |
Re: Mehrere Textdateien gleichzeitig öffnen | | | Autor: Dieter (Moderator) | Datum: 17.09.01 21:14 |
| Hallo Spike,
wen dem so ist, dann hast Du sicherlich vergessen, die Datei nach irgendeinem Öffnen- und Lese/Schreibvorgang wieder zu schliessen. Dann lässt sich die Datei nämlich nicht noch ein weiteres Mal öffnen.
Prüfe, das doch mal.
Cu
Dieter | |
Re: Mehrere Textdateien gleichzeitig öffnen | | | Autor: Spike | Datum: 17.09.01 21:21 |
| Die INI-Datei, die ich erstellen will, existiert noch gar nicht, deswegen kann sie nicht geöffnet sein.
Ich habe wie Du gesagt hast, der TXT-Datei, auzs der ich die Infos nehme mit
Open sFilename For Input As #F
geöffnet, und nun möchte ich mit
Open iniFile For Output As #N
die INI-Datei erstellen bzw. öffnen, doch immer beim ersten Open-Befehl meldet er, das die Datei bereits geöffnet ist! Aber keine der beiden ist geöffnet! | |
Re: Mehrere Textdateien gleichzeitig öffnen | | | Autor: Dieter (Moderator) | Datum: 17.09.01 21:32 |
| Hi Spike,
also eine Datei mit ...For Input zu öffnen, die gar nicht existiert erzeugt aber nicht den Fehler 55 Datei bereits geöffnet, sondern vielmehr den Fehler 53 Datei nicht gefunden.
Kann es sein, dass Du versuchst zwei Dateien mit ein- und dergleichen Dateinummer zu öffnen?
Cu
Dieter | |
Ich habs | | | Autor: Spike | Datum: 17.09.01 21:42 |
| Ich habe die beiden Dateien mit #F und #N geöffnet, und zuvor beiden FreeFile zugewiesen!
Das war der Fehler! Jetzt habe ich manuell eine Dateinummer vergeben (1 und 2) und nun funktionierts... | |
Re: Ich habs | | | Autor: Dieter (Moderator) | Datum: 17.09.01 21:56 |
| Hallo Spike,
das ist aber nicht gerade die beste Lösung.
Ich persönlich verwende niemals feste Dateinnummern.
Wenn Du FreeFile mehrfach hintereinander verwendest, musst Du nur darauf achten, dass Du die Datei nach dem ersten ..=FreeFile auch gleich öffnest und erst dann wiederum .. = FreeFile verwendest. Sonst haben beide Variablen die gleiche Dateinummer - und dann kommt es wieder zu besagtem Fehler.
Wie dem auch sei... Nur als Hinweis gemeint.
Cu
Dieter | |
Danke | | | Autor: Spike | Datum: 17.09.01 22:28 |
| Danke Dieter, ich werds gleich noch abändern! | |
| 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 |
|
|
sevZIP40 Pro DLL
Zippen und Unzippen wie die Profis!
Mit nur wenigen Zeilen Code statten Sie Ihre Anwendungen ab sofort mit schnellen Zip- und Unzip-Funktionen aus. Hierbei lassen sich entweder einzelnen Dateien oder auch gesamte Ordner zippen bzw. entpacken. Weitere InfosTipp des Monats Access-Tools Vol.1
Über 400 MByte Inhalt
Mehr als 250 Access-Beispiele, 25 Add-Ins und ActiveX-Komponenten, 16 VB-Projekt inkl. Source, mehr als 320 Tipps & Tricks für Access und VB
Nur 24,95 EURWeitere Infos
|
|
|
Copyright ©2000-2024 vb@rchiv Dieter Otter Alle Rechte vorbehalten.
Microsoft, Windows und Visual Basic sind entweder eingetragene Marken oder Marken der Microsoft Corporation in den USA und/oder anderen Ländern. Weitere auf dieser Homepage aufgeführten Produkt- und Firmennamen können geschützte Marken ihrer jeweiligen Inhaber sein.
Diese Seiten wurden optimiert für eine Bildschirmauflösung von mind. 1280x1024 Pixel
|
|