Beiträge von Schrubber

Jo glaube auch. Er meint, dass er anstatt direkt mit dem Windows per Autostart nur sein eigenes Skript startet, welches Beispielsweise nach 20 Sekundne (wenn der Rest fertig ist) die Autostart-Programme selber startet. Er will damit vielleicht eine Geschwindigkeitserhöhung erreichen.

Ja, des passt

Ich schaus mir nachher mal an und sag euch, was dabei raußgekommen ist.

Man könnte die Zugangsdaten mit Hilfe einer BitXOr und einem Schlüssel verschlüsseln und diesen Key auswärts in deine Datenbank ablegen ;D

Also muss man erst auf die eine DB connecten für den Schlüssel, um die anderen Zugangsdaten zu entschlüsseln xD

Ok. Den fand ich in 8 DB´s und 38Crackern net o.o
Aber des is länger als 8 Zeichen ne?

Dann die Daten als MD5 eintragen und jedesmal decrypten

-.- Vergesst mein Script erstmal.. Hab hier alle Änderungen einfach übernommen ohne sie vorher zu testen. Nun funzt das Script nciht mehr

$SQLCode = "INSERT INTO Tool (Serial, Account, Password, VVersion, Time, lastcheck) VALUES('"&$read&"', 'user"&$i&"', '1', 'V', '30', '29062010')

Ich habs auch erst geschafft, mich nach 2 Jahren hier zu melden

Keyle:
Bottrop

#include <mysql.au3>

$UserName = "root"
$Password = "root"
$Database = "lolrofl"
$i = 1
$MySQLServerName = "localhost"

$SQLInstance = _MySQLConnect($UserName,$Password,$Database,$MySQLServerName)

while $i <51
$SQLCode = "INSERT INTO Tool (Serial, Account, Password, VVersion, Time, lastcheck) VALUES('key"&$i&"'', 'user"&$i&"', '1', 'V', '30', '29062010' )"
$i = $i + 1
WEnd
_Query($SQLInstance, $SQLCode)
_MySQLEnd($SQLInstance)

Bei $i < 51 einfach die Grenze + 1 eintragen.

Oder wie meinst du das?

Soo.

Ich erstell mal mein eigenes Thema zu dem Script.

Das Script, welches ihr hier finden werdet, habe ich mit Hilfe von der mysql.au3 UND der UDF von ProgAndy gemacht.

Kritik / Lob gern gesehen.

Werde weitgehend versuchen, alles zu realisieren.

Updates:

Datenbankbasis sowie Serialregistrierung möglich

Login für Folgescript möglich

Beschränkter Zugang (Per Rechteabfrage der VVersion)

#include <ButtonConstants.au3>
#include <EditConstants.au3>
#include <GUIConstantsEx.au3>
#include <StaticConstants.au3>
#include <WindowsConstants.au3>
#include <mysql.au3>
$toolname = "Schrubbers Testtool"
$short = "Schrubber"
$dbname = "lolrofl"
$table = "test"
Local $UserName = "root", $Password = "root", $Database = $dbname, $MySQLServerName = "localhost"
_MySQL_InitLibrary()
If @error Then
TrayTip('Error', 'libmysql.dll konnte nicht gefunden werden', 10, 3)
Sleep(10000)
Exit
EndIf
$MysqlConn = _MySQL_Init()
$Connected = _MySQL_Real_Connect($MysqlConn, $MySQLServerName, $UserName, $Password, $Database)
$hSQLping = _MySQL_Ping($MysqlConn)
If $hSQLping = 1 Or $hSQLping = 3 Then
TrayTip('Error', 'Verbindung zur Datenbank konnte nicht hergestellt werden', 10, 3)
Sleep(10000)
Exit
EndIf

#Region ### START Koda GUI section ### Form=
$title = GUICreate($toolname, 386, 322, 192, 124)
$b_login = GUICtrlCreateButton("Login", 264, 256, 113, 25, $WS_GROUP)
$b_buyfull = GUICtrlCreateButton("Vollversion kaufen", 136, 257, 113, 23, $WS_GROUP)
$b_XDXDXDXDXD = GUICtrlCreateButton("XDXDXDXDXD", 8, 256, 113, 25, $WS_GROUP)
$l_headline = GUICtrlCreateLabel($short, 50, 24, 260, 58)
GUICtrlSetFont(-1, 28, 800, 2, "Nightclub BTN")
GUICtrlSetColor(-1, 0xFF0000)
$i_username = GUICtrlCreateInput("", 104, 144, 233, 21)
$i_passwort = GUICtrlCreateInput("", 104, 176, 233, 21, BitOR($ES_PASSWORD,$ES_AUTOHSCROLL))
$l_username = GUICtrlCreateLabel("Username", 40, 144, 52, 17)
$l_password = GUICtrlCreateLabel("Password", 40, 176, 50, 17)
$l_info = GUICtrlCreateLabel("Sie nutzen die", 40, 224, 74, 17)
$l_version = GUICtrlCreateLabel("Testversion", 112, 224, 59, 17)
GUICtrlSetColor(-1, 0xFF0000)
$l_leftinfo = GUICtrlCreateLabel("Verbleibende Zeit:", 16, 296, 90, 17)
$l_timeleft = GUICtrlCreateLabel("(No time)", 112, 296, 45, 17)
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###

