/ Forside / Teknologi / Udvikling / VB/Basic / Nyhedsindlæg
Login
Glemt dit kodeord?
Brugernavn

Kodeord


Reklame
Top 10 brugere
VB/Basic
#NavnPoint
berpox 2425
pete 1435
CADmageren 1251
gibson 1230
Phylock 887
gandalf 836
AntonV 790
strarup 750
Benjamin... 700
10  tom.kise 610
Tælle linier i en tekstfil
Fra : Tommy Larsen


Dato : 09-03-03 22:40

Hejsa!

Lidt pinligt spørgsmål - jeg har lavet et program der trækker nogle
data ud fra en SQL server, skriver skidtet til en fil, og nu vil jeg
så gerne have talt hvor mange linier tekstfilen består af. Jeg har
prøvet mig lidt frem, men min metode duer ikke helt - jeg har f.eks.
prøvet med denne, men den giver mig nogle svar, som jeg ikke helt kan
forstå (jeg får et svar som skal divideres med 2, for at det passer
nogenlunde, men jeg prøvede med en fil på 81 linier, der fik jeg 79
oplyst!)

Open "C:\tempfil.txt" For Input As #1
counter = 0
Do While Not EOF(1)
Line Input #1, pladder
counter = counter + 1
Loop
MsgBox ("Filen er nu klar til brug, og der er i alt " & counter &
" linier i filen")
Close #1

Hvad er den rigtige fremgangsmåde?

Mvh. Tommy



 
 
Johnny E Jensen (10-03-2003)
Kommentar
Fra : Johnny E Jensen


Dato : 10-03-03 11:14

Hej Tommy

Din metode burde virke fint.
Kan det være din text view'er der evt. har wrappet en linie?? så du ser een
linie som 2?

Line Input læser i filen frem til næste EOL (end of line)
Jeg har selv brugt denne metode flere gange uden problemer.

Men hvis du selv har skrevet filen, kan du ligge et spec. tegn ved hver
record skift f.eks. '|'
og så tælle dette tegn.

/Johnny



Søg
Reklame
Statistik
Spørgsmål : 177500
Tips : 31968
Nyheder : 719565
Indlæg : 6408518
Brugere : 218887

Månedens bedste
Årets bedste
Sidste års bedste