Vitajte na [www.pocitac.win] Pripojiť k domovskej stránke Obľúbené stránky
Skopírujte a vložte nasledujúci príkazy Imports do hornej časti súboru , ktorý obsahuje triedu , s ktorou chcete získať Kontrolný súčet :
Dovoz System.IOImports System.Security . kryptografie
2
skopírujte a vložte nasledujúci funkciu do tela triedy : klipart
Súkromná Shared Function GetChecksum ( súboru ako reťazec ) ako StringUsing prúdu ako FileStream = File.OpenRead ( súbor ) Dim sha ako SHA256Managed = Nové SHA256Managed ( ) Dim kontrolného súčtu ako byte [ ] = sha.ComputeHash ( stream ) Späť BitConverter.ToString ( checksum ) Nahradiť . ( " - " , String.Empty ) Koniec UsingEnd funkcie
3
Volanie funkcie kontrolného súčtu s nasledujúcim kódom :
Dim checksumValue ako String = YourClassName.GetChecksum ( " C : \\ cesta \\ k \\ file.ext " )