FileSystemObject 示例代码
作者 佚名
来源 ASP编程
浏览
发布时间 2013-07-09
| ''''''''''''''''''''''''''''''''''''''''''' ''由Drive.DriveType返回的常数 '''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''' ConstDriveTypeRemovable=1 ConstDriveTypeFixed=2 ConstDriveTypeNetwork=3 ConstDriveTypeCDROM=4 ConstDriveTypeRAMDisk=5'''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''' '''''''''''''''''''''''''''''''''''''''''''''''''''''''' ''由File.Attributes返回的常数 '''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''' ConstFileAttrNormal=0 ConstFileAttrReadOnly=1 ConstFileAttrHidden=2 ConstFileAttrSystem=4 ConstFileAttrVolume=8 ConstFileAttrDirectory=16 ConstFileAttrArchive=32 ConstFileAttrAlias=64 ConstFileAttrCompressed=128'''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''' '''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''' ''用来打开文件的常数 '''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''' ConstOpenFileForReading=1 ConstOpenFileForWriting=2 ConstOpenFileForAppending=8'''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''' '''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''' ''ShowDriveType ''目的： ''生成一个字符串，来描述给定Drive对象的驱动器类型。 ''示范下面的内容 ''-Drive.DriveType '''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''' FunctionShowDriveType(Drive)DimS SelectCaseDrive.DriveType CaseDriveTypeRemovable S="Removable" CaseDriveTypeFixed S="Fixed" CaseDriveTypeNetwork S="Network" CaseDriveTypeCDROM S="CD-ROM" CaseDriveTypeRAMDisk S="RAMDisk" CaseElse S="Unknown" EndSelectShowDriveType=SEndFunction'''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''' '''''''''''''''''''''''' ''ShowFileAttr ''目的： ''生成一个字符串，来描述文件或文件夹的属性。 ''示范下面的内容 ''-File.Attributes ''-Folder.Attributes '''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''' ''''''''FunctionShowFileAttr(File)''File可以是文件或文件夹DimS DimAttr Attr=File.AttributesIfAttr=0Then ShowFileAttr="Normal" ExitFunction EndIfIfAttrAndFileAttrDirectoryThenS=S&"Directory" IfAttrAndFileAttrReadOnlyThenS=S&"Read-Only" IfAttrAndFileAttrHiddenThenS=S&"Hidden" IfAttrAndFileAttrSystemThenS=S&"System" IfAttrAndFileAttrVolumeThenS=S&"Volume" IfAttrAndFileAttrArchiveThenS=S&"Archive" IfAttrAndFileAttrAliasThenS=S&"Alias" IfAttrAndFileAttrCompressedThenS=S&"Compressed"ShowFileAttr=SEndFunction'''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''' ''''''''''''''''''''''''''''''''''' |
凌众科技专业提供服务器租用、服务器托管、企业邮局、虚拟主机等服务，公司网站：http://www.lingzhong.cn 为了给广大客户了解更多的技术信息，本技术文章收集来源于网络,凌众科技尊重文章作者的版权，如果有涉及你的版权有必要删除你的文章，请和我们联系。以上信息与文章正文是不可分割的一部分,如果您要转载本文章,请保留以上信息，谢谢! |
你可能对下面的文章感兴趣
上一篇: VBS教程：VBScript 基础-VBScript 变量下一篇: 脚本编程 4 驱动器
关于FileSystemObject 示例代码的所有评论
