vb@rchiv
VB Classic
VB.NET
ADO.NET
VBA
C#
 Mails senden, abrufen und decodieren - ganz easy ;-)  
 vb@rchiv Quick-Search: Suche startenErweiterte Suche starten   Impressum  | Datenschutz  | vb@rchiv CD Vol.6  | Shop Copyright ©2000-2025
 
zurück

 Sie sind aktuell nicht angemeldet.Funktionen: Einloggen  |  Neu registrieren  |  Suchen

Fortgeschrittene Programmierung
Re: The LargeSeekPointer Class 3. 
Autor: tinzu
Datum: 18.09.08 21:06
Sali

Ich habs glaube ich immer noch nicht ganz gecheckt.

So wie ich es verstanden habe sollte ich mit SeekAndGet so eine Art Fenster definieren das mit den beiden Variablen lolng und hilong den oberen und unteren Rand definiert und mit nlen hole ich die Maximale Datenmenge aus GetLoFileSize in einen String. Ist das richtig?

Nun meine Frage:
Kann das sein, dass ich so den Anfang des Files nicht sauber erwische und beim lesen des nächsten Blockes ein paar Bytes verliere?

Oder bin ich da ganz auf dem Holzweg und muss es anders anpacken?

Wenn ich mit lGet Daten lese bekomme ich den Anfang der Daten korrekt und müsste dann mit LSeek den Pointer immer weiter schieben können.

Sub testread()
'
'ARETeilwege.txt 4'236'023 KB
'
'Inhalt:
'*
'* Tabelle: ÖV-Teilwege
'$OEVTEILWEG:QBEZNR;ZBEZNR;WEGIND;TWEGIND;PFAHRT;VONHPUNKTNR;NACHHPUNKTNR;FAHRZEITPROFIL\VSYSCODE
'1;3;1;1;0.172;;8573733;
'1;3;1;4;0.172;8502224;8502222;ZUG
'1;3;2;1;0.134;;8573733;
'
'viele viele viele Zeilen hab noch keine Ahnung wieviele
'
Dim cF As clsLargeSeekPtr

Set cF = New clsLargeSeekPtr

cF.FileOpen "E:\Mosi\VB\BigFiles\ARETeilwege.txt", OpenExist

Debug.Print "FileHandle = "; cF.FileHandle
Debug.Print "GetHiFileSize = "; cF.GetHiFileSize
Debug.Print "GetLoFileSize = "; cF.GetLoFileSize
Debug.Print "GetHiFileSize = "; cF.GetHiFileSize

Debug.Print "LoSeekPinter vor lesen=> "; cF.LoSeekPointer
Debug.Print "HiSeekPoiner vor lesen => "; cF.HiSeekPointer
'
'Ersten Block des Files lesen
'
s = cF.SeekAndGet(cF.LoSeekPointer, cF.HiSeekPointer, cF.GetLoFileSize)

For i = 1 To 60 'Muss sicher noch angepasst werden es gibt ja ein EOF irgendwie
'
'Hier könnte die Verarbeitung stehen
'
Debug.Print s
'
'Debug.Print "LoSeekPinter vor lesen=> "; cF.LoSeekPointer
'Debug.Print "HiSeekPoiner vor lesen => "; cF.HiSeekPointer

s = cF.SeekAndGet(cF.LoSeekPointer, cF.HiSeekPointer, cF.GetLoFileSize)

'Debug.Print "LoSeekPinter nach lesen=> "; cF.LoSeekPointer
'Debug.Print "HiSeekPoiner nach lesen => "; cF.HiSeekPointer
Next i

End Sub
alle Nachrichten anzeigenGesamtübersicht  |  Zum Thema  |  Suchen

 ThemaViews  AutorDatum
Sehr grosses Textfile lesen1.826tinzu08.09.08 19:01
Re: Sehr grosses Textfile lesen1.207VBStein08.09.08 19:10
Re: Sehr grosses Textfile lesen1.206tinzu08.09.08 19:16
Re: Sehr grosses Textfile lesen1.178icetea12308.09.08 19:20
Re: Sehr grosses Textfile lesen1.188VBStein08.09.08 20:01
Re: Sehr grosses Textfile lesen1.144tinzu08.09.08 20:31
Re: Sehr grosses Textfile lesen1.163VBStein08.09.08 20:52
Re: Sehr grosses Textfile lesen1.245effeff09.09.08 10:02
Re: Sehr grosses Textfile lesen1.161VBStein09.09.08 23:06
Re: Sehr grosses Textfile lesen1.162effeff10.09.08 09:26
Re: Sehr grosses Textfile lesen1.109tinzu10.09.08 17:12
Re: Sehr grosses Textfile lesen1.107VBStein10.09.08 18:30
Re: Sehr grosses Textfile lesen1.095VBStein10.09.08 20:09
Re: Sehr grosses Textfile lesen1.135tinzu10.09.08 20:24
Re: Sehr grosses Textfile lesen1.113VBStein10.09.08 20:38
Re: Sehr grosses Textfile lesen1.109tinzu10.09.08 20:55
Re: Sehr grosses Textfile lesen1.089TheNukeduke13.09.08 12:16
Re: Sehr grosses Textfile lesen1.084tinzu14.09.08 19:22
Re: Sehr grosses Textfile lesen1.046VBStein14.09.08 22:33
The LargeSeekPointer Class1.131VBStein15.09.08 18:01
Re: The LargeSeekPointer Class 2.1.121VBStein15.09.08 18:02
Re: The LargeSeekPointer Class 3.1.202VBStein15.09.08 18:02
Re: The LargeSeekPointer Class 3.1.057tinzu16.09.08 21:50
Re: The LargeSeekPointer Class 3.1.073VBStein17.09.08 19:28
Re: The LargeSeekPointer Class 3.1.051tinzu17.09.08 20:23
Re: The LargeSeekPointer Class 3.1.071VBStein17.09.08 21:25
Re: The LargeSeekPointer Class 3.1.041tinzu18.09.08 21:06
Re: The LargeSeekPointer Class 3.1.107VBStein18.09.08 21:39
Re: The LargeSeekPointer Class 3.1.097tinzu18.09.08 22:25
Re: The LargeSeekPointer Class 3.1.102tinzu23.09.08 18:23
Re: The LargeSeekPointer Class 3.1.093tinzu23.09.08 18:34
Re: The LargeSeekPointer Class 3.1.007VBStein23.09.08 19:07
Re: Sehr grosses Textfile lesen1.131tinzu23.09.08 18:33

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übersichtSuchen 

nach obenzurück
  
   

Copyright ©2000-2025 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