求写一个在指定路径，搜索文件的代码
越简单越好，相信很多朋友也能用到。请大神帮忙。请勿拍砖～～～1.弹出输入框；
2.根据输入框的前6位字符，在指定路径搜索前6位与之完全相同的文件，
3.打开该文件。未找到则提示无此文件并退出。
非常感谢！
个人还在看帮助文档的阶段，感谢～ 本帖最后由 xayle 于 2015-10-14 23:43 编辑
全都是帮助里翻出来的
Local $sDir = FileSelectFolder("选择要搜索的目录.", "")
Local $value = InputBox("测试", "搜索内容.", "", " M6")
Local $hSearch = FileFindFirstFile($sDir & "\" & $value & "*.*")
; 检查搜索是否成功
If $hSearch = -1 Then
MsgBox(4096, "错误", "没有文件/目录 匹配搜索")
Exit
EndIf
While 1
Local $sFile = FileFindNextFile($hSearch)
If @error Then ExitLoop
Switch MsgBox(0x4, "找到的文件:", "是否打开?" & @CRLF & $sFile)
Case 6
ShellExecute($sFile, "", $sDir)
Case 7
EndSwitch
WEnd
; 关闭搜索句柄
FileClose($hSearch) 多看看帮助，好处多多 谢谢二楼～ 谢谢二楼帮忙查帮助文件。收藏了
页:
[1]