VB改文件属性的问题

来源：百度知道 编辑：UC知道 时间：2024/06/07 00:55:02
用Public Declare Function SetFileAttributes Lib "kernel32" Alias "SetFileAttributesA" (ByVal lpFileName As String, ByVal dwFileAttributes As Long) As Long
改文件属性时 怎样一个同时改多个文件 还有就时当一个文件被改成隐藏或系统文件时 在去覆盖这个文件时会弹出权限错误

不必用到api函数~
SetAttr 文件或文件夹路径, 参数
vbNormal 0 常规（缺省值）
VbReadOnly 1 只读。
vbHidden 2 隐藏。
vbSystem 4 系统文件
vbArchive 32 上次备份以后，文件已经改变

改多个就用循环~
权限错误~你试试先将文件改为无属性，覆盖后再设置属性。

要修改和隐藏或系统文件的属性之前，先把它的属性去掉
setattr filename , 0 '去掉所有的属性
写完后又覆盖回来就行了！