[HILFE] Programm mit HWID-Check vor Leeching schützen [VB 10 EX]

Stell deine Fragen präziser, anstatt nach ner kompletten Source zu betteln, dann wird dir auch geholfen.

Ich glaube du wärst um einiges Schneller mit einer MySQL Datenbank!

möchte dich jetzt nicht beleidigen @threadstarter aber.. schon einmal drüber nachgedacht wenn du selbst weißt das du zu doof dafür bist sowas zu realisieren.. das du es nicht tun solltest weil es dir nichts bringt? wenn du das nicht schaffst wird dein programm niemals so gut sein das du sowas überhaupt brauchen würdest/könntest.. lern weiter programmieren und wenn dus richtig kannst und was gescheites programmiert hast wo es von nöten ist bekommste das auch so hin ohne sourcecodes von anderen, kannst dann ja trotztdem nach hilfe bitten. schätze aber so wird das den meißten zu doof sein dir einfach nen source vor das gesicht zu klatschen, hatten ja auch arbeit damit den zu coden ;)!

lg

In deinem Treasure Creator Thread stand gesten noch drin das man ihn kaufen soll, weil du ja so einen tollen HWID Schutz gecoded hast, aber jetzt lese ich hier das du googlen willst

Quote:

Originally Posted by RealGamerZ Hmm, OK. Dann Google ich halt^^

Was ist dann der große unterschied zwischen deinem Teureren Treasure Creator und der Source von Kraizy?

ich finde das zu köstlich, erst kauft es sich die source von kraizy dann will er auch noch nen hwid check von (u.a.) ihm haben damit er das programm besser verkaufen kann. Echt nice sowas :D

btt, Einfach hwid auslesen und in irgendeiner form mit einer gespeicherten hwid überprüfen, am besten über nen mysql db; über nen txtdatei die auf nen ftp liegt ist extrem crappy

Google einfach mal nach hwid system vb.net da gibts komplette tutorials inklusive db. Wenn du das nicht verstehst dann haste pech und du solltest dir was einfaches suchen.

Wie war es mit 3 minutiger Arbeit das zu ueberspringen?

Ganz Ganz einfach geht es so (sehr unsicher):

Quote:

Imports System.Net Imports System.Management Public Class Form1 Private WebClient As New WebClient = WebClient.DownloadString("http://blabla.com/hwid.txt") Private Sub Form1_Load() If Webclient.Contains(HWID) Then NächsteForm.Show() Me.Hide() Else MsgBox("Deine HWID wurde nicht gefunden!") End If End Sub Function HWID() Dim ManagementClass As New ManagementClass("win32_processor") Dim ManagementObjectCollection As ManagementObjectCollection = ManagementClass.GetInstances For Each ManagementObject As ManagementObject In ManagementObjectCollection If CInfo = "" Then CInfo = ManagementObject.Properties("processorID").Value.T oString Exit For End If Next Return CInfo End Function End Class

Kann dir nicht sagen ob der Code funktioniert, habe ihn aus der Hand geschrieben. Ist halt sehr einfach gehalten.