源址：
http://www.zhouguoqing.com.cn/article.asp?id=50

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