Re: LOF maximum lengte 2048 ?

Article View: be.comp.programming

Article #7008

Back to be.comp.programming Previous Next

#7008

From: Bart Vanwijnsberghe
Date: Thu, 24 Oct 2002 21:38

34 lines
2343 bytes

"Egg"...
> "Bart Vanwijnsberghe"...
> > Ik zou moeten een file inlezen in een tekstbox in Access XP. Ik heb
> > daarvoor volgende code:
>
> Echt niet!
> Zie de verbeterde code.
> ps: Input$ (of Input voor variantjes) is alleen voor binary data. Als je
het
> open 'for input' dan heb je inderdaad je limiet van 2048.
> Als je regel voor regel wilt lezen gebruik je dus Line Input #hFile,
sRegel$
>
> > Private Sub Form_Load()
> >     Dim file As String
> >     file = "D:\Mijn documenten\testAccess\test.html"
> Dim hFile as Integer
> hFile = FreeFile
> >     Open file For Binary As #hFile
> >     FileLength = LOF(hFile)
> >     Debug.Print FileLength
> >     mailtekst.SetFocus
>      mailtekst.Text = Input(LOF(1), #1)
> Mailtext.Text = Input$(Lof(hFile))

Ik neem aan dat u hier iets vergeten was:     mailtekst.Text =
Input$(LOF(hFile), #hFile)

> Close #hFile

Maar verder dan 2048 geraak ik niet hoor.

mvg
Bart

Technical Details

Message-ID: <TLZt9.177174$8o4.28452@afrodite.telenet-ops.be>

Path:

arc1-ca.pugleaf.net!archiver1.google.com!news1.google.com!sn-xit-03!sn-xit-06!sn-xit-08!supernews.com!newsfeed.online.be!skynet.be!skynet.be!ossa.telenet-ops.be!afrodite.telenet-ops.be.POSTED!not-for-mail

References: <bmYt9.177078$8o4.28363@afrodite.telenet-ops.be> <ap9n9s$p5d$1@beast.euro.net>

Show Full Headers

Complete Article Headers

X-Google-Language: DUTCH,ASCII-7-bit
X-Google-Thread: 107324,dc7e0de2aed95b63
X-Google-Attributes: gid107324,public
X-Google-Thread: fcea4,dc7e0de2aed95b63
X-Google-Attributes: gidfcea4,public
X-Google-ArrivalTime: 2002-10-24 14:42:25 PST
Path: arc1-ca.pugleaf.net!archiver1.google.com!news1.google.com!sn-xit-03!sn-xit-06!sn-xit-08!supernews.com!newsfeed.online.be!skynet.be!skynet.be!ossa.telenet-ops.be!afrodite.telenet-ops.be.POSTED!not-for-mail
Reply-To: "Bart Vanwijnsberghe" <bartvanwijnsberghe@DELETE!!SPAMyahoo.com>
From: "Bart Vanwijnsberghe" <bartvanwijnsberghe@DELETE!!SPAMyahoo.com>
Newsgroups: be.comp.programming,nl.comp.programmeren
References: <bmYt9.177078$8o4.28363@afrodite.telenet-ops.be> <ap9n9s$p5d$1@beast.euro.net>
Subject: Re: LOF maximum lengte 2048 ?
Lines: 35
MIME-Version: 1.0
Content-Type: text/plain;
 charset="utf-8"
Content-Transfer-Encoding: 7bit
X-Priority: 3
X-MSMail-Priority: Normal
X-Newsreader: Microsoft Outlook Express 5.50.4920.2300
X-MimeOLE: Produced By Microsoft MimeOLE V5.50.4920.2300
Message-ID: <TLZt9.177174$8o4.28452@afrodite.telenet-ops.be>
Date: Thu, 24 Oct 2002 21:38:59 GMT
NNTP-Posting-Host: 213.224.121.211
X-Complaints-To: abuse@telenet.be
X-Trace: afrodite.telenet-ops.be 1035495539 213.224.121.211 (Thu, 24 Oct 2002 23:38:59 MET DST)
NNTP-Posting-Date: Thu, 24 Oct 2002 23:38:59 MET DST
Organization: Telenet Internet

Reply to Parent Message