Eigentlich logisch, aber da muß man sich erst an die Eigenheiten der Heap-Verwaltung gewöhnen.Code:''Marvin42xxxxxxxxx-------------Ab hier wird es spannend-------------------------- '----Ab hier neu Key = Key.Remove(CsvLen, Key.Length - CsvLen) 'NEWNEWNEW '(Autor:PicNick) 20.11.2006 21:09 GG CsvLen = RnCsvRdVal(CsvRef, Val) ' ergibt “Valuex” Val = Val.Remove(CsvLen, Val.Length - CsvLen) 'NEWNEWNEW '(Autor:PicNick) 20.11.2006 21:09 GG '----Bis hier 'Post PicNick: ' CsvLen = RnCsvRdKey(CsvRef, key) ' While CsvLen <> 0 ' Key = Key.Remove(CsvLen, Key.Length - CsvLen) NEWNEWNEW ' CsvLen = RnCsvRdVal(CsvRef, val) ' Val = Val.Remove(CsvLen, Val.Length - CsvLen) NEWNEWNEW '.... '----------------------------- DoCommand(Key, Val) 'Ab zur Befehlsauswertung '----------------------------- '----------------------------------------------------- 'wichtig wichtig wichtig wichtig wichtig wichtig wichtig wichtig '----------------------------------------------------- 'durch das .Remove sind die strings KEY & VAL ja jetzt möglicherweise zu kurz geworden ' wir brauchen also wieder neue in voller Länge ' das ist so auch bei den anderen "CSV" lese-sachen ' Fällt nur auf, wenn erst ein kurzer und dann ein langer "Key" oder "value" kommt. Key = New String(" ", 64) ' 64 = maximallänge Key oder Value Val = New String(" ", 64) '----------------------------------------------------- 'wichtig wichtig wichtig wichtig wichtig wichtig wichtig wichtig '----------------------------------------------------- CsvLen = RnCsvRdKey(CsvRef, Key) 'Next End While CsvLen = RnCsvDrop(CsvRef) 'Freigeben der Buffer
Tut leid'aber wir lernen ja dazu.
![]()







Zitieren

Lesezeichen