Re: VBA: LOF maximum lengte 2048 ?

Article View: be.comp.programming

Article #6921

Back to be.comp.programming Previous Next

#6921

From: Hace
Date: Sun, 03 Nov 2002 11:02

41 lines
2323 bytes

Bart Vanwijnsberghe schreef:

>> Je kunt de file per regel of per byte proberen in te lezen, door een
>> loopje te gebruiken en te testen op EOF (end of file).
>> 
>> Bijvoorbeeld iets als:
>> 
>> Open sFileName For Input As #1
>> Do While Not EOF(1)
>>   Line Input #1, strRegel
>>   mailtekst.Text = mailtekst.Text & strRegel
>> Loop
>> Close #1
>
>Dat werkt ook niet, zelfde foutmelding :-(

Huh? Vreemd. Wat voor bestand lees je eigenlijk in? Is het een
binary-bestand ipv een tekst-bestand soms? Zo ja: waarom wil je een
binary bestand in een tekstbox plaatsen?


dim reclength as long
reclength = 1
Dim filenumber As Long
filenumber = FreeFile
Dim dummy As Byte

' lees in byte voor byte   
Open m_strFile For Random As filenumber Len = reclength
    For x = 0 to filesize(m_strFile)
        Get filenumber, x, dummy
        ' doet iets met dummy...
    Next x
close filenumber



-- 
  anti-rsi software at: http://hace.dyndns.org/files/rsibreakreminder/
  Learning to quote with outlook express:
  http://home.in.tum.de/~jain/software/quotefix.php

Technical Details

Message-ID: <3dc7003a.8511989@192.168.0.1>

Path:

arc1-ca.pugleaf.net!archiver1.google.com!news1.google.com!sn-xit-03!sn-xit-06!sn-xit-04!supernews.com!news.maxwell.syr.edu!newsfeed.icl.net!newsfeed.fjserv.net!newsfeed.icl.net!newsfeed.fjserv.net!newsfeed.freenet.de!amsnews01.chello.com!amstwist00.POSTED!not-for-mail

References:

<bmYt9.177078$8o4.28363@afrodite.telenet-ops.be> <3dbb3697.1996781@192.168.0.1> <jKfv9.183284$8o4.29052@afrodite.telenet-ops.be>

Show Full Headers

Complete Article Headers

X-Google-Language: DUTCH,ASCII-7-bit
X-Google-Thread: fcea4,dc7e0de2aed95b63
X-Google-Attributes: gidfcea4,public
X-Google-Thread: 107324,dc7e0de2aed95b63
X-Google-Attributes: gid107324,public
X-Google-ArrivalTime: 2002-11-03 03:14:03 PST
Path: arc1-ca.pugleaf.net!archiver1.google.com!news1.google.com!sn-xit-03!sn-xit-06!sn-xit-04!supernews.com!news.maxwell.syr.edu!newsfeed.icl.net!newsfeed.fjserv.net!newsfeed.icl.net!newsfeed.fjserv.net!newsfeed.freenet.de!amsnews01.chello.com!amstwist00.POSTED!not-for-mail
User-Agent: Hamster/1.3.23.3
From: hace_x@yahoo.com (Hace)
Newsgroups: be.comp.programming,nl.comp.programmeren
Subject: Re: VBA: LOF maximum lengte 2048 ?
Message-ID: <3dc7003a.8511989@192.168.0.1>
References: <bmYt9.177078$8o4.28363@afrodite.telenet-ops.be> <3dbb3697.1996781@192.168.0.1> <jKfv9.183284$8o4.29052@afrodite.telenet-ops.be>
X-Newsreader: Forte Agent 1.5/32.452
MIME-Version: 1.0
Content-Type: text/plain; charset=us-ascii
Content-Transfer-Encoding: 7bit
Lines: 41
Date: Sun, 03 Nov 2002 11:02:45 GMT
NNTP-Posting-Host: 62.194.68.94
X-Complaints-To: abuse@chello.com
X-Trace: amstwist00 1036321666 62.194.68.94 (Sun, 03 Nov 2002 12:07:46 MET)
NNTP-Posting-Date: Sun, 03 Nov 2002 12:07:46 MET

Reply to Parent Message