Home Upgrade Search Memberlist Extras Hacker Tools Award Goals Help Wiki Contact

Delphi 

List all the Stored WiFi networks profiles [Console]

Dear All ,

If you want list all the stored WiFi networks profiles use the WiFi_PreferredProfile class.

Code:
Code
procedure  GetWiFi_PreferredProfileInfo;
const
  WbemUser            ='';
  WbemPassword        ='';
  WbemComputer        ='localhost';
  wbemFlagForwardOnly = $00000020;
var
  FSWbemLocator : OLEVariant;
  FWMIService   : OLEVariant;
  FWbemObjectSet: OLEVariant;
  FWbemObject   : OLEVariant;
  oEnum         : IEnumvariant;
  iValue        : LongWord;
begin;
  FSWbemLocator := CreateOleObject('WbemScripting.SWbemLocator');
  FWMIService   := FSWbemLocator.ConnectServer(WbemComputer, 'root\CIMV2', WbemUser, WbemPassword);
  FWbemObjectSet:= FWMIService.ExecQuery('SELECT * FROM WiFi_PreferredProfile','WQL',wbemFlagForwardOnly);
  oEnum         := IUnknown(FWbemObjectSet._NewEnum) as IEnumVariant;
  while oEnum.Next(1, FWbemObject, iValue) = 0 do
  begin
    Writeln(Format('Authentication    %s',[FWbemObject.Authentication]));// String
    Writeln(Format('Caption           %s',[FWbemObject.Caption]));// String
    Writeln(Format('Description       %s',[FWbemObject.Description]));// String
    Writeln(Format('Encryption        %s',[FWbemObject.Encryption]));// String
    Writeln(Format('MandatoryAp       %s',[FWbemObject.MandatoryAp]));// String
    Writeln(Format('Name              %s',[FWbemObject.Name]));// String
    Writeln(Format('OperationMode     %s',[FWbemObject.OperationMode]));// String
    Writeln(Format('SettingID         %s',[FWbemObject.SettingID]));// String
    Writeln(Format('SSID              %s',[FWbemObject.SSID]));// String
    Writeln(Format('Stealth           %s',[FWbemObject.Stealth]));// Boolean
    Writeln(Format('Type              %s',[FWbemObject.Type]));// String
    FWbemObject:=Unassigned;
  end;
end;

Thanks
What the actual fuck does this mean?
Dear Friend ,

This is a function that can be converted and used in any rat project and could be added to your stub functionality and permit you to see any wifi activity stored and will upload next a simple project that show you how to get wifi passwords hashes to be decrypted.

All the best.


(Jul 10, 2016 01:44 AM)champagnpapi Wrote:  What the actual fuck does this mean?

this will help you to have some similar project , try the link below and see how I made the wifi password hasher project. and you will know wtf is this?????!!!!

Dear All,

Thank you for accepting me in your Honorable Forum and let me take this opportunity to put this simple program that permit you to get the wifi password hashed and ready to be decrypted .



Below a download link for your review :
ww.datafilehost.com/d/7360eaa2


Enjoy,


Possibly Related Threads...
Thread / Author Replies Views Last Post
[Help] by CantPackCubaApr 9, 2024 11:11 AM 5 175 Apr 9, 2024 11:11 AM
Last Post: PulseLink
[Help] by 41phafr34kJan 28, 2017 12:56 PM 0 103 Jan 28, 2017 12:56 PM
Last Post: 41phafr34k
[Delphi] by charmeurSep 4, 2016 01:31 PM 1 286 Sep 4, 2016 01:31 PM
Last Post: Velkan