查找某文件夹下是否有.inf的文件，有则返回文件夹路径，应该怎么写？

linzhuantu

需要由程序自动去计算机某个文件夹下或某个盘下寻找含有.inf格式的文件，有的话返回这个含这个文件的文件夹路径。例如，D盘下有D:\文件A\xxx.inf，则返回D:\文件A。Au3应该怎么写才比较好呢

虫子樱桃

帮助中的例子程序

FindAllFile(@ScriptDir)
Func FindAllFile($sDir)
    Local $hSearch = FileFindFirstFile($sDir & "\*.*")
    ; 检查搜索是否成功
    If $hSearch = -1 Then Return
    While 1
        Local $sFile = FileFindNextFile($hSearch)
                ;没有找到就退出
        If @error Then ExitLoop
        
                ;如果找到文件夹
        If @extended Then 
            FindAllFile($sDir & "\" & $sFile)
            ContinueLoop
        EndIf
        FileWriteLine("找到的文件.txt",$sDir & "\" & $sFile)
    WEnd
    ; 关闭搜索句柄
    FileClose($hSearch)
EndFunc

linzhuantu

回复 2# 虫子樱桃


    这个程序能找含.inf格式的文件了，返回的是文件的路径，然后最终目的不是要得到文件的路径值，而是要得到路径所在的路径。比如有 D:\text\a.inf，因此上面的函数便会返回D:\text\a.inf，而我们要得到的是D:\text，应该怎么写呢？

netegg

udf区找枚举文件

veket_linux

stringinstr 对D:\text\a.inf从后向前找到 第一个 \ 的位置
stringleft  再取这个位置前的也就是 D:\text\a.inf的\a.inf前的、
或者.........
_PathSplit 把路径 盘符 文件名 扩展名 拆开

在把你要的东西 拼起来

veket_linux

楼主      那是什么图？ labview2012？

linzhuantu

回复 4# netegg


   请教元老，能否直接给个例子？

afan

回复 3# linzhuantu

Local $sFile = 'D:\text\a.inf'
Local $sPath = StringRegExpReplace($sFile, '\\[^\\]+$', '')
MsgBox(0, $sFile, $sPath)

linzhuantu

回复 9# afan


    最终要的到的只是：
        在某个文件夹下寻找是否含有.inf的文件，有则返回这个文件夹（包括子文件夹）的路径
        
        按上面说的感觉把程序复杂化了

linzhuantu

回复 2# 虫子樱桃


    请教高手，我的目的是
       在某个文件夹下寻找是否含有.inf的文件，有则返回这个文件夹（包括子文件夹）的路径
   是不是有函数可以直接得到数据？
   而根据上面各楼，都要先得到.inf的文件路径，再得到.inf文件所在的文件夹路径，感觉程序复杂化了，该怎么办呢

linzhuantu

回复 9# afan


    谢谢afan,结合虫子樱桃和你的代码，实在太好了，成功了

xms77

回复 7# veket_linux
同样好奇楼主的图！