[vb.net] ende einer datei herausfinden [erledigt]

iNFiNiTE

God

samedi 1 avril 2006, 18:22

1

lösung weiter unten

moin moin,

weiß jmd, wie ich unter visual basic .net herausfinden kann, wann eine datei eben zuende ist ?

möchte ein file zeile für zeile auslesen (text sowie binär files), dachte da an eine while schleife.. nur wie weiß ich, wann eine datei zuende ist ?
sowas wie while (line <> nothing) funkt nur halb, denn sobald in ner text datei eine zeile blank ist, erkennt er das als datei ende..

messi

Multiswitch Script Generator NG | Aquaero2Multiswitch | Ae Relais | Verkaufe AT Plexi!

DAP

God

Re: [vb.net] wie ende einer datei herausfinden ?

samedi 1 avril 2006, 18:30

2

Citation de "messi@planung"

moin moin,

weiß jmd, wie ich unter visual basic .net herausfinden kann, wann eine datei eben zuende ist ?

möchte ein file zeile für zeile auslesen (text sowie binär files), dachte da an eine while schleife.. nur wie weiß ich, wann eine datei zuende ist ?
sowas wie while (line <> nothing) funkt nur halb, denn sobald in ner text datei eine zeile blank ist, erkennt er das als datei ende..

messi

ich hab nicht wirklich ahnung von vb, aber früher zu vb6-zeiten ging da so:

do while not eof(1)

wobei "1" die dateinummer ist

iNFiNiTE

God

Re: [vb.net] wie ende einer datei herausfinden ?

samedi 1 avril 2006, 18:33

3

ich habs nun probiert mit

	Code source
1 2 3	Do Until (inputstream1.Peek = -1) Or (inputstream2.Peek = -1) [...] Loop

das problem ist, dass das nun bei einer datei klappt, aber bei ner anderen ned..

edit:

Citation de ".dap"

ich hab nicht wirklich ahnung von vb, aber früher zu vb6-zeiten ging da so:

do while not eof(1)

wobei "1" die dateinummer ist

do while not eof(1)
gibts auch bei vb.net noch.. nur was meinst du mit dateinummer ? ich würd eigentlich gerne den pfad durchgeben, ala c:\test.txt

messi

Multiswitch Script Generator NG | Aquaero2Multiswitch | Ae Relais | Verkaufe AT Plexi!

Azr@el

Full Member

Re: [vb.net] wie ende einer datei herausfinden ?

samedi 1 avril 2006, 20:41

4

.dap's lösung ist vb6.

Eine adäquate .net lösung sähe in etwa so aus, das du deinen StreamReader solange ReadLine durchführen lässt, bis der rückgabe wert der methode Nothing ist.

Kann der Reader also keine weitere zeile mehr lesen, gibt er einfach nichts zurück. Daraus müsste man dann eine schöne Do Until schleife bauen:

	Code source
1 2 3 4 5	dim r as string Do r= MyStreamreader.readline console.writeline(r) loop until r = nothing

Jabber-ID: |Azrael|@jabber.ccc.org

Y0Gi

God

Re: [vb.net] wie ende einer datei herausfinden ?

samedi 1 avril 2006, 20:51

5

Ihr wollt mir doch nicht erzählen, dass es für VB(.NET) für so rudimentären Kram wie das Lesen von Dateien kein Cookbook-Rezept oder sowas gibt? Steht das in keinem Buch, nirgends im Internet? Sowas sollte (auch) jeder VB-Programmierer wie aus der Pistole geschossen sofort hintippen können.

This is my sick nature. – NorthCon // LANresort Bispingen // BYCEPS (LAN party software platform) // OrgaTalk (LAN party orga board)

iNFiNiTE

God

Re: [vb.net] wie ende einer datei herausfinden ?

samedi 1 avril 2006, 22:52

6

Citation de "Azr@el"
.dap's lösung ist vb6.

Eine adäquate .net lösung sähe in etwa so aus, das du deinen StreamReader solange ReadLine durchführen lässt, bis der rückgabe wert der methode Nothing ist.

Kann der Reader also keine weitere zeile mehr lesen, gibt er einfach nichts zurück. Daraus müsste man dann eine schöne Do Until schleife bauen:
Code source
1
2
3
4
5
dim r as string 
Do 
 r= MyStreamreader.readline
 console.writeline(r)
loop until r = nothing

