Hur kan det bli ett sådant fel när man öppnar en fil enligt detta sätt?
<code>
Open KursMapp & Lista & tmpNamn For Input As #2
längd = LOF(2)
sträng = Input(längd, #2)
Close #2
</code>

Nu är jag inte det minsta säker, men testa med langd=LOF(2)-1.

F.ö. bör du använda

FileNumber=Freefile
open ... for ... as #FileNumber
...
Close FilenNumber


/Niklas Jansson

Hej
Ett konstigt sätt att läsa en fil

Dim langd As Long ,FileNum As Long
Dim strBuffer As String
FileNum = FreeFile
Open KursMapp & Lista & tmpNamn For Binary As #FileNum
langd = LOF(FileNum)
strBuffer = Space$(langd)
Get #FileNum,,strBuffer
Close #FileNum

Nu har du hela filen i strBuffer , den som du kallat sträng

mvh
Sven

Tack för svaren.
Jag har alltid öppnat filer på det sättet, och det har fungerat bra.
Detta felet har jag aldrig haft tidigare, det var en kund som under någon omständighet fick detta fel. Har dock ingen aning om vad det kan berott på.

Hej
Då är det ju tur att kunden aldrig får se hur koden ser ut ;-)

DS

Kanske det.
Tycker dock att felet var konstigt, borde ju inte kunna bli Input past end of file när man kollar längden på filen på det sättet.

Svenpon, varför är det fel att öppna på mitt sätt?
Är det oeffektivt?

Hej
Nej kanske inte,har aldrig stött på detta sätt att läsa
att in data,men efter kontroll i manualer så ser jag att det är
helt Ok.Men det verkar som du kör med Variant rakt över
man bör nog se till att konsekvent använda deklarerade variabler.
Som sagts tidigare använd FreeFile för filnummer.

Dim FileNum As Long,tmpStr As String
FileNum = FreeFile
Open KursMapp & Lista & tmpNamn For Input As #FileNum
tmpStr = Input$(LOF(FileNum),FileNum)
Close # FileNum

Använd alltid Input$ när du jobbar mot strängar.

mvh
Sven

Jo jag vet att man ska använda $ vid strängar, men det är dålig vana jag har som är svår att bli av med.

Jag har givitvis deklarerat variablerna innan så jag kör inte med några Variant.

Jo man kanske bör använda FreeFile för att undgå vissa problem. Men det borde väl annars inte vara någon nackdel att t.ex. köra med #1 om man har ordenlig koll på att stänga filerna, och fånga upp fel om något uppstått.