代码搜索:FileSystemObject
找到约 1,189 项符合「FileSystemObject」的源代码
代码结果 1,189
www.eeworm.com/read/472279/6875234
txt makexmlfromshapefiletable.txt
Private Sub MakeXMLFromShapefileTable()
'vars
Dim pMxDoc As IMxDocument
Dim pMap As IMap
Dim pFLayer As IFeatureLayer
www.eeworm.com/read/295679/8146095
bas module1.bas
Attribute VB_Name = "Module1"
Option Explicit
Public i As String
Public fso As New FileSystemObject
Public path As String
Public txtfile
Public username As String
Public Function Testtxt
www.eeworm.com/read/104928/15681157
vbs deltemp.vbs
'deltemp.vbs
Dim objDelTempFiles , objFSO
'create an instance of the ENTWSH.RecurseDir object.
'any sinked events will be prefixed with ev_
Set objDelTempFiles = Wscript.CreateObject ("ENTWSH.Re
www.eeworm.com/read/192685/8362912
txt 如何在客户机上建立服务器上的一个共享的文件目录.txt
下 面 为 我 写 的 一 小 段 程 序 , 相 信 对 你 有 一 定 帮 助 。
Dim fso, d
dim newfolder as string
On Error Resume Next '//////如 已 经 建 立 则 忽 略 错 误
Set fso = CreateObject("Scripting.FileSy
www.eeworm.com/read/192685/8363008
txt 如何获取某个文件夹的大小.txt
没 有 这 样 的 API, 但 可 以 使 用 FileSystemObject来 实 现 , 如 :
Dim fso As FileSystemObject
Dim f As Folder
Set fso = CreateObject("Scripting.FileSystemObject")
Set f = fso.Get
www.eeworm.com/read/192685/8363274
txt 通过局域网copy东西,但不知网络路径怎么写.txt
网络路径就是UNC格式,即:\\计算机名\路径。但是需要注意的是使用FileSystemObject拷贝网络目录时有点怪,如果要拷贝网络上的一个共享目录,需要这么做:
Dim fs
Set fs = CreateObject("Scripting.FileSystemObject")
' 把myFolder下的所有子目录拷贝到myNewFolder
www.eeworm.com/read/192685/8366660
txt 如何在客户机上建立服务器上的一个共享的文件目录.txt
下 面 为 我 写 的 一 小 段 程 序 , 相 信 对 你 有 一 定 帮 助 。
Dim fso, d
dim newfolder as string
On Error Resume Next '//////如 已 经 建 立 则 忽 略 错 误
Set fso = CreateObject("Scripting.FileSy