■ 現在のこのページの役立ち度:
表示されない場合こちらのリンクからもご覧になれます。
■ このページの役立ち度を評価する:
役立ち度を評価してください。
(1(左):あまり役立たない - 5(右):大変役立った):
■ ページの共有:
[ サイト内検索 ]
カスタム検索
#27183-0フォルダ内のファイルの取得についてだいき2000-08-02(水) 22:43
     #27188-0RE#27183:フォルダ内のファイルの取得についてDMN2000-08-03(木) 00:13
     #27192-0RE#27188:フォルダ内のファイルの取得についてだいき2000-08-03(木) 01:08
     #27194-0RE#27192:フォルダ内のファイルの取得について魔界の仮面弁士2000-08-03(木) 01:37
     #27195-0RE#27194:フォルダ内のファイルの取得についてだいき2000-08-03(木) 03:12
#27183-0
フォルダ内のファイルの取得について
いつもお世話になっております。
フォルダ内のファイルの取得を最も速く行うにはどうすればよいでしょうか?
現在
        Dim vs, v, v1, vc
        Set vs = CreateObject("Scripting.FileSystemObject")
        On Error Resume Next
        Set v = vs.GetFolder("C:\")
        Set vc = v.Files
        For Each v1 In vc

        loop ****
で取得していますが、大変低速で困っています。
ご教授よろしくお願いいたします。
#27188-0
RE#27183:フォルダ内のファイルの取得について
ども〜ではいきます
FileListBoxを使用すればいいと思いますよ
パスの取り方は
File1.Path = "c:\"
こんな感じで一覧が即座に取得可能
おためしあれ〜
#27192-0
RE#27188:フォルダ内のファイルの取得について
> ども〜ではいきます
> FileListBoxを使用すればいいと思いますよ
> パスの取り方は
> File1.Path = "c:\"
> こんな感じで一覧が即座に取得可能
> おためしあれ〜
レスありがとうございました。
説明不足の部分がありました。すみません・・・
ListViewに指定フォルダ内のファイルとそのサイズ、作成日・・・を
表示したいと考えていますが、先ほど、投稿した方法だとエクスプローラよりも
かなり、表示までに時間がかかってしまいます。エクスプローラがどのような方法で
表示しているのかわかりませんが、同等のスピードを実現したいと思っています。
開発環境はVB6.0 SP2 Windows95 です。
よろしくお願いいたします
#27194-0
RE#27192:フォルダ内のファイルの取得について
> かなり、表示までに時間がかかってしまいます。エクスプローラがどのような方法で
> 表示しているのかわかりませんが、同等のスピードを実現したいと思っています。

こんな感じで実現できます。

http://www.mvps.org/btmtz/vbexplorer/
#27195-0
RE#27194:フォルダ内のファイルの取得について
> > かなり、表示までに時間がかかってしまいます。エクスプローラがどのような方法で
> > 表示しているのかわかりませんが、同等のスピードを実現したいと思っています。
> 
> こんな感じで実現できます。
> 
> http://www.mvps.org/btmtz/vbexplorer/
魔界の仮面弁士さん、誠に有り難うございました。
早速勉強させて頂きます
お探しの情報は見つかりましたか?お困りの問題は解決しましたか?
サイト内検索, 似た記事検索で見つからなくてもあきらめずに掲示板で質問してみましょう。
VB初心者友の会があなたのお役に立てれば幸いです。また、本ページの投稿者の方々にこの場を借りて感謝致します。
本ページは過去ログを集めて自動構成しています。よろしければこのページに関するフィードバックをお願いします。
(※ 構成の誤り、広告等の不適切な記事、リンク切れ、読めないページの報告など)