مساعدة بلوحة تسجيل دخول

[TOUNSI |, السعأدة]

1 minute ago, SAM!! said:

MR.TOUNSI

محاولتي؟

خذ

executeSQLQuery("CREATE TABLE IF NOT EXISTS players_auto( serialx TEXT, userx TEXT, passx TEXT)")
executeSQLQuery("CREATE TABLE IF NOT EXISTS players_save( serial TEXT, user TEXT, pass TEXT)")
function AddPlayer(serial,user,pass)
	executeSQLQuery("INSERT INTO players_save(serial,user,pass) VALUES(?,?,?)",serial,user,pass)
end
function addPlayerxz(serial,user,pass)
	executeSQLQuery("INSERT INTO players_auto(serialx,userx,passx) VALUES(?,?,?)",serial,user,pass)
end
function isPlayerSave(serial)
	local sel = executeSQLQuery("SELECT serial FROM players_save WHERE serial=?",serial)
	if sel == 0 then
		return false
	else
		return true
	end
end
function isPlayerSavedAuto(serial)
	local sel = executeSQLQuery("SELECT serial FROM players_auto WHERE serialx=?",serial)
	if sel == 0 then
		return false
	else
		return true
	end
end
function getUserAndPass(serial)
	local user,pass = "",""
	if isPlayerSave(serial) then
		local sel = executeSQLQuery("SELECT * FROM players_save WHERE serial=?",serial)
		for i,player in ipairs(sel) do
			if i == 1 then
				user = player.user
				pass = player.pass
			end
		end
		return user,pass
	end
	return false
end
function getUsernameAndPassword(serial)
	local user,pass = "",""
	if isPlayerSavedAuto(serial) then
		local sel = executeSQLQuery("SELECT * FROM players_auto WHERE serial=?",serial)
		for i,player in ipairs(sel) do
			if i == 1 then
				userx = player.userx
				passx = player.passx
			end
		end
		return userx,passx
	end
	return false
end
addEvent("onGetSave",true)
addEventHandler("onGetSave",root,
	function ()
		local serial = getPlayerSerial(source)
		if isPlayerSave(serial) then
			local user,pass = getUserAndPass(serial)
			triggerClientEvent(source,"onPutSave",source,user,pass)
		end
    if isPlayerSavedAuto(serial) then
    local user,pass = getUsernameAndPassword(serial)
    logIn(source,user,pass)
    triggerClientEvent(source,"onCl",source)
    end
	end
)
addEvent("onLoginWith",true)
addEventHandler("onLoginWith",root,
	function (user,pass)
		local acc = getAccount(user,pass)
		local serial = getPlayerSerial(source)
		if acc then
			logIn(source,acc,pass)
			outputChatBox("* تم بنجاح تسجيل دخول",source,0,255,0)
			AddPlayer(serial,user,pass)
			triggerClientEvent(source,"onCl",source)
		else
			outputChatBox("* الحساب او كلمة المرور خطأ",source,255,0,0)
		end
	end
)
addEvent("onLogin",true)
addEventHandler("onLogin",root,
	function (user,pass)
		local acc = getAccount(user,pass)
		if acc then
			logIn(source,acc,pass)
			outputChatBox("* تم بنجاح تسجيل دخول",source,0,255,0)
			triggerClientEvent(source,"onCl",source)
            setElementData(source,"Password",""..pass.."")
		else
			outputChatBox("* الحساب او كلمة مرور خطأ",source,255,0,0)
		end
	end
)
addEvent("onReg",true)
addEventHandler("onReg",root,
	function (user,pass)
		local acc = getAccount(user,pass)
		if acc then
			outputChatBox("* هذا الحساب مستخدم من قبل",source,255,0,0)
		else
			addAccount(user,pass)
			outputChatBox("* Username = " .. user .. "",source,0,255,0)
			outputChatBox("* Password = " .. pass .. "",source,0,255,0)
		end
	end
)
addCommandHandler("auto",function(p)
local acc = getPlayerAccount(p)
if (  not isGuestAccount(acc) ) then
local serial = getPlayerSerial(p)
if ( not isPlayerSavedAuto(serial) ) then
local Data = getElementData(p,"Password")
local user = tostring(acc)
addPlayerxz(serial,user,Data)
outputChatBox("* تم تفعيل الميزة",p,0,255,0)
else
ouputChatBox("* لقد قمت بتفعيل الميزة من قبل",p,255,0,0)
end
else
outputChatBox("* عليك ان تسجل دخولك أولاً",p,255,0,0)
end
end )
addCommandHandler("unauto",function(p)
local acc = getPlayerAccount(p)
if (  not isGuestAccount(acc) ) then
local serial = getPlayerSerial(p)
if ( isPlayerSavedAuto(serial) ) then
executeSQLQuery("DELETE FROM players_auto WHERE serialx=?", serial)
outputChatBox("* تم إلغاء تفعيل الميزة",p,0,255,0)
else
outputChatBox("* هذه الميزة غير مفعلة",p,255,0,0)
end
else
outputChatBox("* عليك ان تسجل دخولك أولاً",p,255,0,0)
end
end )

وريني؟

يخي محاولتك ايش 
طيب يخي وش مشكلتك بزبط اكتب سطر تحت سطح  ع شن افهمك

[SAM!!]

MR.TOUNSI

ابي لما ادخل السيرفر واكتب 

f8  auto

لما ادخل تاني يسجل تلقائي

مايجيبلي لوحة

لو ابي الغي هالخاصية ويرجعلي اللوحة تاني اكتب 

unauto

[TOUNSI |, السعأدة]

Just now, SAM!! said:

MR.TOUNSI

ابي لما ادخل السيرفر واكتب 

f8  auto

لما ادخل تاني يسجل تلقائي

مايجيبلي لوحة

لو ابي الغي هالخاصية ويرجعلي اللوحة تاني اكتب 

unauto

طيب فهمتك تقصد شبه حق ا لوزارة
- وش اخطاء ديبق وش اخطاء سكريت ذا 

[SAM!!]

MR.TOUNSI

 

 

bad argument #1 to 'ipairs' (table expected, got string)

Database query faild: no such column: serial

Database query faild: no such column: serial

[TOUNSI |, السعأدة]

Just now, SAM!! said:

MR.TOUNSI

 

 

bad argument #1 to 'ipairs' (table expected, got string)

Database query faild: no such column: serial

Database query faild: no such column: serial

لازم اروح لسيرفر برمجة واسويلك ايه مثل الوزارة 
فاتح من الهاتف حاليا تواصل معي خاص