windows.vbs.FSO.文件操作信息.磁盤驅動信息.文件夾操作信息全集
2020-06-26 18:05:38
供稿：網友
' FSO 文件操作相關
' FSO 參數詳解：
' Fso.IsRootFolder=True|False '是否為根目錄
' Fso.GetFolder '讀取文件夾 用法：Set fldr = fso.GetFolder("C://目錄2")
' Fso.FolderExists=True|False '查找此文件夾是否存在
' Fso.CreateFolder '創建文件夾 用法：fso.CreateFolder("C://目錄1")
' Fso.GetBaseName '返回文件夾的名字 用法：fso.GetBaseName("C://目錄1")
' Fso.DeleteFolder '刪除指定的文件夾 用法：fso.DeleteFolder("C://目錄1")
' Fso.MoveFolder '移動指定的文件夾 用法：fso.MoveFolder("C://目錄1","C://目錄2") 將C://目錄1移動到C://目錄2下
' Fso.CopyFolder '復制指定的文件夾 用法：fso.CopyFolder("C://目錄2//cnbruce","c://") 將C://目錄2//cnbruce復制到C://下
'
' Fso.Drive '返回驅動器的名字 返回 “D:”
' Fso.GetDriveName '提取驅動器名 返回“d:”
' Fso.GetDrive '提取驅動器名 返回 “D:” 常用寫法：fso.GetDrive(fso.GetDriveName(drvPath))
' 磁盤驅動器信息
' Drv.DriveLetter '返回盤符
' Drv.VolumeName '取得驅動器的卷標
' Drv.TotalSize '取得空間總大小 返回字節數，用FormatNumber(Drive.TotalSize/1024,0)格式化，返回多少G
' Drv.FreeSpace '剩余空間大小 返回同上
' Drv.DriveType '文件類型 0“設備無法識別” 1“軟盤驅動器” 2“硬盤驅動器” 3“網絡硬盤驅動器” 4“光盤驅動器” 5“RAM虛擬磁盤”
' Drv.FileSystem '磁盤格式
' Drv.SerialNumber '磁盤系列號
' Drv.IsReady '是否可用
' Drv.Path '磁盤路徑
'
' FSO文件操作
' Txt.OpenTextFile '打開指定的文件 用法：fso.OpenTextFile(whichfile,1) 參數1：表示“ForReading：只讀，禁寫。” 參數2：表示“ForWriting：可讀，可寫。” 參數8：表示“ForAppending：打開文件并從文件末尾開始寫”
' Txt.ReadLine '讀取一整行
' Txt.Read(7) '讀取指定數量字符
' Txt.ReadAll '讀取文本所有內容
' Txt.CreateTextFile '創建文件 用法：Set MyFile = Txt.CreateTextFile(whichfile,True) True即表示能覆蓋已有文件
' Txt.WriteLine '向已有文件寫入內容 用法：Txt.WriteLine("歡迎您來到本站")
' Txt.Name '返回文件名稱
' Txt.ShortPath '返回文件短路徑名
' Txt.Path '返回文件物理地址
' Txt.Attributes '返回文件屬性
' 返回值附錄：
' Normal 0 普通文件。 沒有設置任何屬性
' ReadOnly 1 只讀文件。 可讀寫
' Hidden 2 隱藏文件。 可讀寫
' System 4 系統文件。 可讀寫
' Directory 16 文件夾或目錄。 只讀
' Archive 32 上次備份后已更改的文件。 可讀寫
' Alias 1024 鏈接或快捷方式。 只讀
' Compressed 2048 壓縮文件。 只讀
'
' Txt.Move '移動指定的文件 用法：Set Txt = fso.GetFile(whichfile) Txt.Move "C://"
' Txt.Copy '復制指定的文件 用法：Set Txt = fso.GetFile(whichfile) Txt.Copy "D://"
' Txt.delete '刪除指定的文件 用法：Set Txt = fso.GetFile("d://cnbruce.txt") Txt.delete
'
'
' Txt.Size '返回文件大小
' Txt.Type '返回文件類型
' Txt.DateCreated '返回文件創建時間
' Txt.DateLastAccessed '返回文件最近訪問時間
' Txt.DateLastModified '返回文件最后修改時間
'
'
' 常用函數記錄
' instr '用法：alert(instr("Abcde","A"))
' mid '用法：alert(mid("abjdllodfjd",2,8)) 說明：顯示從第二位到第8位的這符
'
'------------------------------------------------
