Om du menar att spara krypterade lösenord i Access så är det fullt möjligt. Eftersom Access inte verkar ha stöd för Binary eller Image som MS SQL Server har gör du förslagsvis så här:
using System.Security.Cryptography;
public string Encrypt(string password)
{
byte[] encrypt = System.Text.Encoding.Default.GetBytes(password);
SHA1 sha = new SHA1CryptoServiceProvider();
return Convert.ToBase64String(sha.ComputeHash(encrypt));
}
Hur skulle samma kod kunna se ut i VB.NET? Hur gör man för att hämta ett krypterat lösenord från databasen sen när det skall kontrolleras(vid login t.ex.)?
Hämta lösenordet gör du via ADO.NET, se quickstarten för mer information. Angående att få koden i VB.NET så har jag faktiskt glömt bort syntaxen :) Kanske någon annan kan hjälpa till?
' ***********
' MD5-krypto
' ***********
Public Shared Function Md5(ByVal str_krypt As String)
Dim md5Hasher as New System.Security.Cryptography.MD5CryptoServiceProvider()
Dim hashedDataBytes as Byte()
Dim encoder as New UTF8Encoding()
hashedDataBytes = md5Hasher.ComputeHash(encoder.GetBytes(str_krypt))
'Lägger krypteringen i en sträng ( normalt 16 bitars array)
Dim str_temp as String
Dim b as byte
For each b in hashedDataBytes
str_temp=str_temp+(b).ToString("x2")
Next b
'Skickar tillbaka värdet
Return str_temp
End Function
259 ms totalt · 4 externa anrop · v20260731065814-full.86ec41c2