2013年1月11日 星期五

[FTP] 取得檔案大小

在 FTP 中我們要如何取的伺服器中的檔案大小呢?
這一次的教學與上一次介紹   [FTP] 刪除檔案的觀念差不多!
但有些地方需要改變一下~


程式碼 VB
Dim reader As StreamReader = Nothing
Dim request As Net.FtpWebRequest = Net.FtpWebRequest .Create("ftp://XXX.XXX.XXX")
request.Method = Net.WebRequestMethods.Ftp.GetFileSize
request.Credentials = New Net.NetworkCredential (id, pass)
Dim response As Net.FtpWebResponse = request.GetResponse()
reader = New StreamReader (response.GetResponseStream)
MsgBox(Strings.Left(response.ContentLength / 1024 / 1024, 4))



VB 說明
1、「Create("ftp://XXX.XXX.XXX")」為需要取的檔案的位置。
2、「New Net.NetworkCredential (id, pass)」後面的 id、pass 為登入憑證,如果不需要可以把這行刪除~
3、「MsgBox( Strings .Left(response.ContentLength / 1024 / 1024, 4))」用 MB 來顯示結果。「Strings .Left(  , 4))」這個是說我只要顯現從左邊數過來第四字元,不然會有一大堆數字跑出來。可以自行修改一下~(相關教學:[內建函數] 字串函數