windows.vbs.FSO.檔案操作資訊.磁碟驅動資訊.檔案夾操作資訊全集

來源:互聯網
上載者:User

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

' 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位的這符
'
'------------------------------------------------

相關文章

聯繫我們

該頁面正文內容均來源於網絡整理,並不代表阿里雲官方的觀點,該頁面所提到的產品和服務也與阿里云無關,如果該頁面內容對您造成了困擾,歡迎寫郵件給我們,收到郵件我們將在5個工作日內處理。

如果您發現本社區中有涉嫌抄襲的內容,歡迎發送郵件至: info-contact@alibabacloud.com 進行舉報並提供相關證據,工作人員會在 5 個工作天內聯絡您,一經查實,本站將立刻刪除涉嫌侵權內容。

A Free Trial That Lets You Build Big!

Start building with 50+ products and up to 12 months usage for Elastic Compute Service

  • Sales Support

    1 on 1 presale consultation

  • After-Sales Support

    24/7 Technical Support 6 Free Tickets per Quarter Faster Response

  • Alibaba Cloud offers highly flexible support services tailored to meet your exact needs.