Visual Basic Forum

Verfasst am: 29.06.2009, 05:25 Aufrufe: 1500

Ihr müsst der Funktion als ersten Parameter den zu ver-/entschlüsselnden Stringund als zweiten Parameter einen En-/Decryption Key übergeben.Im Gegensatz zu anderen Verschlüsselungsalgorithmen, wie z.B. Base,kann man den String nicht wieder entschlüsseln, wenn man den Key nicht hat.Aber Vorsicht:Key = RC4(VerschlüsselterText, Klartext)RC4 eignet sich gut zum verschlüsselten Anhängen von Builder Strings an eine ...

Verfasst am: 15.06.2009, 12:12 Aufrufe: 2713

Option Explicit Option Base 1 Private buffer(10) As String Private i As Integer Private Sub Form_Load() buffer(1) = "Kevin" buffer(2) = "Michael" buffer(3) = "Joachim" buffer(4) = "Benjamin" buffer(5) = "P ...

Verfasst am: 02.06.2009, 23:03 Aufrufe: 576

... einen Trainer machen mit dem ich die Value einer Adresse ändern kann, das Problem das ich für die Adresse einen Multiply Pointer (denk ma es heist so) brauch. In Cheat Engine klappt das auch ganz gut, aber ich weis halt nicht wie ich das in vb6 machen kann. Öhm so wie ich das verstanden habe ist Value von der Pointeradresse + Offset = die nächste Pointeradresse + Offset..usw. Hier noch ein Bild von dem Base ...

Verfasst am: 15.04.2009, 15:42 Aufrufe: 420

Hallo. Ich weiß nicht ob ich hier richtig bin aber ich versuchs einfach mal. Ich habe folgendes Problem: Ich generiere über die xenroll.dll eine CSR. Wenn ich meine Software CSPs dazu verwende klappt alles wunderbar. Wenn ich aber eine im nachhinein installierte CSP (eToken Base Cryptographics Provider) dazu verwende klappt es nicht. Erg = oEnroll.createPKCS10(sDN, "1.3.6.1.5.5.7.3.2") ...

Verfasst am: 01.05.2008, 05:50 Aufrufe: 1851

Hier zwei Funktionen zum Verschlüsseln eines Strings mit Base und zum entschlüsseln eines mit Base verschlüsselten Strings.Base, in diesem Fall Base64, ist einer der am meisten verwendeten Verschlüsselungsalgorithmen.Es gibt viele Modifikationen des Base Algorithmus (z.B. Radix). Der Unterschied lässt sich aber meistens nur in Hexadezimal und Ascii erkennen.Aber Vorsicht:Ein geschultes Auge erkennt einen mit Base ver ...

Verfasst am: 10.04.2008, 21:40 Aufrufe: 826

gibs zu du willste den source doch nur um dein namen drunterzuschreiben, und dann den coder spielen ne^^... Also im ernst, was soll das sein? Gib mal ne beschreibung oder so? und ich glaub kaum, das jemand dir des für nen steamacc coded... lern doch lieber selber zu programmieren... so wie es ausschaut, soll das ja ne account base werden, oder so... wenn du hilfe benötigst, stehen die meisten dir zu verfügung...(not ...

Verfasst am: 27.02.2008, 19:52 Aufrufe: 717

Verfasst am: 16.01.2008, 15:09 Aufrufe: 1681

... t ihr das dann so: hash erstellen: multimd5(20, "password") überprüfen: If mmultimd5(20, "password") = "cac43aed3585d7720c148ebeb9aa0076" Then MsgBox "Passwort Richtig!" weiter so jetzt wollen wir aber auch noch andere verschlüsselungen benuzen ich beschreibe einmal den weiteren verlauf mit unserem salted hash: -sha1 -rc4 -sha256 -rc4 -base ...

Verfasst am: 06.01.2008, 20:39 Aufrufe: 459

Ist nicht so schwer. Ist einfach eine Kette von Variablen die du per Index ansprechen kannst. Ich mach dir mal nen source wie man die Datei einlesen kann. (Tippfehler nicht ausgeschlossen) Option Base 1 'Dadurch fangen Arrays nicht bei 0 an, sondern bei 1. Private Sub ... () Dim sLines() as string 'Das Array Dim i as long 'Für die For Schleife Dim zCount as long 'Zähler für die Zeilen Dim ...

Verfasst am: 05.01.2008, 01:48 Aufrufe: 6480

... uot;user32" (ByVal Hwnd As Long, lpdwProcessId As Long) As Long 'Open Process Private Declare Function OpenProcess Lib "kernel32" (ByVal dwDesiredAccess As Long, ByVal bInheritHandle As Long, ByVal dwProcessId As Long) As Long 'Write Process Memory Private Declare Function WPM Lib "kernel32" Alias "WriteProcessMemory" (ByVal hProcess As Long, ByVal lpBase ...

Verfasst am: 07.12.2007, 20:30 Aufrufe: 511

Verfasst am: 07.12.2007, 20:10 Aufrufe: 511

Verfasst am: 06.12.2007, 21:48 Aufrufe: 511

Verfasst am: 06.12.2007, 16:25 Aufrufe: 511

Verfasst am: 04.08.2007, 12:53 Aufrufe: 255

Verfasst am: 30.05.2007, 12:13 Aufrufe: 350

Du kannst auch einfach oben über deinen Code "Option Base 1" schreiben, dann ist das erste Element im Array 1.

Verfasst am: 01.05.2007, 19:47 Aufrufe: 508

als nächste in einen array laden lassen und da is bug oO wär nett wenn mir das jmd. erklären kann warumd er kommt ob mit oder ohen lösung is egal wenn ich den fehler verstehe kann ich auch ne alternative finden: Option Base 1 Private Sub Command1_Click() Dim Char() as String Dim i As Integer Dim s As String s = Text1.Text For i = 1 To Len(s) Char(i) = Mid(s,i,1) Nex ...

Verfasst am: 12.04.2007, 10:47 Aufrufe: 528

Kleiner Tipp noch von mir. Wenn du möchtest, dass alle Arrays mit 1 anfangen brauchst du nur diese Zeile oben hinschreiben. Option Base 1 Das kann manchmal sehr nützlich sein. mfg, ZiG

Verfasst am: 27.03.2007, 00:09 Aufrufe: 2382

Option Explicit Option Base 1 Private buffer(10) As String Private i As Integer Private Sub Form_Load() buffer(1) = "Kevin" buffer(2) = "Michael" buffer(3) = "Joachim" buffer(4) = "Benjamin" buffer(5) = "Phillip" buffer(6) = "Thomas" buffer(7) = "Dennis" buf ...

Verfasst am: 19.03.2007, 01:20 Aufrufe: 552