這一次的教學與上一次介紹 [FTP] 刪除檔案的觀念差不多!
但有些地方需要改變一下~
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))
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))」這個是說我只要顯現從左邊數過來第四字元,不然會有一大堆數字跑出來。可以自行修改一下~(相關教學:[內建函數] 字串函數)
沒有留言:
張貼留言