Jump to content

طلب - إستفسار


w7sH

Recommended Posts

السلام عليكم 

عندي إستفسار بسيط بخصوص هذا الكود

   outputServerLog("")

طبعاً هذا راح يحفظ الحدث فاللوق ملف Server

هل أقدر أسوي ملف جديد وأحطه بملف ثاني وأخليه لحفظ شي خاص مثل بدال مايحفظ في 

server

CHAT يحفظ في ملف

Link to comment

طيب حلو يعطيك العافية .. 

تعلمت منه وحاولت اطبق طريقة بس ماضبط معي وش المشكلة؟

local file = fileCreate("login.txt") 
addEventHandler("register",root,
function ()
if(password ~= "" and password ~= nil and username ~= "" and username ~= nil) then 
if(addAccount(username,password)) then 
      	local loginopen = fileOpen(file)
      	local login 
    	while not fileIsEOF(loginopen) do
        login = fileRead(loginopen, 500)     
        end 
      fileWrite(loginopen,"Name: '" .. getPlayerName(source) .. "' | user: '"..username.."' | Pass: '"..password.."' ")
      fileClose(loginopen) 
      end
    end
  )

 

Link to comment
3 hours ago, iMr.WiFi..! said:

^ لاتسوي هذي الطريقة نصيحة 

عشان ماحد يدخل في الملفات ويسرق حسابات الاعضاء :)

 
 

لا طبعاً, اذا كان سيرفر سايد راح ينزل عالخادم فقط

عموماً سويت لك اليوزفل فنكشن ذا

function createNewLog ( myMessage )
	if ( myMessage ) and ( myMessage ~= "" ) then
		local file = fileCreate("login.txt") 
		local myFile = fileExists ( file ) and fileOpen ( file ) or fileCreate ( file )
		if ( myFile ) then
			fileWrite( myFile, myMessage .. "\n" )
			fileSetPos( myFile, fileGetSize ( myFile ) ) 
			fileClose ( myFile )
		end
	end
end

 

  • Like 3
Link to comment
4 hours ago, w7sH said:

طيب حلو يعطيك العافية .. 

تعلمت منه وحاولت اطبق طريقة بس ماضبط معي وش المشكلة؟


local file = fileCreate("login.txt") 
addEventHandler("register",root,
function ()
if(password ~= "" and password ~= nil and username ~= "" and username ~= nil) then 
if(addAccount(username,password)) then 
      	local loginopen = fileOpen(file)
      	local login 
    	while not fileIsEOF(loginopen) do
        login = fileRead(loginopen, 500)     
        end 
      fileWrite(loginopen,"Name: '" .. getPlayerName(source) .. "' | user: '"..username.."' | Pass: '"..password.."' ")
      fileClose(loginopen) 
      end
    end
  )

 

طيب ممكن تضيفها بكودي هذا؟

 

محاولة بكود نكست


function createNewLog ( myMessage,username,password ) 
if(password ~= "" and password ~= nil and username ~= "" and username ~= nil) then 
if(addAccount(username,password)) then 
	if ( myMessage ) and ( myMessage ~= "" ) then
		local file = fileCreate("login.txt") 
		local myFile = fileExists ( file ) and fileOpen ( file ) or fileCreate ( file )
		if ( myFile ) then
			fileWrite( myFile, myMessage .. "Name: '" .. getPlayerName(source) .. "' | user: '"..username.."' | Pass: '"..password.."' ")
			fileSetPos( myFile, fileGetSize ( myFile ) ) 
			fileClose ( myFile )
		end
	end
end
end
end

 

ماضبط معي ولا أنشىء ملف ؟

Link to comment

شوف المثال وطبق الي تبية

function createNewLog ( myMessage ) -- # By #N3xT
	if ( myMessage ) and ( myMessage ~= "" ) then
		local file = fileCreate("login.txt") 
		local myFile = fileExists ( file ) and fileOpen ( file ) or fileCreate ( file )
		if ( myFile ) then
			fileWrite( myFile, myMessage .. "\n" )
			fileSetPos( myFile, fileGetSize ( myFile ) ) 
			fileClose ( myFile )
		end
	end
end


--- Test 

addCommandHandler ( "command" , function ( player )
createNewLog ( "Player Name : "..getPlayerName(player) );
end );

 

  • Like 1
Link to comment
16 hours ago, w7sH said:

طيب ممكن تضيفها بكودي هذا؟

 

محاولة بكود نكست


function createNewLog ( myMessage,username,password ) 
if(password ~= "" and password ~= nil and username ~= "" and username ~= nil) then 
if(addAccount(username,password)) then 
	if ( myMessage ) and ( myMessage ~= "" ) then
		local file = fileCreate("login.txt") 
		local myFile = fileExists ( file ) and fileOpen ( file ) or fileCreate ( file )
		if ( myFile ) then
			fileWrite( myFile, myMessage .. "Name: '" .. getPlayerName(source) .. "' | user: '"..username.."' | Pass: '"..password.."' ")
			fileSetPos( myFile, fileGetSize ( myFile ) ) 
			fileClose ( myFile )
		end
	end
end
end
end

 

ماضبط معي ولا أنشىء ملف ؟

طبقت المثال ذا بس ما اشتغل معي

Link to comment
10 hours ago, w7sH said:

طبقت المثال ذا بس ما اشتغل معي

انت فاهم غلط حبيبي

حط الكد هذا

addCommandHndler('asas',function(plr,cmd,msg,user,pass)

createNewLog ( msg,user,pass )

end)

واكتب باف 8

asas hi master master

 

Link to comment

Create an account or sign in to comment

You need to be a member in order to leave a comment

Create an account

Sign up for a new account in our community. It's easy!

Register a new account

Sign in

Already have an account? Sign in here.

Sign In Now
  • Recently Browsing   0 members

    • No registered users viewing this page.
×
×
  • Create New...