Πώς να υπολογίσετε ένα Checksum σε VB

Η έννοια του αθροίσματος εφευρέθηκε νωρίς στην ιστορία της επιστήμης των υπολογιστών για να επαληθεύσει την ακεραιότητα των δεδομένων . Το πιο βασικό ελέγχου είναι να υπολογιστεί το άθροισμα όλων των 1s και 0s που συνθέτουν τα δεδομένα ενός αρχείου . Ο αριθμός αυτός μπορεί να αποθηκεύονται ξεχωριστά. Σε μεταγενέστερο στάδιο μπορεί να υπολογιστεί εκ νέου για να βεβαιωθείτε ότι το ποσό είναι το ίδιο . Αν είναι , το αρχείο δεν έχει αλλάξει, και η ακεραιότητα είναι άθικτο . Σύγχρονη αθροίσματα ελέγχου είναι πολύ πιο πολύπλοκα , αλλά για προγραμματιστές εγγράφως σε Visual Basic , η NET framework . Παρέχει τη δυνατότητα υπολογισμού αθροίσματος ελέγχου έξω από το κουτί . Οδηγίες
Η 1

αντιγραφή και επικόλληση τις ακόλουθες δηλώσεις εισαγωγές στην κορυφή του αρχείου που περιέχει την τάξη με την οποία θέλετε να πάρετε το checksum :

Εισαγωγές System.IOImports System.Security . κρυπτογραφία
2

Αντιγράψτε και επικολλήστε την ακόλουθη λειτουργία μέσα στο σώμα τάξη :

Private Shared λειτουργία GetChecksum ( αρχείο ως String ) ως StringUsing ρεύμα καθώς FileStream = File.OpenRead ( αρχείο ) Dim sha ως SHA256Managed = Νέα SHA256Managed ( ) Dim άθροισμα ελέγχου ως byte [ ] = sha.ComputeHash ( ρεύμα ) Επιστροφή BitConverter.ToString ( checksum ) Αντικατάσταση. ( " - " , String.Empty ) End Function UsingEnd
Η
3

Καλέστε τη λειτουργία checksum με τον ακόλουθο κώδικα :

Δημ. checksumValue ως String = YourClassName.GetChecksum ( " C : \\ path \\ to \\ file.ext " )
Η

Η