问题描述
大家好!谁能帮我写一段代码?vb.net怎么获取一个文件夹所有文件的MD5值?大家能不能提供源代码?
解决方案
解决方案二:
我给你分解一下1.获取每个文件的md5值2.遍历文件夹,如果是文件就调用上面函数计算3.输出计算值
解决方案三:
将文件夹打包,然后对打包文件进行MD5计算或者遍历文件夹,然后对每一个MD5计算
解决方案四:
给你写了一个完整的例子ImportsSystem.IOImportsSystem.Security.CryptographyImportsSystem.LinqModuleModule1SubMain()Dimpath="c:/publish/med2/server"Dimresult=(FromxInNewDirectoryInfo(path).EnumerateFiles().AsParallelLetv=Md5(x)SelectNewResultTypeWith{.file=x,.md5=v,.md5c=ToStr(v)}).ToList'这里就可以使用resultEndSubFunctionMd5(fileAsFileInfo)AsByte()Dimdata=System.IO.File.ReadAllBytes(file.FullName)DimcAsNewMD5CryptoServiceProviderReturnc.ComputeHash(data)EndFunctionFunctionToStr(dataAsByte())AsStringReturnString.Join("",FromxIndataSelectx.ToString("x2"))EndFunctionEndModulePublicClassResultTypePublicfileAsFileInfoPublicmd5AsByte()Publicmd5cAsStringEndClass