Ανοίξτε VB6 αρχείο προέλευσης σε έναν επεξεργαστή κειμένου , όπως το Microsoft Visual Basic 6 . 2
Προσθέστε μια διαδικασία που μπορείτε να χρησιμοποιήσετε για την αναζήτηση μια τιμή μητρώου , από την προσθήκη του κώδικα :
Private Sub GetRegKeyValue ( sKeyName As String , sValueName Όπως String )
Dim lRetVal Όπως Long
Dim HKEY Όπως Long
Dim vValue Όπως Παραλλαγή
lRetVal = RegOpenKeyEx ( HKEY_CURRENT_USER , sKeyName , 0 , KEY_QUERY_VALUE , HKEY )
lRetVal = QueryValueEx ( HKEY , sValueName , vValue )
MsgBox vValue
RegCloseKey ( HKEY )
End Sub
εικόνων 3
Ερώτημα την τιμή μητρώου χρησιμοποιώντας την καθορισμένη διαδικασία με την προσθήκη του κώδικα :
GetRegKeyValue " HKEY_CLASSES_ROOT \\ XML \\ CLSID " , " ( προεπιλογή) "
Αυτό θα ανοίξει ένα παράθυρο μηνύματος με την τιμή στο παρεχόμενο κλειδί . Εάν η τιμή δεν υπάρχει , η διαδικασία θα επιστρέψει με τον κωδικό σφάλματος " 2 - . ERROR_BADKEY » Αντικαταστήστε το " HKEY_CLASSES_ROOT \\ XML \\ CLSID " με το κλειδί που αναζητάτε και να αντικατασταθεί " ( προεπιλογή) " με την τιμή που θέλετε να αναζητήσετε .
Η
4 Αποθηκεύστε το αρχείο προέλευσης της βιταμίνης B6, την κατάρτιση και εκτέλεση του πρόγραμμα για να δείτε την τιμή του κλειδιού μητρώου .
Η
εικόνων
Πνευματικά δικαιώματα © Γνώση Υπολογιστών Όλα τα δικαιώματα κατοχυρωμένα