8-10.asp

包括本书所有的源代码。所有程序均在Windows 2000+IIS5.0+SQL Server2000下调试通过。所有程序

<%
set MyFileObject = Server.CreateObject("Scripting.FileSystemObject")
 path         = Server.mappath("test.txt ")
set MyFile       = MyFileObject.GetFile(path)
MyFile.attributes = 33
%>