vb@rchiv
VB Classic
VB.NET
ADO.NET
VBA
C#
 Erstellen von dynamischen Kontextmen?s - wann immer Sie sie brauchen!  
 vb@rchiv Quick-Search: Suche startenErweiterte Suche starten   Impressum  | Datenschutz  | vb@rchiv CD Vol.6  | Shop Copyright ©2000-2025
 
zurück

 Sie sind aktuell nicht angemeldet.Funktionen: Einloggen  |  Neu registrieren  |  Suchen

Visual-Basic Einsteiger
Re: Textdatei Verschlüsseln 
Autor: esilance
Datum: 19.03.06 12:02
Hallo,

wie gesagt... die verschlüsselung klappt zwar jetzt, aber der generator dadurch nicht mehr, da er keine namen mehr generiert und immer nur den selben Namen anzeigen tut

__________________________________

Private Sub cmbVornamen_Click()

call Crypt("vornamen.txt")

Dim Vorname(4726) As String
Dim i As Integer
i = 0

'Textdatei einlesen
Open "vornamen.txt" For Input As 1
While Not EOF(1)
i = i + 1
Line Input #1, Vorname(i)
Wend
Close 1

'Zufallsname erzeugen
Dim X As Integer
X = CInt(Rnd * 4726)

'Ausgabe
lblVorname.Caption = Vorname(X)

Clipboard.Clear
Clipboard.SetText lblVorname.Caption

call Crypt("vornamen.txt")

End Sub
alle Nachrichten anzeigenGesamtübersicht  |  Zum Thema  |  Suchen

 ThemaViews  AutorDatum
Textdatei Verschlüsseln1.964esilance17.03.06 14:25
Re: Textdatei Verschlüsseln1.732AndyOG17.03.06 14:49
Re: Textdatei Verschlüsseln1.618esilance17.03.06 15:03
Re: Textdatei Verschlüsseln1.637AndyOG17.03.06 16:58
Re: Textdatei Verschlüsseln1.645esilance17.03.06 22:09
Re: Textdatei Verschlüsseln1.595esilance18.03.06 13:04
Re: Textdatei Verschlüsseln1.591OldMan18.03.06 15:16
Re: Textdatei Verschlüsseln1.578esilance18.03.06 16:08
Re: Textdatei Verschlüsseln1.604OldMan18.03.06 17:45
Re: Textdatei Verschlüsseln1.623esilance19.03.06 12:02
Re: Textdatei Verschlüsseln1.593OldMan19.03.06 12:49
Re: Textdatei Verschlüsseln1.604esilance19.03.06 13:19
Re: Textdatei Verschlüsseln1.815OldMan19.03.06 13:52
Re: Textdatei Verschlüsseln1.609OldMan17.03.06 22:31
Re: Textdatei Verschlüsseln1.664esilance18.03.06 13:05

Sie sind nicht angemeldet!
Um auf diesen Beitrag zu antworten oder neue Beiträge schreiben zu können, müssen Sie sich zunächst anmelden.

Einloggen  |  Neu registrieren

Funktionen:  Zum Thema  |  GesamtübersichtSuchen 

nach obenzurück
  
   

Copyright ©2000-2025 vb@rchiv Dieter Otter
Alle Rechte vorbehalten.
Microsoft, Windows und Visual Basic sind entweder eingetragene Marken oder Marken der Microsoft Corporation in den USA und/oder anderen Ländern. Weitere auf dieser Homepage aufgeführten Produkt- und Firmennamen können geschützte Marken ihrer jeweiligen Inhaber sein.

Diese Seiten wurden optimiert für eine Bildschirmauflösung von mind. 1280x1024 Pixel