Hey Com,
habe ein Problem mit der [Only registered and activated users can see links. Click Here To Register...] (MySql-UDF).
Ich kann zwar wunderbar in der DB schreiben, jedoch auslesen eines eintrages will nicht so ganz...
Ich poste euch hier meine Source. Nicht erschrecken, wird noch alles ein bisschen abgeändert fehlt nemlich noch einige... ist auch noch nicht so gut gescriptet von den funktionen her...
Es handelt sich um die Login Func
Hier noch meine Tabelle welche in die spenden datenbank gehört...
Wenn ihr es lauffähig wollt, braucht ihr die MySql UDF von oben...
Ich weis außerdem nicht ob ich nur einen Falschen befehl verwende, oder nicht da mein SQL Befehl stimmt...
LG
2good
PS.
Am liebsten wäre es mir OHNE arrays
habe ein Problem mit der [Only registered and activated users can see links. Click Here To Register...] (MySql-UDF).
Ich kann zwar wunderbar in der DB schreiben, jedoch auslesen eines eintrages will nicht so ganz...
Ich poste euch hier meine Source. Nicht erschrecken, wird noch alles ein bisschen abgeändert fehlt nemlich noch einige... ist auch noch nicht so gut gescriptet von den funktionen her...
PHP Code:
#include <GUIConstantsEx.au3>
#include <StaticConstants.au3>
#include <WindowsConstants.au3>
#include <mysql.au3>
#include <array.au3>
$host= '127.0.0.1'
$user= 'root'
$pass= ''
$db= 'spenden'
_MySQL_InitLibrary()
If FileExists("libmysql.dll") Then
Else
FileInstall("lib\libmysql.dll", "libmysql.dll")
EndIf
If FileExists(@TempDir&"\bg.jpg") Then
Else
FileInstall("bg.jpg",@TempDir&"\bg.jpg")
EndIf
#Region ### START Koda GUI section ### Form=C:\Users\maniii\Desktop\Spendenbot.kxf
$Gui = GUICreate("Give an Click -- Get much much more Clicks", 535, 341, 192, 124, BitOR($WS_POPUP,$WS_CLIPSIBLINGS))
$Loginlabel= GUICtrlCreateLabel("Login:", 110, 28, 196, 48)
GUICtrlSetFont($Loginlabel, 28, 400, 0, "Old English Text MT")
_BKColor(-1, $Loginlabel, 0xEF030A)
$regilabelinp= GUICtrlCreateLabel("Gib hier deinen Benutzername ein,"&@CRLF&"falls du schon registriert bist", 110, 78)
_BKColor(-1, $regilabelinp, 0x00FFFF)
$regiinp = GUICtrlCreateInput("", 290, 78, 150, 24)
GUICtrlSetTip($regiinp, "Gib hier deinen Benutzername ein.")
$pwlabelinp= GUICtrlCreateLabel("Gib hier dein Passwort ein.", 110, 120)
_BKColor(-1, $pwlabelinp, 0x00FFFF)
$pwinp = GUICtrlCreateInput("", 290, 120, 150, 24)
GUICtrlSetTip($pwinp, "Gib hier dein Passwort ein.")
$Login = GUICtrlCreateButton("Einloggen", 140, 160, 90, 20)
$reset = GUICtrlCreateButton("Zurücksetzten", 300, 160, 90, 20)
$regilabel = GUICtrlCreateLabel("Registrieren", 330, 288, 196, 48)
GUICtrlSetFont($regilabel, 28, 400, 0, "Old English Text MT")
GUICtrlSetTip($regilabel, "Klicke hier um dich zu registrieren.")
_BKColor(-1, $regilabel, 0xEF030A)
$info = GUICtrlCreateLabel("Info", 1, 0, 20, 12)
GUICtrlSetTip($info, "Info")
_BKColor(-1, $info, 0x00FFFF)
$end = GUICtrlCreateLabel("X", 527, 0, 8, 12)
GUICtrlSetTip($end, "Beenden")
_BKColor(-1, $end, 0x00FFFF)
GUISetState(@SW_SHOW)
$pic=GUICtrlCreatePic(@TempDir&"\bg.jpg", 0, 0, 535, 341)
#EndRegion ### END Koda GUI section ###
While 1
$nMsg = GUIGetMsg()
Switch $nMsg
Case $GUI_EVENT_CLOSE
end()
Case $regilabel
regi()
Case $end
end()
Case $info
MsgBox(0, "", "Hier werden später die Scripter und so stehen.")
Case $reset
GUICtrlSetData($regiinp, "")
GUICtrlSetData($pwinp, "")
Case $Login
login()
EndSwitch
WEnd
Func login()
$MysqlConn = _MySQL_Init()
$connected = _MySQL_Real_Connect($MysqlConn,$host,$user,$pass,$db)
If $connected = 0 Then
MsgBox(16, "Verbindungsfehler", "Keine Verbindung mit der Datenbank möglich.")
Exit
Else
$query = ("SELECT id FROM users where user = 2good")
_MySQL_Real_Query($MysqlConn, $query)
$res = _MySQL_Store_Result($MysqlConn)
;$data=_MySQL_Fetch_Field()
$data=_MySQL_Free_Result($res)
_MySQL_Close($MysqlConn)
_MySQL_EndLibrary()
MsgBox(0, "",$data)
EndIf
EndFunc
Func regi()
If GUICtrlRead($regiinp) = "" or GUICtrlRead($pwinp) = "" Then
MsgBox(16, "Fehler", "Bitte gib etwas ein.")
else
$MysqlConn = _MySQL_Init()
$connected = _MySQL_Real_Connect($MysqlConn,$host,$user,$pass,$db)
If $connected = 0 Then
MsgBox(16, "Verbindungsfehler", "Keine Verbindung mit der Datenbank möglich.")
Exit
Else
$passw = GUICtrlRead($pwinp)
$query = ("INSERT INTO users (user,password) VALUES('"&GUICtrlRead($regiinp)&"','"&GUICtrlRead($pwinp)&"');")
_MySQL_Real_Query($MysqlConn, $query)
MsgBox(0, "Account erstellt", "Dein Account wurde erstellt.")
_MySQL_Close($MysqlConn)
_MySQL_EndLibrary()
EndIf
EndIf
EndFunc
Func end()
If MsgBox(4, "Beenden", "Möchtest du wirklich beenden?") = 6 Then
Exit
Else
EndIf
EndFunc
Func _BKColor($BackColor_ = "", $GuiID_ = -1, $Textcolor_ = 0x000000)
If $BackColor_ = "" or $BackColor_ = -1 Then
GUICtrlSetBkColor($GuiID_, $GUI_BKCOLOR_TRANSPARENT)
GUICtrlSetColor($GuiID_, $Textcolor_)
Else
GUICtrlSetBkColor($GuiID_, $BackColor_)
GUICtrlSetColor($GuiID_, $Textcolor_)
EndIf
EndFunc
PHP Code:
/*
Navicat MySQL Data Transfer
Source Server : 127.0.0.01
Source Server Version : 50141
Source Host : localhost:3306
Source Database : spenden
Target Server Type : MYSQL
Target Server Version : 50141
File Encoding : 65001
Date: 2011-01-26 08:36:57
*/
SET FOREIGN_KEY_CHECKS=0;
-- ----------------------------
-- Table structure for `users`
-- ----------------------------
DROP TABLE IF EXISTS `users`;
CREATE TABLE `users` (
`id` int(5) NOT NULL AUTO_INCREMENT,
`user` text,
`password` text,
`link` text,
PRIMARY KEY (`id`)
) ENGINE=MyISAM AUTO_INCREMENT=15 DEFAULT CHARSET=latin1;
-- ----------------------------
-- Records of users
-- ----------------------------
INSERT INTO users VALUES ('12', '2good', 'super', '123');
INSERT INTO users VALUES ('13', '12345', 'test', null);
INSERT INTO users VALUES ('14', 'xyz', 'fggf', null);
Wenn ihr es lauffähig wollt, braucht ihr die MySql UDF von oben...
Ich weis außerdem nicht ob ich nur einen Falschen befehl verwende, oder nicht da mein SQL Befehl stimmt...
LG
2good
PS.
Am liebsten wäre es mir OHNE arrays
