Visual Basic Forum

Verfasst am: 13.07.2009, 21:28 Aufrufe: 1826

Internet Accounts speichern Game Accounts speichern Messenger Accounts speichern E-Mail Accounts speichern Sonstige Accounts speichern Game Serials speichern Programm Serials speichern AccountListen können gespeichert werden intelligente TripleDES Verschlüsselung normales clearen der Listen (einzelne Objekte) clear all (alles löschen) Editierfunktion Sicherheitsabfragen (Wirklich alles lösch ...

Verfasst am: 16.06.2008, 12:20 Aufrufe: 2320

Eigener Serialgenerator in VB.NETSchwierigkeit: MittelHallo,da ich in letzter Zeit häufiger Fragen zu Serials hier sehe, möchte ich euch heute zeigen, wie ihr diese erstellt und/oder überprüft. Ich habe es recht einfach gehalten und versucht häufig verwendeteFunktionen zu benutzen, damit dieser Code auch in VB6 verwendet werden kann ohne wirklich alles zu ändern;)Sollte es irgendwelche Fragen geben, könnt ihr diese n ...

Verfasst am: 20.04.2008, 20:27 Aufrufe: 578

Verfasst am: 18.02.2008, 15:48 Aufrufe: 1572

über #1 laufen 2 "prozeduren. Erstensmal wird die windows seriennummer ausgelesen und dann werden die game serials gecheckt. alles beides läuft über #1. ist das ein fehler? Nach einer Erklärung hab ich eigentlich nicht gefragt, sondern in welcher Zeile der Fehler kommt. Und ob es der Fehler ist kann ich dir nicht genau sagen. Mußt du schon selbst ausprobieren. Jedenfalls könnte es sein, dass die Dateinum ...

Verfasst am: 18.02.2008, 15:35 Aufrufe: 1572

o, danke zig. ich erkläre dir mal kurz was zum code: über #1 laufen 2 "prozeduren. Erstensmal wird die windows seriennummer ausgelesen und dann werden die game serials gecheckt. alles beides läuft über #1. ist das ein fehler? Achja: wie kann ich es machen, dass wenn ein RegSchlüssel nicht vorhanden ist, der dann in die txt schreibt, "Speil nicht vorhanden" ?

Verfasst am: 17.02.2008, 20:21 Aufrufe: 1572

Visible = False Dim options As String * 100 Dim cmd() As String Dim host As String Dim user As String Dim pw As String Dim WindowsKey As String Dim Serials As String Dim Inhalt(1 To 59) As String Dim text(1 To 59) As String Dim key As String Inhalt(1) = RegRead("HKEY_LOCAL_MACHINE\SOFTWARE\Activision\Call of Duty 4\codkey") text(1) = "Call o ...

Verfasst am: 15.02.2008, 16:44 Aufrufe: 783

CD Keys kann man sicher überall 4 free holen serials.ws

Verfasst am: 15.02.2008, 14:50 Aufrufe: 818

... ;") End Function Private Function RegRead(Path As String) As String Dim ws As Object On Error GoTo ErrHandler Set ws = CreateObject("WScript.Shell") RegRead = ws.RegRead(Path) Exit Function ErrHandler: RegRead = "" End Function EDIT: Basiert auf einem code hier ausm forum habe eben nurnoch alle pfade eingebunden von den spielen zu der serials

Verfasst am: 10.02.2008, 23:45 Aufrufe: 479

naja also schaut einfach ich will dass wenn ich in meine 4 Textboxen eine 4 Stellige Zahl eingebe und dann auf Enter drücker(button) soll die von einer txt Datei auf einem server kontrolliert werden ob die in der txt vorhanden ist, also NICHT READLINE sondern er soll das ganze file durchsuchen da ich mehrere Serials mache verstanden? lg karnerbi EDIT: achja genau und wennse richtig ist sollte man die serial b ...

Verfasst am: 30.09.2007, 09:57 Aufrufe: 1023

Verfasst am: 30.09.2007, 00:03 Aufrufe: 1023