While True
$nMsg = GUIGetMsg()
Switch $nMsg
Case $GUI_EVENT_CLOSE
_quit()
Case $b_login
if (GUICtrlRead($i_username) = "") Then
MsgBox(0, "Error", "Sie haben keinen Username eingegeben.")
Elseif (GUICtrlRead($i_passwort) = "") Then
MsgBox(0, "Error", "Sie haben kein Passwort eingegeben.")
Else
Local $sReturn = _mysql_checklogin($MysqlConn, GUICtrlRead($i_username))
If GUICtrlRead($i_passwort) == $sReturn Then
MsgBox(0, "Login erfolgreich", "Sie haben sich erfolgreich eingeloggt!")
$version = _mysql_checkversion($MysqlConn, GuiCtrlRead($i_username))
if($version = "V") Then
GUICtrlSetData($l_version, "Vollversion")
GUICtrlSetColor($l_version, 0x32CD32)
EndIf
GUICtrlSetData($l_timeleft, _mysql_checktime($MysqlConn, GuiCtrlRead($i_username)))
Else
MsgBox(0, "Login fehlgeschlagen", "Die eingegebenen Daten sind falsch. Versuchen sie es bitte erneut.")
EndIf
EndIf
Case $b_buyfull
ShellExecute("http://LinkzuderHomepage.de")
EndSwitch
WEnd
Func _mysql_checklogin(Const $MysqlVerbindung, Const $sAccount)
_MySQL_Real_Query($MysqlVerbindung, "SELECT `Password` FROM `"&$dbname&"`.`"&$table&"` WHERE `Account` = '" & $sAccount & "';")
If @error Then
Return SetError(-1, @error, 0)
Else
Local $sResult = _MySQL_Store_Result($MysqlVerbindung)
Local $aReturn = _MySQL_Fetch_Row_StringArray($sResult)
_MySQL_Free_Result($sResult)
If UBound($aReturn) = 0 Then
Return SetError(-2, @error, 0)
Else
Return $aReturn[0]
EndIf
EndIf
EndFunc ;==>_mysql_checklogin
Func _mysql_checkversion(Const $MysqlVerbindung, Const $sAccount)
_MySQL_Real_Query($MysqlVerbindung, "SELECT `VVersion` FROM `"&$dbname&"`.`"&$table&"` WHERE `Account` = '" & $sAccount & "';")
If @error Then
Return SetError(-1, @error, 0)
Else
Local $sResult = _MySQL_Store_Result($MysqlVerbindung)
Local $aReturn = _MySQL_Fetch_Row_StringArray($sResult)
_MySQL_Free_Result($sResult)
If UBound($aReturn) = 0 Then
Return SetError(-2, @error, 0)
Else
Return $aReturn[0]
EndIf
EndIf
EndFunc ;==>_mysql_checkversion
Func _mysql_checktime(Const $MysqlVerbindung, Const $sAccount)
_MySQL_Real_Query($MysqlVerbindung, "SELECT `Time` FROM `"&$dbname&"`.`"&$table&"` WHERE `Account` = '" & $sAccount & "';")
If @error Then
Return SetError(-1, @error, 0)
Else
Local $sResult = _MySQL_Store_Result($MysqlVerbindung)
Local $aReturn = _MySQL_Fetch_Row_StringArray($sResult)
_MySQL_Free_Result($sResult)
If UBound($aReturn) = 0 Then
Return SetError(-2, @error, 0)
Else
Return $aReturn[0]
EndIf
EndIf
EndFunc ;==>_mysql_checktime
Func _mysql_checklast(Const $MysqlVerbindung, Const $sAccount)
_MySQL_Real_Query($MysqlVerbindung, "SELECT `lastcheck` FROM `"&$dbname&"`.`"&$table&"` WHERE `Account` = '" & $sAccount & "';")
If @error Then
Return SetError(-1, @error, 0)
Else
Local $sResult = _MySQL_Store_Result($MysqlVerbindung)
Local $aReturn = _MySQL_Fetch_Row_StringArray($sResult)
_MySQL_Free_Result($sResult)
If UBound($aReturn) = 0 Then
Return SetError(-2, @error, 0)
Else
Return $aReturn[0]
EndIf
EndIf
EndFunc ;==>_mysql_checklast
Func _mysql_checkserial(Const $MysqlVerbindung, Const $sAccount)
_MySQL_Real_Query($MysqlVerbindung, "SELECT `Account` FROM `"&$dbname&"`.`"&$table&"` WHERE `Serial` = '" & $serial & "';")
If @error Then
Return SetError(-1, @error, 0)
Else
Local $sResult = _MySQL_Store_Result($MysqlVerbindung)
Local $aReturn = _MySQL_Fetch_Row_StringArray($sResult)
_MySQL_Free_Result($sResult)
If UBound($aReturn) = 0 Then
Return SetError(-2, @error, 0)
Else
Return $aReturn[0]
EndIf
EndIf
EndFunc ;==>_mysql_checkserial
Func _quit()
_MySQL_Close($MysqlConn)
_MySQL_EndLibrary()
Exit
EndFunc ;==>_quit

