dir（）函数的问题

Question

加上“vbHidden”属性试试
Dir 函数
      返回一个 String，用以表示一个文件名、目录名或文件夹名称，它必须与指定的模式或文件属性、或磁盘卷标相匹配。语法Dir[(pathname[, attributes])]Dir 函数的语法具有以下几个部分：部分 描述 
pathname 可选参数。用来指定文件名的字符串表达式，可能包含目录或文件夹、以及驱动器。如果没有找到 pathname，则会返回零长度字符串 ("")。 
attributes 可选参数。常数或数值表达式，其总和用来指定文件属性。如果省略，则会返回匹配 pathname 但不包含属性的文件。  
设置值attributes 参数的设置可为：常数 值 描述 
vbNormal 0 (缺省) 指定没有属性的文件。 
vbReadOnly 1 指定无属性的只读文件 
vbHidden 2 指定无属性的隐藏文件 
VbSystem 4 指定无属性的系统文件 
vbVolume 8 指定卷标文件；如果指定了其它属性，则忽略vbVolume 
vbDirectory 16 指定无属性文件及其路径和文件夹。 
注意 这些常数是由 VBA 所指定的，在程序代码中的任何位置，可以使用这些常数来替换真正的数值。说明Dir 支持多字符 (*) 和单字符 (?) 的通配符来指定多重文件。 由于 Macintosh 不支持通配符，使用文件类型指定文件组。可以使用 MacID 函数指定文件类型而不用文件名。比如，下列语句返回当前文件夹中第一个TEXT文件的名称:Dir("SomePath", MacID("TEXT")) 为选中文件夹中所有文件，指定一空串:Dir("")在 Microsoft Windows 中，如果在Dir函数中使用MacID函数，将产生错误。任何大于256的attribute值都被认为是MacID 函数的值。在第一次调用 Dir 函数时，必须指定 pathname，否则会产生错误。如果也指定了文件属性，那么就必须包括 pathname。Dir 会返回匹配 pathname 的第一个文件名。若想得到其它匹配 pathname 的文件名，再一次调用 Dir，且不要使用参数。如果已没有合乎条件的文件，则 Dir 会返回一个零长度字符串 ("")。一旦返回值为零长度字符串，并要再次调用 Dir 时，就必须指定 pathname，否则会产生错误。不必访问到所有匹配当前 pathname 的文件名，就可以改变到一个新的 pathname 上。但是，不能以递归方式来调用 Dir 函数。以 vbDirectory 属性来调用 Dir 不能连续地返回子目录。提示 由于文件名并不会以特别的次序来返回，所以可以将文件名存储在一个数组中，然后再对这个数组排序。

Answer 1

换一个办法用open打开一个文件，看是否出错，如果没有，那么就是存在

Answer 2

我早做过实验了，用dir() 是不能将所有文件都读出来的…！！！它们都是系统属性，删除不了…！！！用VB的有关文件控件也不能…！！！只能UP了…！！
谁有有什么好的方法呢？

Answer 3

是不是这个IE临时文件夹文件夹比较特殊呢，别的文件夹行不行？去试试啊
我看MS为了安全或其他原因对这个文件夹加了限制，你在这个文件夹里点一个文件看属性，它是不显示什么只读，隐藏，存档等等的，如果你把它拷贝一份到正常的文件夹里在看属性就能看到只读，隐藏，存档等等属性了，
所以你不妨在程序中将这个文件夹拷贝一份另存（通过程序怎么拷），再对新文件夹操作，不知可否
-----菜鸟看法，呵呵

Answer 4

再试试FSO的Folders 集合和Files 集合
Folders集合:
描述:包含在一个 Folder 对象内的所有 Folder 对象的集合。
说明:
下面的代码举例说明了如何获得一个 Folders 集合，以及如何用 For Each...Next 语句来访问该集合中的每个Folder：Sub ShowFolderList(folderspec)
    Dim fs, f, f1, fc, s
    Set fs = CreateObject("Scripting.FileSystemObject")
    Set f = fs.GetFolder(folderspec)
    Set fc = f.SubFolders
    For Each f1 in fc
        s = s & f1.name 
        s = s &  vbCrLf
    Next
    MsgBox s
End Sub
------------------------------------------------------
Files 集合
描述:在一个文件夹内的所有 File 对象的集合。
说明:下面的代码举例说明了如何获得一个 Files 集合，以及如何用 For Each...Next 语句来访问这个集合中的每个File：Sub ShowFolderList(folderspec)
    Dim fs, f, f1, fc, s
    Set fs = CreateObject("Scripting.FileSystemObject")
    Set f = fs.GetFolder(folderspec)
    Set fc = f.Files
    For Each f1 in fc
        s = s & f1.name 
        s = s & vbCrLf
    Next
    MsgBox s
End Sub
Folders 集合和Files 集合还有Item 属性和Count 属性：
Item 属性
描述：对 Dictionary 对象中指定的 Key，设置或返回一个 Item 。对于集合来说，基于指定的 Key ，返回一个 Item 。读/写属性。
语法
object.Item(key) [= newitem]-------这个很有用啊
Count 属性
描述：返回集合或 Dictionary 对象中的条目数。只读。
语法
object.Count呵呵，菜鸟见解，如果乱说请见谅哦