Visual Basic Scripting Edition | ÕZ(y¨³)ÑÔ…¢¿¼ |
ÔO(sh¨¨)Öûò·µ»ØÖ¸¶¨µÄÎļþ»òÎļþŠAµÄÃû·Q¡£¿É×xŒ‘¡£
object.Name [= newname]
object
±Øßxí—(xi¨¤ng)¡£‘ª(y¨©ng)žé File »ò Folder Œ¦(du¨¬)ÏóµÄÃû·Q¡£
newname
¿Éßxí—(xi¨¤ng)¡£Èç¹ûÌṩ´Ë…¢”µ(sh¨´)£¬„tÖ¸¶¨µÄ object Ãû·Q¸üОé newname¡£
ÒÔÏ´ú´aÅeÀýÕfÃ÷ÈçºÎʹÓà Name ŒÙÐÔ£º
Function ShowFileAccessInfo(filespec) Dim fso, f, s Set fso = CreateObject("Scripting.FileSystemObject") Set f = fso.GetFile(filespec) s = f.Name & "
λÓÚòŒ(q¨±)„Ó(d¨°ng)Æ÷" & UCase(f.Drive) & "<BR>"
s = s & "
„“(chu¨¤ng)½¨•r(sh¨ª)ég£º" & f.DateCreated & "<BR>"
s = s & "
ÉÏ´ÎÔL†–•r(sh¨ª)ég£º" & f.DateLastAccessed & "<BR>"
s = s & "
ÉÏ´ÎÐ޸ĕr(sh¨ª)ég£º" & f.DateLastModified
ShowFileAccessInfo = s
End Function
Attributes ŒÙÐÔ | DateCreated ŒÙÐÔ | DateLastAccessed ŒÙÐÔ | DateLastModified ŒÙÐÔ | Drive ŒÙÐÔ | Files ŒÙÐÔ | IsRootFolder ŒÙÐÔ | ParentFolder ŒÙÐÔ | Path ŒÙÐÔ | ShortName ŒÙÐÔ | ShortPath ŒÙÐÔ | Size ŒÙÐÔ | SubFolders ŒÙÐÔ | Type ŒÙÐÔ
‘ª(y¨©ng)ÓÃÓÚ£ºFile Œ¦(du¨¬)Ïó | Folder Œ¦(du¨¬)Ïó