Für folgendes ist die mysql.au3 aus dem ENGLISCHEN Forum von nöten!

#include <mysql.au3>
$UserName = "root" $Password = "root" $Database = "lolrofl"
$MySQLServerName = "localhost"
$SQLInstance = _MySQLConnect($UserName,$Password,$Database,$MySQLServerName) $SQLCode = "CREATE TABLE Tool( Serial VARCHAR (20), Account VARCHAR (30), Password VARCHAR (30), VVersion VARCHAR (1), Time INTEGER, lastcheck VARCHAR(8))" _Query($SQLInstance, $SQLCode) _MySQLEnd($SQLInstance)

#include <mysql.au3>
$UserName = "root"
$Password = "root"
$Database = "lolrofl"
$MySQLServerName = "localhost"
$SQLInstance = _MySQLConnect($UserName,$Password,$Database,$MySQLServerName)
$SQLCode = "INSERT INTO Tool (Serial, Account, Password, VVersion, Time, lastcheck) VALUES('xasdzuasdgas', 'trick', '1', 'V', '30', '29062010' )"
_Query($SQLInstance, $SQLCode)
_MySQLEnd($SQLInstance)

Augenmerk dieses Schutzes liegt bei der Funktionalität und nicht dem Design

Schrubber

Hast du auch bereits Daten eingetragen?

Lass einfach das 2. Scrippt durchlaufen. Des wird dirn Acc machen.

Kopier den Code von Seite 3, den hab ich immer (eigentlich) angepasst auf die Verbesserungsvorschläge vone uch: Dort ist der button b_login auch drin

Für den Serialfehler bitte folgende Funktion unter die anderen schreiben:

Func _mysql_checkserial(Const $MysqlVerbindung, Const $serial)
_MySQL_Real_Query($MysqlVerbindung, "SELECT `Account` FROM `lolrofl`.`tool` WHERE `Serial` = '" & $serial & "';")
If @error Then
Return SetError(-1, @error, 0)
Else
Local $sResult = _MySQL_Store_Result($MysqlVerbindung)
Local $aReturn = _MySQL_Fetch_Row_StringArray($sResult)
_MySQL_Free_Result($sResult)
If UBound($aReturn) = 0 Then
Return SetError(-2, @error, 0)
Else
Return $aReturn[0]
EndIf
EndIf
EndFunc ;==>_mysql_checkserial

Danach sollte auch der Fehler behoben sein. Ich editiert diesen Post, falls ich die Lösung für den Buttonfehler habe.

Schrubber

Ja ;D Ich merk scho hab da einiges in Sand gesetzt... Aber ohne Scite isses verdammt schwer O.o

Änder mal folgendes:

$b_buyfull = GUICtrlCreateButton("Vollversion kaufen", 136, 257, 113, 23, $WS_GROUP)
$b_gotonext = GUICtrlCreateButton("Weiter", 8, 256, 113, 25, $WS_GROUP)
$b_registerserial = GUICtrlCreateButton("Register Serial", 8,270,113,15,$WS_GROUP)

Du musst die Koordinaten von dem Button $b_registerserial anpassen, weiß grad net, wie das aussieht (kein Scite xD)

Func _mysql_setlasttime(Const $Mysqlverbindung, Const $sAccount)
$datum = @MDAY&@MON&@YEAR
$gettime = _MySQL_Real_Query($MysqlVerbindung, "SELECT `Time` FROM `lolrofl`.`tool` WHERE `Account` = '" & $sAccount & "';")
if(_mysql_checklast($MysqlConn, GuiCTRLRead($i_username)) = @MDAY&@MON&@YEAR) then
else
_MySQL_Real_Query($MysqlConn, "UPDATE tool SET lastcheck = "&$datum&" WHERE `Serial` = '" & $serial & "';")
_MySQL_Real_Query($MysqlConn, "UPDATE tool SET time = "&$gettime&" WHERE `Serial` = '" & $serial & "';")
EndIF
EndFunc

