VB6でディレクトリ容量を取得する

プログラム

GetTickCountで、時間を量りながら色々試して見たら、どうやら Dir でファイルを取得してるのが一番のネックらしい。

Webで調べると、FindFirstFile と言う API を見つけたので、こちらに変更してみると劇的に早くなった!

と言っても、まだ12000ファイルの取得に30秒以上かかるので、実用的とは言えないレベル。

他のディレクトリ容量取得ソフトでは5秒くらいで終わってるので、まだまだチューンが必要ですね。

だいぶ早くなった

ファイルサイズの取得も FindFirstFile でやるようにしたら、13000ファイルで11秒を切った。

あと少し早くしたいけど、どこを切り詰めれば良いのやら…そろそろ VB の限界なのかな?

挫折

今の僕の知識じゃこれ以上何やって良いか分かりません。スピード的にはギリギリ実用レベルと言うことで妥協しましょう。