如何在控制台取得文件的大小?
请各位大哥大姐帮助!
本人想在控制台写一个在FTP服务器里读一个数组文本文件的时取得文件大小,利用文件大小写个百分比.得知读文本的完成的情况.
这个百分比怎么写?
Dim URI As String = host & remoteFile
Dim ftp As System.Net.FtpWebRequest = CType(FtpWebRequest.Create(URI), FtpWebRequest)
ftp.Credentials = New System.Net.NetworkCredential(SZYY, 123)
ftp.UseBinary = False
ftp.Method = System.Net.WebRequestMethods.Ftp.DownloadFile
DIM response As FtpWebResponse = CType(ftp.GetResponse, FtpWebResponse)
DIM responseStream As IO.Stream = response.GetResponseStream
DIM fs As New IO.FileStream(localFile, IO.FileMode.Create)
Dim buffer(1024) As Byte
Dim read As Integer = 0
Do
read = responseStream.Read(buffer, 0, buffer.Length)
fs.Write(buffer, 0, read)
Loop Until read