Da fehlte das EndIf und es heißt GuiCTRLRead und net $GuiCtrlRead und das $ fehlte vor sAccount Sry

Bitte erneut Fehlerlog posten :o

Zum 1.

Schau unter Optionen / Mouse unter Mouse Sensivity. Den Balken nach rechts schieben

Zu 2.

Hast du vielleicht ein eigenes Overlay mal geschrieben (Ingame M-Menü verändert, Hauptmenü Menüpunkte) wenn nicht schau mal in ressources oder materials nach (dort, wo man auch dieses Ingame Menü einstellen kann). Dort ist ne Datei, die heißt SourceColor oder Chatcolor, einfach alle durchschauen. Iwo sollte das eig stehen.

Soo. Dies ist nun das komplette Script mit der UDF von progandy.

Das ist nurn Beispiel, deswegen ist der Wert eher auf der funktionalität, als auf dem Design zu sehen.

Unten bei Func _starteprogramm() müsste mann dan nur noch den eigentlichen Sourcecode einfügen, der ausgeführt werden soll, sobald man sich erfolgreich eingeloggt hat UND die Zeit noch nicht abgelaufen ist.

Oben müsste mann noch seine MySQL Daten eingeben und die Table mit den 2 Codes erstellen, die ich 3 Beiträge zuvor gepostet hab. Aber Achtung: Die 2 Codes, mit deenen Ihr die Table erstellt, sind mit der mysql.au3 gemacht (englisches Forum!).

Die eigentlichen Fehler sind nur noch, dass die Serials und die EIngabe halt per Input geschehen. Dies ist bei bedarf noch in einer extra GUI zu verarbeiten. Vielleicht finde ich ja die Zeit und mache dies nochmal und stelle es dann hier online

Dann noch vielleicht bei der Zeitanzeige ein ProgressBar, der abnimmt. Und natürlich, was ich bisher noch vergessen hab, die richtige Abziehung der Tage. Bei mir macht er bisher nur, dass er immer 1nen Tag nur abzieht, egal wieviele Tage zwischen dem letzen Besuch und heute liegen. Wie ich das aber ändern soll, dass es richtig geht, habe ich selber keine Ahnung. Vielleicht hilft mir von euch ja jemand? ;D

Kleinere Fehler werden mit bitte verziehn, da ich gerade auf der Arbeit bin und keinen Syntaxcheck / Editor hier hab, der mir meine Fehler anzeigt

Aber die geringen Fehler solltet ihr ggf. selber ausbessern können

Viel Spaß beim schauen.

Schrubber

Für das große Script hab ich die UDF von ProgAndy genommen.

Die anderne beiden sind vorher entstanden und sind mit der ausm dem englischen Forum stammenden mysql.au3 geschrieben

Du erstellst 1nes zufällig.
Die Koordienaten x1, x2, y1, y2 (alle Eckpunkte) speicherst du in einem Array.

Bei dem 2. überprüfst du, ob die x1 bzw. die x2 zwischen den x1 und x2 des 1. rechtecks liegt. Wenn ja dann überprüfst du das gleiche noch mit den y Koordienaten. Sonst spawnen.

Case $b_registerserial
$serial = InputBox("Serial-Registration", "Bitte geben sie hier Ihren Key ein (Bsp: xxxx-xxxx-xxxx-xxxx)")
$wunschaccount = InputBox("Wunsch-Accountname", "Bitte Wunsch-Accountnamen eingeben.")
$wunschpasswort = InputBox("Wunsch-Passwort", "Bitte Wunsch-Passwort eingeben.")
if(_mysql_checkserial($MysqlConn, $serial) = "") Then
_MySQL_Real_Query($MysqlConn, "UPDATE tool SET Account = '"&$wunschaccount&"' WHERE Serial = '"&$serial&"'")
_MySQL_Real_Query($MysqlConn, "UPDATE tool SET Password = '"&$wunschpasswort&"' WHERE Serial = '"&$serial&"'")
Else
MSGBOX(0, "Registration fehlgeschlagen", "Ihr Serial ist entweder falsch oder bereits registriert")
EndIf

Vordefinierte Serials können damit auf einen Account registriert werden.
Die Serials müssen vorher in der DB eingetragen werden, rest bleibt leer.

Jop, Bots sind nicht erlaubt