USB Rubber Ducky Script Encoder (VBScript): 5 vaihetta

2024 Kirjoittaja: John Day | [email protected]. Viimeksi muokattu: 2024-01-30 09:01

Jos sinulla on USB Rubber Ducky, tiedät, että erittäin ärsyttävä tehtävä on kääntää komentosarjasi.bin -tiedostoksi. Jos joudut tekemään minkäänlaista virheenkorjausta, tiedät, että kokoamasi komentosarjan jatkuva lataaminen voi olla tuskaa. Tämän ongelman korjaamiseksi loin VBScriptin, joka voi koota koodisi nopeasti ja helposti.

Voit ladata kootun.exe -tiedoston ja lähdekoodin alla.

Joka tapauksessa luultavasti ihmettelet, kuinka tein niin mahtavan graafisen käyttöliittymän sovelluksen vbs: ssä, ja jos on, siirry vaiheeseen 3.

Vaihe 1: Asennus…

REAMDE.txt -tiedostossa on myös ohjeet tämän tekemiseen. Joka tapauksessa sinun on ensin luotava C -asemaan kansio nimeltä "temp", jos sinulla ei vielä ole sitä. Lisäksi, jos sinulla ei ole jo Java -asennusta, voit saada sen täältä. Lataa seuraavaksi duckencode.jar ja siirrä tiedosto c: / temp -kansioon. Pura seuraavaksi jompikumpi.zip-tiedostoista ja suorita Duck.hta samassa hakemistossa kuin 'ico.ico' ja 'pic.gif', jos käytät ei-käännettyä versiota. Tai jos käytät käännettyä.exe -tiedostoa, suorita "Duck.exe".

Nyt voimme siirtyä seuraavaan vaiheeseen…

Vaihe 2: Käyttö…

Tämä ohjelma on todella yksinkertainen, jos haluat käyttää sitä, napsauta "Liitä leikepöydältä" liittääksesi koodisi automaattisesti. Tai napsauta Lataa tekstitiedostosta ladataksesi komentosarjan tekstitiedostosta. Sitten koodisi näkyy alla olevassa tekstikentässä. Tee lopulliset muutokset koodiin ja paina 'Koodaa'. Siirry kohtaan c: / temp ja siirrä "inject.bin" USB Rubber Ducky -laitteeseesi.

Saatat ihmetellä, mikä on script.txt. Mitä se on, on tekstikentän kääntämätön koodi. Sitä käytetään raakakoodin varmuuskopiona.

HUOMAUTUS: Jos haluat tehdä pienen komentosarjan, voit yksinkertaisesti kirjoittaa koodisi tekstikenttään. Nopea ja helppo tapa testata USB Rubber Ducky.

Siirry seuraavaan vaiheeseen, jos haluat lisätietoja vbs: n graafisten käyttöliittymien käytöstä ja tämän ohjelman tekemisestä, muuten:

Kiitos, että luit tämän ohjeen, ja jos sinulla on kysyttävää, kommentteja tai huolenaiheita, lähetä kommentti tai lähetä minulle pm

Vaihe 3: Käyttöliittymät VBScriptissä

Joten kyllä, on mahdollista tehdä graafisia käyttöliittymiä vbs. Tapa, jolla teet sen, on käärimällä tekstisi HTA: han. Jos et vielä tiedä, HTA on skriptikieli, joka on hyvin samanlainen kuin html, jota käytetään yksinkertaisesti käärittämään komentosarjat, kuten vbscripts ja jscripts, graafiseen käyttöliittymään. Tarkempi selitys ja opetusohjelma täällä.

Joten nyt kun tiedät, mikä on hta, annan sinulle vinkkejä opinnäytteiden tekemiseen helposti. Lataa ensin HTA helpomatic (kuva 2) alla. Valitettavasti alkuperäinen linkki ei enää toimi, mutta onneksi tallensin kopion jonkin aikaa sitten. Lataa ja asenna seuraavaksi htaeditin mukana tuleva vbsedit.

Kun sinulla on nämä kaksi ohjelmaa, et todellakaan tarvitse html/hta -kokemusta aloittaaksesi käyttöliittymien luomisen. Mikä on hienoa kaltaisilleni ihmisille, jotka eivät halua oppia hta: ta vain tehdäkseen käyttöliittymiä.

Siirry nyt seuraavaan vaiheeseen nähdäksesi, miten tein Duck Encoderin …

Vaihe 4: Kuinka tein sen

Eli ensin:

APPLICATIONNAME = "Duck Encoder" ID = "DuckEncoder" VERSION = "1.0" INNERBORDER = "ei" MAXIMIZEBUTTON = "ei" ICON = "ico.ico" SCROLL = "ei"

Tämä asettaa muutamia asioita, kuten kuvakkeen, reunatyypin jne.

