代码搜索：FileSystemObject
找到约 1,189 项符合「FileSystemObject」的源代码
代码结果 1,189
www.eeworm.com/read/378183/9244560
dat vb_att9b.dat
语法
----
object.DateCreated
object 总是一个 file 或Folder对象。
说明
----
下面的代码用一个文件举例说明了 DateCreated 属性的用法：
Sub ShowFileInfo(filespec)
Dim fs, f, s
Set fs = CreateObject("Scripting.File
www.eeworm.com/read/378183/9244563
dat vb_att37b.dat
语法
----
object.Size
object 总是一个 File 或 Folder 对象。
说明
----
下面的代码用一个 Folder 对象举例说明了 Size 属性的用法：
Sub ShowFolderSize(filespec)
Dim fs, f, s
Set fs = CreateObject("Scripting.FileSy
www.eeworm.com/read/378183/9244573
dat vb_att15b.dat
语法
----
object.Drives
object 总是一个 FileSystemObject。
说明
----
对于可删除媒体驱动器来说，不需要插入媒体，就可使其出现在 Drives 集合中。
可以用 For Each...Next 结构遍及 Drives 集合中的成员，如下面的代码所示：
Sub ShowDriveList
Dim fs,
www.eeworm.com/read/378183/9244587
dat vb_att1b.dat
语法
----
object.AtEndOfLine
object 总是一个 TextStream 对象的名称。
说明
----
AtEndOfLine 属性仅应用于已打开供读取的 TextStream 文件；否则就会出错。
下面的代码举例说明了 AtEndOfLine 属性的用法：
Dim fs, a, retstring
Set fs = Create
www.eeworm.com/read/378183/9244592
dat vb_att4b.dat
语法
----
object.AvailableSpace
object 总是一个 Drive 对象。
说明
----
一般来说，AvailableSpace 属性的返回值与 FreeSpace 属性的返回值是相同的。对于支持限额的计算机系统来说，两个值之间可能会有所不同。
下面的代码举例说明了 AvailableSpace 属性的用法：
Sub ShowAv
www.eeworm.com/read/378183/9244594
dat vb_att34b.dat
语法
----
object.ShareName
object 总是一个 Drive 对象。
说明
----
如果 object 不是一个网络驱动器，则 ShareName 属性返回一个 0 字节长度的字符串 ("")。
下面的代码举例说明了 ShareName 属性的用法：
Sub ShowDriveInfo(drvpath)
Dim fs, d,
www.eeworm.com/read/378183/9244597
dat vb_att33b.dat
语法
----
object.SerialNumber
object 总是一个 Drive 对象。
说明
----
可以使用 SerialNumber 属性确保正确的磁盘已插入到某个带有可删除媒体的驱动器中。
下面的代码举例说明了 SerialNumber 属性的用法：
Sub ShowDriveInfo(drvpath)
Dim fs, d, s,