论坛 › 已解决问题区 › 查找文件问题

telking 发表于 2008-6-20 21:50:20

查找文件问题

;查找脚本目录的ISO文件
    Local $search = FileFindFirstFile("*.iso")
If $search = -1 Then
   MsgBox(64, "错误", "当前目录没有可用的.iso文件",5)
Exit
EndIf
While 1
    Local $sfile = FileFindNextFile($search)
Global $sFilename = @ScriptDir & "\" & $sfile;默认显示内容
MsgBox ( 4096 , "test" ,$sFilename)
If $search = 1Then ExitLoop
    If @error Then ExitLoop
WEnd
FileClose($search); 关闭搜索句柄

这个代码是查找脚本目录的ISO文件，它会将ISO一个一个显示出来，我想修改下功能，就是查找到第一个ISO就停止搜索，请问如何修改下

[ 本帖最后由 telking 于 2008-6-20 22:02 编辑 ]

bing614 发表于 2008-6-20 22:26:18

;查找脚本目录的ISO文件
    Local $search = FileFindFirstFile("*.iso")
If $search = -1 Then
   MsgBox(64, "错误", "当前目录没有可用的.iso文件",5)
Exit
EndIf
While 1
    Local $sfile = FileFindNextFile($search)
Global $sFilename = @ScriptDir & "\" & $sfile;默认显示内容
MsgBox ( 4096 , "test" ,$sFilename)
If $search = 1Then ExitLoop
    If @error Then ExitLoop
exitloop
WEnd
FileClose($search); 关闭搜索句柄

查看完整版本: 查找文件问题