Sub Window_OnLoad self.resizeTo 400, 454 Dim objFso: Set objFso = CreateObject ("Scripting. FileSystemObject") If Not objFso. FileExists ("c: / temp / duckencode.jar") Sitten MsgBox "Virhe, tiedostoa ei löydy: c: / temp / duckencode.jar ", 16," Duck Encoder "Self.close () End If End Sub

Seuraavaksi tämä osa suoritetaan automaattisesti aina, kun ohjelma käynnistetään ensimmäisen kerran. Se muuttaa ikkunan kokoa ja tarkista sitten, että 'duckencode.jar' on oikeassa hakemistossa.

Sub OnClickButtonbtnLoad ()

Dim objShlApp, objFolderLocation, strFileLocation, objFso, objFolder, colFiles, strTextFileList, objFile Dim strCompleteText Set objFso = CreateObject ("Scripting. FileSystemObject") Aseta objShlAppolppOppSetOll (0, "Selaa tiedostoa sisältävää kansiota:", 16384, 0) Jos Err. Number 0 Sitten MsgBox "Sinun on valittava kansio, joka sisältää tiedoston.", 16, "Duck Encoder" Err. Clear () Else If objFolderLocation = "" Sitten Exit Sub On Error Goto 0 Aseta objFolder = objFso. GetFolder (objFolderLocation. Self. Path & "\") Aseta colFiles = objFolder. Files strTextFileList = "" Jokaiselle objFile In colFiles If InStr (objFile. Name, ".txt ") False Sitten strTextFileList = strTextFileList & objFile. Name & vbCrLf End If Next strFileLocation = InputBox (" Anna oikea tekstitiedosto, jonka haluat koodata: "& vbCrLf & vbCrLf & strTextFileList," Ducky " (strFileLocation) Sitten jos ei objFso. FileExists (objFolder Location. Self. Path & "\" & strFileLocation) Sitten MsgBox "Virhe, sinun on valittava tekstitiedosto luettelosta!", 16, "Duck Encoder" Else On Error Resume Next strFileLocation = objFolderLocation. Self. Path & "\ "& strFileLocation Set objFile = objFso. OpenTextFile (strFileLocation, 1, FALSE) txtScript. Value = objFile. ReadAll objFile. Close () If Err. Number 0 then MsgBox" Text file is empty. ", 16," Duck Encoder Jos loppu Jos loppu Jos loppu jos loppu Lopeta

Ok, tämä koodin osa on todella hämmentävä, tämä on koodi, kun käyttäjä napsauttaa "Lataa tekstitiedostosta". Koska avoimen tiedoston valintaikkunan luominen hta: ssa on käytännössä mahdotonta, Ohjelma avaa selaamalla kansioikkunan ja pyytää käyttäjää valitsemaan komentosarjatiedoston sisältävän kansion. Sitten ohjelma avaa syöttölaatikon, jossa kysytään käyttäjältä, mikä tekstitiedosto ladataan kansioon. Sitten ohjelma lukee mitä tahansa tiedoston sisällä ja laittaa sen tekstikenttään.

Sub OnClickButtonbtnPaste () Dim objHTML, ClipboardText Set objHTML = CreateObject ("htmlfile") ClipboardText = objHTML. ParentWindow. ClipboardData. GetData ("text") Jos IsNull (ClipboardText) = Tosi sitten, Viestiketju "Duck Encoder" Else txtScript. Value = Leikepöydän teksti Loppu Jos loppu Al

Kaikki tämä koodi toimii, kun käyttäjä napsauttaa "Liitä leikepöydältä", ohjelma lataa tekstin leikepöydältä tekstiruutuun.

Vaihe 5: Kuinka tein sen (osa 2)

Sub OnClickButtonbtnEncode () If txtScript. Value = "" Sitten MsgBox "Ei ole koodia!", 16, "Duck Encoder" Else Dim objFso, txtScriptFile Set objFso = CreateObject ("Scripting. Filesystemobject") Aseta txtScriptFile = objext "c: / temp / script.txt", 2, True) txtScriptFile. WriteLine (txtScript. Value) txtScriptFile. Close () idTimer = window.setTimeout ("Compile", 800, "VBScript") End If End Sub Sub Compile () window.clearTimeout (idTimer) Dim objWshShl: Aseta objWshShl = CreateObject ("WScript. Shell") objWshShl. Run "java.exe -jar c: / temp / duckencode.jar -ic: / temp / script.txt -oc: / temp / inject.bin ", 0 'MsgBox" Skripti koottu kohteeseen injektoida.bin in c: / temp ", vbOKOnly+vbInformation," Ducky Encoder "End Sub

Tämä koodi suoritetaan, kun napsautat "Koodaus".

Se luo tekstitiedoston nimeltä script.txt ja laittaa sille tekstiruudun sisällön. Sitten se odottaa 0,8 sekuntia ja kääntää sen sitten.

Loput koodista vain luovat graafisen käyttöliittymän. Se on melko itsestään selvää, jos tiedät perus-hta.