addEvent ("DodajKonto", true) addEventHandler ("DodajKonto", root,
function (loginkonta, haslokonta)
if loginkonta and haslokonta then
local konto = dbQuery (SQL, "SELECT * FROM Gracze WHERE login=?, haslo=?", loginkonta, haslokonta)
if konto then
local sprkonto = dbPoll (konto, 0) outputDebugString ("Konto juz istnieje")
else local dodajkonto = dbQuery (SQL, "INSERT INTO Gracze VALUES (login, haslo)", loginkonta, haslokonta) outputDebugString ("Konto zostalo dodane pomyslnie") end
end
end )
Witajcie, ostatnio stworzy?em panel oparty o baz? danych.
Kod panelu:
[lua]function zarejestruj(login, password)
local jestKonto = sql:zapytanie("SELECT * FROM Konto WHERE Login='" .. login .. "'")
if (jestKonto > 0) then
triggerClientEvent(source, "onClientUtworz", getRootElement(), false, "Jest ju? takie konto w bazie danych.")
return
end
local dodajKonto = sql:zapytanie("INSERT INTO Konto SET Login='" .. login .. "' and Haslo='" .. password .. "'")
triggerClientEvent(source, "onClientUtworz", getRootElement(), true)
return
end
addEvent("onZarejestruj", true)
addEventHandler("onZarejestruj", getRootElement(), zarejestruj)[/lua]
a tu skrypt sql:
[lua]local SQL
local function connect()
SQL = dbConnect("mysql", "dbname=db_3546;host=mysql-1.ServerProject.pl", "db_3546","Sebo12","share=1")
if (not SQL) then
outputServerLog("Nie uda?o si? po??czy? z baz? danych!")
else
zapytanie("SET NAMES utf8;")
end
function zapytanie(...)
local h = dbQuery(SQL, ...)
local result, numrows = dbPoll(h,-1)
return numrows
end
[/lua]
A wi?c tak, uzupe?niam dane i klikam zarejestruj. Zagl?dam do bazy danych a tam Login='0' Haslo=''. Nie wiem o co chodzi, pierwszy raz bior? si? za funkcje dbQuery...