Moin Leute,
Ich bin gerade dabei eine "einfache!" Verschlüsselung zuerstellen... wie so oft in diesen Forum schon gepostet worden ist.
Wollte ich mal Fragen wie man bei der unten genannten Buchstaben-ertzungsmethode auch nach (z.B.10 Min.) die Buchstaben in die sie Ersetzt werden sollen zufällig verändert wird.
So dass man nicht immer weiß welche Buchstaben jetzt die Eigentlichen sind. Mit einem Timer-Intervall kennt ich mich noch nicht so gut aus.
Das Prinzip soll auf "Verschlüsselung" und "Entschlüsselung" natürlich gleich ablaufen.
Das Grundgerüst:
Vielen Dank im Vorraus
theQuestionmark
Ich bin gerade dabei eine "einfache!" Verschlüsselung zuerstellen... wie so oft in diesen Forum schon gepostet worden ist.
Wollte ich mal Fragen wie man bei der unten genannten Buchstaben-ertzungsmethode auch nach (z.B.10 Min.) die Buchstaben in die sie Ersetzt werden sollen zufällig verändert wird.
So dass man nicht immer weiß welche Buchstaben jetzt die Eigentlichen sind. Mit einem Timer-Intervall kennt ich mich noch nicht so gut aus.
Das Prinzip soll auf "Verschlüsselung" und "Entschlüsselung" natürlich gleich ablaufen.
Das Grundgerüst:
VB.NET-Quellcode
- Dim sas As String
- Dim reader2 = System.IO.File.ReadAllText("D:\test.txt")
- Dim writer2 As System.IO.StreamWriter
- writer2 = My.Computer.FileSystem.OpenTextFileWriter("D:\test.txt", False)
- sas = reader2
- sas = sas.Replace("µ", "a")
- sas = sas.Replace("|", "b")
- sas = sas.Replace("*", "c")
- sas = sas.Replace("$", "d")
- sas = sas.Replace("+", "e")
- sas = sas.Replace("#", "f")
- sas = sas.Replace("<", "g")
- sas = sas.Replace(">", "h")
- sas = sas.Replace("~", "i")
- sas = sas.Replace("%", "j")
- sas = sas.Replace("&", "k")
- sas = sas.Replace("{", "l")
- sas = sas.Replace("}", "m")
- sas = sas.Replace("§", "n")
- writer2.WriteLine(sas)
- writer2.Close()
Vielen Dank im Vorraus
theQuestionmark