md5值生成代码?

 我来答
a1012144015
2016-02-04 · TA获得超过6415个赞
知道大有可为答主
回答量:9038
采纳率:40%
帮助的人:1350万
展开全部
[Java]代码
/** * 对文件全文生成MD5摘要 * * @param file * 要加密的文件 * @return MD5摘要码 */ public static String getMD5(File file) { FileInputStream fis = null; try { MessageDigest md = MessageDigest.getInstance("MD5"); fis = new FileInputStream(file); byte[] buffer = new byte[2048]; int length = -1; long s = System.currentTimeMillis(); while ((length = fis.read(buffer)) != -1) { md.update(buffer, 0, length); } byte[] b = md.digest(); return byteToHexString(b); // 16位加密 // return buf.toString().substring(8, 24); } catch (Exception ex) { ex.printStackTrace(); return null; } finally { try { fis.close(); } catch (IOException ex) { ex.printStackTrace(); } } } /** */ /** * 把byte[]数组转换成十六进制字符串表示形式 * @param tmp 要转换的byte[] * @return 十六进制字符串表示形式 */ private static String byteToHexString(byte[] tmp) { String s; // 用字节表示就是 16 个字节 char str[] = new char[16 * 2]; // 每个字节用 16 进制表示的话,使用两个字符, // 所以表示成 16 进制需要 32 个字符 int k = 0; // 表示转换结果中对应的字符位置 for (int i = 0; i < 16; i++) { // 从第一个字节开始,对 MD5 的每一个字节 // 转换成 16 进制字符的转换 byte byte0 = tmp[i]; // 取第 i 个字节 str[k++] = hexDigits[byte0 >>> 4 // 取字节中高 4 位的数字转换, // >>> 为逻辑右移,将符号位一起右移 str[k++] = hexDigits[byte0 // 取字节中低 4 位的数字转换 } s = new String(str); // 换后的结果转换为字符串 return s; }
sbj518
2016-02-04 · TA获得超过4.4万个赞
知道大有可为答主
回答量:1.1万
采纳率:81%
帮助的人:5294万
展开全部
Private Sub Command1_Click()
   Dim aBuffer() As Byte
   Cls
   '×Ö·û´®MD5
   Print "MD5("""") ="
   Call MD5String("")
   Print GetMD5Text() & vbLf
   Print "MD5(""abc"") ="
   Call MD5String("abc")
   Print GetMD5Text() & vbLf
   Print "MD5(""ÖÐÇï¿ìÀÖ£¡"") ="
   Call MD5String("ÖÐÇï¿ìÀÖ£¡")
   Print GetMD5Text() & vbLf
   '×Ö½ÚÊý×éMD5
   Print "×Ö½ÚÊý×é MD5(""abc"") ="
   Call MD5Bytes(StrConv("abc", vbFromUnicode))
   Print GetMD5Text() & vbLf
    
   Print "×Ö½ÚÊý×é MD5(""ÖÐÇï¿ìÀÖ£¡"") ="
   Call MD5Bytes(StrConv("ÖÐÇï¿ìÀÖ£¡", vbFromUnicode))
   Print GetMD5Text() & vbLf
   'ÎļþMD5
   Print "Îļþ£ºExplorer.exe¡¡MD5 = "
   Call MD5File("c:\windows\explorer.exe")
   Print GetMD5Text(); vbLf
End Sub
本回答被提问者采纳
已赞过 已踩过<
你对这个回答的评价是?
评论 收起
推荐律师服务: 若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询

为你推荐:

下载百度知道APP,抢鲜体验
使用百度知道APP,立即抢鲜体验。你的手机镜头里或许有别人想知道的答案。
扫描二维码下载
×

类别

我们会通过消息、邮箱等方式尽快将举报结果通知您。

说明

0/200

提交
取消

辅 助

模 式