以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  如何比较本地与FTP文件一致？  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=33090)
--  作者：wuxianzuoji41
--  发布时间：2013/5/13 14:44:00
--  如何比较本地与FTP文件一致？
如何比较本地与远程FTP文件一致，从FTP下载的文件可能断线或者其他的原因损坏，怎么在FOXTAB实现本地与远程群件一致，确保是文件字节没有丢失或者损坏
--  作者：Bin
--  发布时间：2013/5/13 14:59:00
--  
dim md5str as string

Using reader As New System.IO.FileStream(filepath, IO.FileMode.Open, IO.FileAccess.Read)
Using md5 As New System.Security.Cryptography.MD5CryptoServiceProvider
Dim hash() As Byte = md5.ComputeHash(reader)
Dim sb As New System.Text.StringBuilder(arrInput.Length * 2)
For i As Integer = 0 To arrInput.Length - 1
    sb.Append(arrInput(i).ToString("X2"))
Next
md5str = sb.ToString().ToLower
End Using
End Using

MessageBox.show(md5str)

判断两个文件的MD5值是否一样即可.

可以建立一个表保存远程文件的的MD5值 用来做对比.