genau das hab ich drin azrael.. das problem ist nur (wie oben auch beschrieben) sobald eine zeile leer ist beendet er das ganze, auch wenns zbsp in nem text nur ne leerzeile ist.

edit:
habs nu rausgefunden, funkt am besten mit:

	Code source
1 2 3	Do Until (inputstream1.Peek = -1) [...] Loop

da ich zwei files hatte, wo der loop gleichzeitig laufen musste hatte ich ausversehen ein OR anstelle eines AND gebraucht, nun klappt es wunderbarst.

messi

Multiswitch Script Generator NG | Aquaero2Multiswitch | Ae Relais | Verkaufe AT Plexi!

Azr@el

Full Member

Re: [vb.net] wie ende einer datei herausfinden ?

samedi 1 avril 2006, 23:02

7

Oh, verzeihung, mein fehler

	Code source
1 2 3 4 5	dim r as string Do r= MyStreamreader.readline console.writeline(r) loop until r IS nothing

@Y0Gi: Extremst sinniger post...

Jabber-ID: |Azrael|@jabber.ccc.org

iNFiNiTE

God

Re: [vb.net] wie ende einer datei herausfinden ?

samedi 1 avril 2006, 23:05

8

siehe meinen edited post oben, azrael

endgültig siehts bei mir so aus:

Code source

Do Until (inputstream1.Peek = -1) And (inputstream2.Peek = -1)
                If line1 = line2 Then
                    line1 = inputstream1.ReadLine
                    line2 = inputstream2.ReadLine
                ElseIf line1 <> line2 Then
                    identiek = identiek + 1
                    line1 = inputstream1.ReadLine
                    line2 = inputstream2.ReadLine
                End If
            Loop

messi

Multiswitch Script Generator NG | Aquaero2Multiswitch | Ae Relais | Verkaufe AT Plexi!

Y0Gi

God

Re: [vb.net] ende einer datei herausfinden [erledi

samedi 1 avril 2006, 23:15

9

http://msdn2.microsoft.com/en-US/library…x8w(VS.80).aspx
http://visualbasic.ittoolbox.com/documents/popular-q-and-a/reading-a-file-in-visual-basic-2847
http://www.vbwm.com/articles/builder/viewer.asp?ArticleID=15
http://www.other-space.com/vb/part2/files.html
http://www.codecomments.com/archive293-2006-2-814071.html

This is my sick nature. – NorthCon // LANresort Bispingen // BYCEPS (LAN party software platform) // OrgaTalk (LAN party orga board)

iNFiNiTE

God

Re: [vb.net] ende einer datei herausfinden [erledi

dimanche 2 avril 2006, 11:50

10

darf man fragen, nachwas du gegoogled hast `? ich hab solche ergebnisse nicht gefunden

messi

Multiswitch Script Generator NG | Aquaero2Multiswitch | Ae Relais | Verkaufe AT Plexi!

Y0Gi

God

Re: [vb.net] ende einer datei herausfinden [erledi

dimanche 2 avril 2006, 14:45

11

"visual basic" read file (multiple)

This is my sick nature. – NorthCon // LANresort Bispingen // BYCEPS (LAN party software platform) // OrgaTalk (LAN party orga board)

Azr@el

Full Member

Re: [vb.net] ende einer datei herausfinden [erledi

dimanche 2 avril 2006, 14:48

12

nimm meinen letzten code, der ist schöner

ich hatte deinen post schon gelesen, keine sorge, und daraufhin meinen code berichtigt.

Jabber-ID: |Azrael|@jabber.ccc.org

iNFiNiTE

God

Re: [vb.net] ende einer datei herausfinden [erledi

dimanche 2 avril 2006, 15:34

13

Citation de "Azr@el"

nimm meinen letzten code, der ist schöner

ich hatte deinen post schon gelesen, keine sorge, und daraufhin meinen code berichtigt.

sry, aber ich glaub immer noch nid dass dein code stimmt.. weil sobald in ner txt file zbsp ne leerzeile is, steigt den code doch direkt aus ?

deine lösung klappt doch.. ist sogar noch viel besser als das mit dem peek, weil peek aussteigt, wenn die datei nur eine zeile beinhaltet.

wo besteht denn der unterschied zwischen IS und = ?

messi

Multiswitch Script Generator NG | Aquaero2Multiswitch | Ae Relais | Verkaufe AT Plexi!