“FileGetAttrib()“如何用通配符

fgys

“FileGetAttrib()"如何用通配符号
要如何用FileGetAttrib判断C盘根目录下隐藏的文件夹和文件

$attrib = FileGetAttrib("c:\*.*")通配符，要如何加？
If @error Then
    MsgBox(4096,"错误", "无法获得属性。")
    Exit
Else
    If StringInStr($attrib, "H") Then
    MsgBox(4096,"", "该文件具有只读属性。")
    EndIf
EndIf

加：FileFindFirstFile()加FileFindNextFile（）都不行！高手们如何解决

[ 本帖最后由 fgys 于 2009-4-1 08:34 编辑 ]

sxd

#include <file.au3>
$a = _FileListToArray("C:\")
For $i = 1 To $a[0]
        $attrib = FileGetAttrib("C:\" & $a[$i])
        If @error Then
                MsgBox(4096, "错误", "无法获得属性。")
                Exit
        Else
                If StringInStr($attrib, "H") Then
                        MsgBox(4096, "", "C:\" & $a[$i] & @LF & "该文件具有隐藏属性。")
                EndIf
        EndIf
Next

KiwiCsj

高人就是长这个样子的。

sxd

原帖由 KiwiCsj 于 2009-3-31 22:36 发表
高人就是长这个样子的。

你怎么知道我1.85 是 高人 啊

fgys

原帖由 sxd 于 2009-3-31 22:27 发表
[au3]#include
$a = _FileListToArray("C:\")
For $i = 1 To $a[0]
        $attrib = FileGetAttrib("C:\" & $a[$i])
        If @error Then
                MsgBox(4096, "错误", "无法获得属性。")
                Exit
        Else
                If StringInStr( ...

非常感谢！。。。
如果可以还想再问高人一个问题，如何让MsgBox(4096, "", "C:\" & $a[$i] & @LF & "该文件具有隐藏属性。")，只显示文件名为6个字符的文件夹或文件的隐藏文件或文件夹？，谢谢！

[ 本帖最后由 fgys 于 2009-4-1 08:38 编辑 ]

fgys

解决了！这里就可以用通配符了！，谢谢！，解决方法如下！
$a = _FileListToArray("C:\","??????")