Πώς να κρυπτογραφήσει έναν κωδικό πρόσβασης σε VBS Script

Όταν κρυπτογραφήσετε έναν κωδικό πρόσβασης στο διαδίκτυο ή offline , μπορείτε συνήθως να χρησιμοποιήσετε το MD5 hashing λειτουργία που σας επιτρέπει να κρυπτογραφήσετε τους κωδικούς πρόσβασης και να ταιριάζει με το hash με στοιχεία που της έδωσαν από ένα χρήστη που επιχειρεί να συνδεθείτε Α hash αντιπροσωπεύει ουσιαστικά μια μονάδα δεδομένων μεταβλητού μεγέθους μετατρέπεται σε ένα σταθερό ποσό των χαρακτήρων σε μια ακολουθία . Για να πραγματοποιήσει αυτή τη διαδικασία , θα πρέπει να τοποθετήσετε ένα βοηθητικό πρόγραμμα MD5 στον ίδιο κατάλογο με το αρχείο VBS σας, έτσι ώστε το script μπορεί να εκτελέσει τη χρησιμότητα και να δημιουργήσει μια τιμή κατακερματισμού MD5 από αυτό . Οδηγίες
Η 1

Πηγαίνετε στην ιστοσελίδα Fourmilab και να κατεβάσετε το αρχείο " ZIP" για το βοηθητικό πρόγραμμα γραμμής εντολών MD5 . Ανοίξτε το αρχείο Zip από όπου μπορείτε να κατεβάσετε και να εξαγάγετε τα περιεχόμενα στον κατάλογο των VBS αρχείο που θέλετε να κρυπτογραφήσετε με . 2

Ανοίξτε το αρχείο VBS σας σε ένα πρόγραμμα επεξεργασίας κώδικα .

με 3

Επικολλήστε τον ακόλουθο κώδικα στο script σας :

MD5Hash Public Function ( sFileName )

« Αυτό το σενάριο παρέχεται σύμφωνα με την άδεια Creative Commons βρίσκεται

' στο http://creativecommons.org/licenses/by-nc/2.5/. Δεν μπορεί

» να χρησιμοποιηθεί για εμπορικούς σκοπούς με έξω την ρητή έγγραφη συναίνεση

» του NateRice.com

Const OpenAsDefault = -2

Const FailIfNotExist = 0

Const ForReading = 1

Dim oMD5CmdShell , oMD5CmdFSO , Στεμπ , sTempFile , fMD5CmdFile , Spath

Δημ. fResultsFile , sResults

Set oMD5CmdShell = CreateObject ( " WScript.Shell " )

Σετ oMD5CmdFSO = CreateObject ( " Scripting.FileSystemObject " )

STEMP = oMD5CmdShell.ExpandEnvironmentStrings ( " % TEMP % " )

sTempFile = STEMP & "\\" & oMD5CmdFSO.GetTempName

------ Επαλήθευση αρχείου εισόδου Existance -----

Αν δεν oMD5CmdFSO.FileExists ( sFileName ) Στη συνέχεια

MD5Hash = " Αποτυχία : . Μη έγκυρο αρχείο εισόδου "