了解文件夹是否具有指定文件类型的最佳方法

发布于 2024-12-06 11:28:45 字数 144 浏览 1 评论 0原文

我在 VB6 中有一个循环过程,它探索指定文件路径中的所有文件夹。 然后我需要知道每个检测到的文件夹是否包含 MP3 文件。 我不想使用 dir 命令,因为它占用大量资源。 我尝试过使用 FSO、API 等来执行此操作,但找不到解决方案。

感谢您的任何帮助。

I have a loop procedure in VB6 which explores all the folders from a specified file path.
I then need to know if each detected folder contains MP3 files.
I don't want to use the dir command because it takes up a lot of resources.
I've tried doing this using FSO, APIs, etc, but I can't find a solution.

Thanks for any help.

如果你对这篇内容有疑问,欢迎到本站社区发帖提问 参与讨论,获取更多帮助,或者扫码二维码加入 Web 技术交流群。

扫码二维码加入Web技术交流群

发布评论

需要 登录 才能够评论, 你可以免费 注册 一个本站的账号。

评论(2

鯉魚旗 2024-12-13 11:28:45

VB6 的 Dir$() 函数是 FindFirstFile 及其类似函数的一个相当轻量级的包装。我不知道为什么你认为 FSO 会更轻或更快。

Dir$() 最大的严重限制是它是一个 ANSI 函数,并且当搜索已经在进行时,它不能被第二次搜索“中断”,而无需重置第一次搜索的状态。

“占用大量资源”到底是什么意思?

我在 DirLister 轻量级 Dir() 包装器 中发布了一个包装该过程的类。

VB6's Dir$() function is a pretty light wrapper on FindFirstFile and friends. I'm not sure why you think the FSO would be any lighter or faster.

The biggest serious limitations of Dir$() are that it is an ANSI function and it cannot be "interrupted" by a second search while one is already in progress without resetting the state of the first search.

What does "takes up a lot of resources" mean anyway?

I posted a Class wrapping the process at DirLister lightweight Dir() wrapper.

一袭水袖舞倾城 2024-12-13 11:28:45

您尝试过 FindFirstFile API 函数吗?这应该是你最好的机会。 codeproject 上有一个 C# 示例 A Faster Directory Enumerator

VB 签名如下所示:

<DllImport("kernel32.dll", CharSet := CharSet.Auto)> _
Private Shared Function FindFirstFile(ByVal lpFileName As String, ByRef lpFindFileData As WIN32_FIND_DATA) As IntPtr
End Function

这是一个 VB 实现示例 http:// /www.ask-4it.com/how-to-use-findfirstfile-win32-api-from-visual-basic-code-2-ca.html

您还可以找到一篇关于使用的不错的微软文章API 此处

Have you tried the FindFirstFile API function? It should be your best shot. There's a C# example at codeproject A Faster Directory Enumerator

The VB signature goes like this:

<DllImport("kernel32.dll", CharSet := CharSet.Auto)> _
Private Shared Function FindFirstFile(ByVal lpFileName As String, ByRef lpFindFileData As WIN32_FIND_DATA) As IntPtr
End Function

Here's a sample VB implementation http://www.ask-4it.com/how-to-use-findfirstfile-win32-api-from-visual-basic-code-2-ca.html

You can also find a nice microsoft article on usage of the API here.

~没有更多了~
我们使用 Cookies 和其他技术来定制您的体验包括您的登录状态等。通过阅读我们的 隐私政策 了解更多相关信息。 单击 接受 或继续使用网站,即表示您同意使用 Cookies 和您的相关数据。
原文