VB: Verschlüsselungsprogramm

Dieses Thema VB: Verschlüsselungsprogramm im Forum "Windows XP Forum" wurde erstellt von Alexander16, 24. Feb. 2003.

Thema: VB: Verschlüsselungsprogramm Hi Ich habe ein Verschlüsselungsprogramm gebastelt. Nun will ich dem Programm beibringen das bei der...

  1. Hi

    Ich habe ein Verschlüsselungsprogramm gebastelt.
    Nun will ich dem Programm beibringen das bei der Verschlüsselung die Zeilenumbrüche erhalten bleiben.

    Vielen Dank schon mal ;D

    Hier der Code:
    ---------------------------------------------------------------------------------
    Option Explicit
    Dim Anzahl
    Dim Zeichen
    Dim i

    Private Sub cmd_Beenden_Click()
    Unload Me
    End
    End Sub

    Private Sub cmd_Ent_Click()
    Anzahl =
    Zeichen =
    i =
    txt_Text2.Text =
    Status = 0

    If txt_Text.Text <> And txt_Passwort.Text <> Then
    Anzahl =
    Anzahl = Len(txt_Text.Text)
    Status.Max = Anzahl

    For i = 1 To Anzahl
    Zeichen = Mid(txt_Text.Text, i, 1)
    txt_Text2.Text = txt_Text2.Text & Chr$(Asc(Zeichen) - Val(txt_Passwort.Text))
    Status = Status + 1
    Next i
    End If

    End Sub

    Private Sub cmd_Ver_Click()
    Anzahl =
    Zeichen =
    i =
    txt_Text2.Text =
    Status = 0

    If txt_Text.Text <> And txt_Passwort.Text <> Then
    Anzahl =
    Anzahl = Len(txt_Text.Text)
    Status.Max = Anzahl

    For i = 1 To Anzahl
    Zeichen = Mid(txt_Text.Text, i, 1)
    txt_Text2.Text = txt_Text2.Text & Chr$(Asc(Zeichen) + Val(txt_Passwort.Text))
    Status = Status + 1
    Next i
    End If
    End Sub
    ------------------------------------------------------------------
     
  2. Hi

    For i = 1 To Anzahl
    Zeichen = Mid(txt_Text.Text, i, 1)
    if zeichen = chr(10) then next i
    txt_Text2.Text = txt_Text2.Text & Chr$(Asc(Zeichen) - Val(txt_Passwort.Text))
    Status = Status + 1
    Next i

    So sollte das in etwa gehen glaube ich.
    Problem ist aber, das ja eventuell auch andere Zeichen durch die Verschlüsselung zu Leerzeichen werden und man sie beim entschlüsseln nicht mehr von den richtigen unterscheiden kann.

    Gruß, Michael
     
  3. kannste mir das mal als zip-file schicken ?
     
Die Seite wird geladen...

VB: Verschlüsselungsprogramm - Ähnliche Themen

Forum Datum
Verschlüsselungsprogramm Software: Empfehlungen, Gesuche & Problemlösungen 1. März 2012
verschlüsselungsprogramm für dateien unter xp pro mit sp3 Software: Empfehlungen, Gesuche & Problemlösungen 9. Juni 2011
Verschlüsselungsprogramm gesucht Software: Empfehlungen, Gesuche & Problemlösungen 5. Mai 2010
Verschlüsselungsprogrammnamen gesucht nach Löschung! Software: Empfehlungen, Gesuche & Problemlösungen 17. Sep. 2007
suche SICHERES verschlüsselungsprogramm Software: Empfehlungen, Gesuche & Problemlösungen 31. Aug. 2004