DESCryptoServiceProvider des = new DESCryptoServiceProvider();
try
{
//把字符串放到byte数组中
//原来使用的UTF8编码,我改成Unicode编码了,不行
byte[] inputByteArray = Encoding.Default.GetBytes(pToEncrypt);
//byte[] inputByteArray=Encoding.Unicode.GetBytes(pToEncrypt);
//建立加密对象的密钥和偏移量
//原文使用ASCIIEncoding.ASCII方法的GetBytes方法
//使得输入密码必须输入英文文本
des.Key = desKey; // ASCIIEncoding.ASCII.GetBytes(sKey);
des.IV = desIV; //ASCIIEncoding.ASCII.GetBytes(sKey);
MemoryStream ms = new MemoryStream();
CryptoStream cs = new CryptoStream(ms, des.CreateEncryptor(),
CryptoStreamMode.Write);
//Write the byte array into the crypto stream
//(It will end up in the memory stream)
cs.Write(inputByteArray, 0, inputByteArray.Length);
cs.FlushFinalBlock();
//Get the data back from the memory stream, and into a string
StringBuilder ret = new StringBuilder();
foreach(byte b in ms.ToArray())
{
//Format as hex
ret.AppendFormat("{0:X2}", b);
}
ret.ToString();
return ret.ToString();
}
catch
{
return pToEncrypt;
}
finally
{
des = null;
}
}
DESCryptoServiceProvider des = new DESCryptoServiceProvider();
try
{
//Put the input string into the byte array
byte[] inputByteArray = new byte[pToDecrypt.Length / 2];
for(int x = 0; x < pToDecrypt.Length / 2; x++)
{
int i = (Convert.ToInt32(pToDecrypt.Substring(x * 2, 2), 16));
inputByteArray[x] = (byte)i;
}
//建立加密对象的密钥和偏移量,此值重要,不能修改
des.Key = desKey; //ASCIIEncoding.ASCII.GetBytes(sKey);
des.IV = desIV; //ASCIIEncoding.ASCII.GetBytes(sKey);
MemoryStream ms = new MemoryStream();
CryptoStream cs = new CryptoStream(ms, des.CreateDecryptor(),CryptoStreamMode.Write);
//Flush the data through the crypto stream into the memory stream
cs.Write(inputByteArray, 0, inputByteArray.Length);
cs.FlushFinalBlock();
//Get the decrypted data back from the memory stream
//建立StringBuild对象,CreateDecrypt使用的是流对象,必须把解密后的文本变成流对象
StringBuilder ret = new StringBuilder();
'------------MD5要签名的磁盘文件-----------------------------------
'定义一个文件流,以打开要签名的磁盘文件
Dim 文件流 As New System.IO.FileStream("C:\原文件.txt", IO.FileMode.Open)
'定义一个字节数组以存入文件流
Dim 文件流数组(文件流.Length - 1) As Byte
'将文件流存入文件数组
文件流.Read(文件流数组, 0, 文件流.Length)
'建立MD5对象
Dim MD5对象 As New System.Security.Cryptography.MD5CryptoServiceProvider
'得到字节数组格式的MD5值
Dim MD5值数组() As Byte = MD5对象.ComputeHash(文件流数组)
文件流.Close() '关闭文件流
'------------------------END----------------------------------------
Dim 签名数据 As New IO.FileStream("c:\签名信息.byte", IO.FileMode.Create)
签名数据.Write(签名, 0, 签名.Length)
签名数据.Close()
'--------------------------END---------------------------------------
=========================================================================
公钥验证:
'在C盘上在有[Pubkey.xml(公钥文件)]文件
'与[新文件.txt(要验证的信息文件)]文件
'与[签名信息.byte(签名信息文件)]文件
'-------------------------------------------------------------
'-----------载入签名信息文件------------------------------------------
'定义一个文件流,以打开要签名的磁盘文件
Dim 签名信息文件 As New System.IO.FileStream("C:\签名信息.byte", IO.FileMode.Open)
'定义一个字节数组以存入文件流
Dim 签名信息数组(签名信息文件.Length - 1) As Byte
'------------MD5要验证的磁盘文件-----------------------------------
'定义一个文件流,以打开要签名的磁盘文件
'如果[新文件.txt]的内容与[原文件.txt]一样将在最后显示True,不一样将为False
Dim 文件流 As New System.IO.FileStream("C:\新文件.txt", IO.FileMode.Open)
'定义一个字节数组以存入文件流
Dim 文件流数组(文件流.Length - 1) As Byte
'将文件流存入文件数组
文件流.Read(文件流数组, 0, 文件流.Length)
'建立MD5对象
Dim MD5对象 As New System.Security.Cryptography.MD5CryptoServiceProvider
'得到字节数组格式的MD5值
Dim MD5值数组() As Byte = MD5对象.ComputeHash(文件流数组)
文件流.Close() '关闭文件流
'------------------------END----------------------------------------