Wireless Listeleyici

[pairs]

Wireless listeleme , Güvenlik Seviyesi ve Sinyal Seviyesi

 

Global Functions' a eklenecek

function DelimitedStringToTable(DelimitedString, Delimiter)
tbReturn = {};
local strWorking;
local nPos = nil;
local strData;
local nTableIndex = 1;
local nDelimiterLength = String.Length(Delimiter);

			if(nDelimiterLength < 1)then
			tbReturn[nTableIndex] = DelimitedString;
			return tbReturn;
			end

			strWorking = DelimitedString;
			nPos = String.Find(strWorking,Delimiter);
			while(nPos ~= -1)do
			strData = String.Left(strWorking,nPos-1);
			tbReturn[nTableIndex] = strData;
			nTableIndex = nTableIndex + 1;
			local nLength = String.Length(strWorking);
			strWorking = String.Right(strWorking,nLength - (nPos + (nDelimiterLength-1)));
			nPos = String.Find(strWorking,Delimiter);
			end
			
			if(strWorking ~= "")then
			tbReturn[nTableIndex] = strWorking;
			end

return tbReturn;
end

Kullanımı ben diziden dönen ilk wifi ı aldım siz isterseniz

 

Bunu for döngüsüne sokabilirsiniz.

local sdevices = DLL.CallFunction("AutoPlay\\Docs\\wifiapi.dll", "getdevices", "", DLL_RETURN_TYPE_STRING, DLL_CALL_STDCALL);
Dialog.Message("",DelimitedStringToTable(sdevices,";")[1]);

local ssec = DLL.CallFunction("AutoPlay\\Docs\\wifiapi.dll", "getsecurity", "\""..DelimitedStringToTable(sdevices,";")[1].."\"", DLL_RETURN_TYPE_STRING, DLL_CALL_STDCALL);
Dialog.Message("",ssec);

local ssignal = DLL.CallFunction("AutoPlay\\Docs\\wifiapi.dll", "getsignal", "\""..DelimitedStringToTable(sdevices,";")[1].."\"", DLL_RETURN_TYPE_STRING, DLL_CALL_STDCALL);
Dialog.Message("",ssignal);

Edited June 6, 2014 by pairs

[DivaneTR]

Tüm ağları listelemek için bunu kullanabilirsiniz, [member=Cyph3r] abi anladın sen :)

[attachment=1268:Wifi.rar]

[Cyph3r]

Güvenlik ve sinyal seviyesi kodlarında parametre kısmını değiştirmemişim  :sorry: