Top-Themen

AppleEntwicklungHardwareInternetLinuxMicrosoftMultimediaNetzwerkeOff TopicSicherheitSonstige SystemeVirtualisierungWeiterbildungZusammenarbeit

Aktuelle Themen

Administrator.de FeedbackApache ServerAppleAssemblerAudioAusbildungAuslandBackupBasicBatch & ShellBenchmarksBibliotheken & ToolkitsBlogsCloud-DiensteClusterCMSCPU, RAM, MainboardsCSSC und C++DatenbankenDatenschutzDebianDigitiales FernsehenDNSDrucker und ScannerDSL, VDSLE-BooksE-BusinessE-MailEntwicklungErkennung und -AbwehrExchange ServerFestplatten, SSD, RaidFirewallFlatratesGoogle AndroidGrafikGrafikkarten & MonitoreGroupwareHardwareHosting & HousingHTMLHumor (lol)Hyper-VIconsIDE & EditorenInformationsdiensteInstallationInstant MessagingInternetInternet DomäneniOSISDN & AnaloganschlüsseiTunesJavaJavaScriptKiXtartKVMLAN, WAN, WirelessLinuxLinux DesktopLinux NetzwerkLinux ToolsLinux UserverwaltungLizenzierungMac OS XMicrosoftMicrosoft OfficeMikroTik RouterOSMonitoringMultimediaMultimedia & ZubehörNetzwerkeNetzwerkgrundlagenNetzwerkmanagementNetzwerkprotokolleNotebook & ZubehörNovell NetwareOff TopicOpenOffice, LibreOfficeOutlook & MailPapierkorbPascal und DelphiPeripheriegerätePerlPHPPythonRechtliche FragenRedHat, CentOS, FedoraRouter & RoutingSambaSAN, NAS, DASSchriftartenSchulung & TrainingSEOServerServer-HardwareSicherheitSicherheits-ToolsSicherheitsgrundlagenSolarisSonstige SystemeSoziale NetzwerkeSpeicherkartenStudentenjobs & PraktikumSuche ProjektpartnerSuseSwitche und HubsTipps & TricksTK-Netze & GeräteUbuntuUMTS, EDGE & GPRSUtilitiesVB for ApplicationsVerschlüsselung & ZertifikateVideo & StreamingViren und TrojanerVirtualisierungVisual StudioVmwareVoice over IPWebbrowserWebentwicklungWeiterbildungWindows 7Windows 8Windows 10Windows InstallationWindows MobileWindows NetzwerkWindows ServerWindows SystemdateienWindows ToolsWindows UpdateWindows UserverwaltungWindows VistaWindows XPXenserverXMLZusammenarbeit

MD5 Verschlüsselung aus einem String

Anleitung Entwicklung VB for Applications

Mitglied: scan5416

scan5416 (Level 1) - Jetzt verbinden

10.07.2008 um 07:17 Uhr, 14485 Aufrufe

Eine MD5 Verschlüsselung in VB.NET ist nicht so einfach wie in PHP.

Ich selber wollte vor ein paar Tagen eine solche Verschlüsselung erstellen, nachdem ich mich mit den vielen Resultaten von Google abgegeben habe und nach einigem Suchen ein Script gefunden habe welches mir zusagt, habe ich mich entschlossen schnell hier ein Tutorial zu schreiben welches dann anderen Users die Suche vereinfachen sollte.

01.
Imports System.Security.Cryptography 
02.
Imports System.Text 
03.
 
04.
Public Function MD5Cryptography(By Val strString as String) as String 
05.
    Dim md5 As New MD5CryptoServiceProvider 
06.
    Dim Data As Byte() 
07.
    Dim Result As Byte() 
08.
    Dim Res as String = "" 
09.
    Dim tmp As String = "" 
10.
 
11.
    Data = Encoding.ASCII.GetBytes(strString) 
12.
    Result = MD5.ComputeHash(Data) 
13.
 
14.
    For i as integer = 0 To Result.Length - 1 
15.
        tmp = Hex(Result(i)) 
16.
        if Len(tmp) = 1 Then 
17.
            tmp = "0" & tmp 
18.
        End If 
19.
 
20.
        Res += tmp 
21.
    Next 
22.
     
23.
    Return Res 
24.
 
25.
End Function
Damit ein MD5 Hash erstellt werden kann muss der String in Bytes umgewandelt werden
Data = Encoding.ASCII.GetBytes(strString)

Danach kann aus den Bytes der MD5 Hash erstellt werden
Result = MD5.ComputeHash(Data)

Mit der FOR Schleife wird dann als letztes noch das Resultat wieder in Zahlen und Buchstaben umgewandelt.

Ich hoffe ich konnte einigen Usern mit diesem kleinen Tutorial helfen.

Grüsse

scan
Ähnliche Inhalte
Verschlüsselung & Zertifikate
MD5-signierte Java-Anwendungen werden blockiert (IPMI etc.)

Tipp von C.R.S. zum Thema Verschlüsselung & Zertifikate ...

Debian
Zarafa smtp-auth via CRAM-MD5 (1)

Frage von zwirni zum Thema Debian ...

Verschlüsselung & Zertifikate
Verschlüsselung einer VM (7)

Frage von NCCTech zum Thema Verschlüsselung & Zertifikate ...

Visual Studio
gelöst DotNet String Sortierung (5)

Frage von emeriks zum Thema Visual Studio ...

Neue Wissensbeiträge
Windows Server

Umstellung SHA 1 auf SHA 2 - Migration der CA von CSP auf KSP

Tipp von Badger zum Thema Windows Server ...

Windows 10

Quato DTP94 unter Windows 10 x64 installieren und verwenden

Anleitung von anteNope zum Thema Windows 10 ...

Windows 10

Win10 1703 und Nutzerkennwörter bei Ersteinrichtung - erstaunliche Erkenntnis

(15)

Erfahrungsbericht von DerWoWusste zum Thema Windows 10 ...

Heiß diskutierte Inhalte
Windows 10
Windows 10 im Unternehmen? (26)

Frage von zorlayan zum Thema Windows 10 ...

LAN, WAN, Wireless
Ping u. DNS geht am Rechner nicht mehr (19)

Frage von Kuemmel zum Thema LAN, WAN, Wireless ...

Festplatten, SSD, Raid
Raid 1 2 SSD mit Windows Server 2016 (17)

Frage von jaywee zum Thema Festplatten, SSD, Raid ...

Voice over IP
Über Fritzfax over IP gehen nur einige Faxe (12)

Frage von shearer9 zum Thema Voice over IP ...