Πώς να φορτώσει τα πιστοποιητικά από τα Windows keystore Με Visual Basic

A keystore των Windows είναι ένας server που κατέχει το σύνολο των Secured Sockets Layer σας ( SSL) για τις ιστοσελίδες σας . Visual Basic ( VB ) οι αιτήσεις για το διακομιστή σας μπορεί να φορτώσει και να δείτε αυτά τα πιστοποιητικά από το διακομιστή . Αυτό είναι ευεργετικό όταν δημιουργήσετε το δικό σας λογισμικό διαχείρισης για διακομιστές των Windows σας . Φόρτωση πιστοποιητικά SSL επιτρέπουν στους διαχειριστές να εξετάσουν μια λίστα των πιστοποιητικών ιστοσελίδας . Ο προγραμματισμός αυτός επιτυγχάνεται στο λογισμικό Visual Studio ανάπτυξη . Οδηγίες
Η

1 Κάντε κλικ στο κουμπί των Windows "Start ", ακολουθούμενο από το " Όλα τα προγράμματα ". Κάντε κλικ στο " Microsoft Visual Studio", και στη συνέχεια κάντε κλικ στο " Visual Basic" για να ανοίξετε το λογισμικό σας . 2

Κάντε κλικ στο "Αρχείο " μενού , και στη συνέχεια κάντε κλικ στο κουμπί "Άνοιγμα ". Στη λίστα των πρόσφατων έργων , κάντε διπλό κλικ στο έργο VB που χρησιμοποιεί το keystore Windows. Μετά τα φορτία του έργου , κάντε δεξί κλικ στη φόρμα VB και επιλέξτε " Προβολή κώδικα " για να φορτώσετε το αρχείο του κώδικα στο χώρο εργασίας σας .
Εικόνων 3

Καλέστε την τάξη των Windows keystore και να δημιουργήσετε μια μεταβλητή . Φόρτωση την κατηγορία keystore καθιστά διαθέσιμα όλα τα πιστοποιητικά SSL στον κώδικά σας . Πληκτρολογήστε τον ακόλουθο κώδικα στο αρχείο σας :

Dim keystore As New Chilkat.Cert ( )
Η

4 Ανοίξτε το πιστοποιητικό σας . Ανοίξτε το αρχείο που βρίσκεται στο διακομιστή keystore αφού έχετε τοποθετήσει το keystore . Πληκτρολογήστε τον ακόλουθο κώδικα :

αρχείο = keystore.LoadFromFile ( " myfile.cer " )

Αντικαταστήστε το " myfile.cer " με το όνομα του δικού σας πιστοποιητικού SSL . Για παράδειγμα , εάν έχετε ένα αρχείο κατάστημα πιστοποιητικό με το όνομα " companyfile.cer " που βρίσκεται στη μονάδα δίσκου C , πληκτρολογήστε τον ακόλουθο κώδικα :

αρχείο = keystore.LoadFromFile ( "c : \\ companyfile.cer " )

5

Προσθήκη κώδικα για να βεβαιωθείτε ότι το πιστοποιητικό SSL είναι φορτωμένο . Σε αυτό το παράδειγμα , ένα πλαίσιο μηνύματος ανοίγει για να επιβεβαιώσετε ότι το αρχείο SSL ανοίγει : " . Φορτώνεται "

MsgBox keystore.SubjectDN Τζούρδας
εικόνων