Article View: be.comp.programming
Article #4123Re: bestanden zoeken op diskette
From: Jurjen de Groot
Date: Fri, 26 Sep 2003 21:21
Date: Fri, 26 Sep 2003 21:21
36 lines
2195 bytes
2195 bytes
Wat dacht je van het 'dir' commando.
Dim sFileName As String
sFileName = Dir("a:\*.zin", vbNormal)
While sFileName <> ""
List1.AddItem (sFileName)
sFileName = Dir
Wend
Bovenstaande zoekt alle *.zin bestanden op in A:\ en plaatst deze in een
listbox op het form.
gr. Jurjen.
"Cliff Beeckman" <cliffbeeckman@pandora.be> wrote in message
news:cE%cb.42084$334.2015289@phobos.telenet-ops.be...
> Ik zou graag vanuit een menu de gebruiker een mogelijkheid willen bieden
om
> bepaalde bestanden op te halen van een diskette. Nadat men op de opdracht
> heeft geklikt wil ik een melding weergeven 'Gelieve de diskette in drive
A:
> te plaatsen." vervolgens zou ik willen dat mijn programma alle bestanden
met
> de extensie .zin opspoort op de diskette (inclusief mappen en submappen)
en
> deze bestanden vervolgens in een lijst plaats. Iemand een idee hoe ik dit
> kan aanpakken?
>
> Alvast bedankt,
>
> Cliff Beeckman.
>
>
Technical Details
Message-ID:
<3f74adbb$0$8928$e4fe514c@dreader8.news.xs4all.nl>Path:
arc1-ca.pugleaf.net!archiver1.google.com!news1.google.com!sn-xit-02!sn-xit-03!sn-xit-01!sn-xit-09!supernews.com!216.170.153.135.MISMATCH!tdsnet-transit!newspeer.tds.net!news-out1.nntp.be!propagator2-sterling!news-in-sterling.nuthinbutnews.com!news-spur1.maxwell.syr.edu!news.maxwell.syr.edu!transit.news.xs4all.nl!rhinewceros.xs4all.nl!not-for-mailReferences:
<cE%cb.42084$334.2015289@phobos.telenet-ops.be>Show Full Headers
Complete Article Headers
X-Google-Language: DUTCH,ASCII-7-bit X-Google-Thread: 107324,3cb9c92e455bd078 X-Google-Attributes: gid107324,public X-Google-Thread: fcea4,3cb9c92e455bd078 X-Google-Attributes: gidfcea4,public X-Google-ArrivalTime: 2003-09-26 14:21:05 PST Path: arc1-ca.pugleaf.net!archiver1.google.com!news1.google.com!sn-xit-02!sn-xit-03!sn-xit-01!sn-xit-09!supernews.com!216.170.153.135.MISMATCH!tdsnet-transit!newspeer.tds.net!news-out1.nntp.be!propagator2-sterling!news-in-sterling.nuthinbutnews.com!news-spur1.maxwell.syr.edu!news.maxwell.syr.edu!transit.news.xs4all.nl!rhinewceros.xs4all.nl!not-for-mail Reply-To: "Jurjen de Groot" <gits@xs4all.nl> From: "Jurjen de Groot" <gits@xs4all.nl> Newsgroups: be.comp.programming,nl.comp.programmeren References: <cE%cb.42084$334.2015289@phobos.telenet-ops.be> Subject: Re: bestanden zoeken op diskette Date: Fri, 26 Sep 2003 23:21:13 +0200 X-Priority: 3 X-MSMail-Priority: Normal X-Newsreader: Microsoft Outlook Express 6.00.2800.1158 X-MimeOLE: Produced By Microsoft MimeOLE V6.00.2800.1165 Lines: 38 Message-ID: <3f74adbb$0$8928$e4fe514c@dreader8.news.xs4all.nl> NNTP-Posting-Host: 213.73.246.168 X-Trace: 1064611259 dreader8.news.xs4all.nl 8928 jdgroot/213.73.246.168:17780