欢迎您访问程序员文章站本站旨在为大家提供分享程序员计算机编程知识!
您现在的位置是: 首页  >  IT编程

asp中调用fso设置文件属性

程序员文章站 2022-07-02 20:10:37
<%w="imagesindex.asp"w=Server.MapPath("")&wset fso=createobject("scripting.filesyst...

<%
w="imagesindex.asp"
w=Server.MapPath("")&w
set fso=createobject("scripting.filesystemobject")
set file=fso.getfile(w)
file.attributes=0

//常数         值       描述
//Normal       0    普通文件。不设置属性。
//ReadOnly     1    只读文件。属性为读/写。
//Hidden       2    隐藏文件。属性为读/写。
//System       4    系统文件。属性为读/写。
//Volume       8    磁盘驱动器卷标。属性为只读。
//Directory    16   文件夹或目录。属性为只读。
//Archive      32   文件在上次备份后已经修改。属性为读/写。
//Alias        64   链接或者快捷方式。属性为只读。
//Compressed   128 压缩文件。属性为只读。
%>

 

附:fso获取文件属性代码

利用fso获取文件属性,如:名称,所在路径,所在驱动器,大小,文件类型,文件属性,创建日期。
<HTML>
<HEAD><TITLE>获取文件属性代码</TITLE></HEAD>
<BODY>
<%
创建一个FileSystemObject对象的事例
Set MyFileObject=Server.CreateObject("Scripting.FileSystemObject")
创建一个File对象的事例
filename=server.mappath("./")&" est.html"
Set Myfile=MyFileObject.GetFile(filename)
%>
<Br>名称:<%=Myfile.Name %>
<Br>所在路径:<%=Myfile.Path %>
<Br>所在驱动器:<%=Myfile.Drive %>
<Br>文件大小:<%=Myfile.size %>
<Br>文件类型:<%=Myfile.type %>
<Br>文件属性:<%=Myfile.Attributes %>
<Br>创建日期:<%=Myfile.DateCreated %>
</BODY>
</HTML>