USB Rubber Ducky Script Encoder (VBScript): 5 lépés
USB Rubber Ducky Script Encoder (VBScript): 5 lépés
USB Rubber Ducky Script Encoder (VBScript)
USB Rubber Ducky Script Encoder (VBScript)
USB Rubber Ducky Script Encoder (VBScript)
USB Rubber Ducky Script Encoder (VBScript)

Ha rendelkezik USB Rubber Ducky -val, akkor tudja, hogy egy nagyon bosszantó feladat a szkript egy.bin fájlba fordítása. Ha bármilyen hibakeresést kell végrehajtania, akkor tudja, hogy az összeállított szkript folyamatos letöltése fájdalmas lehet. Tehát a probléma megoldásához létrehoztam egy VBScript -et, amely gyorsan és egyszerűen le tudja fordítani a kódot.

Az alábbiakban letöltheti a lefordított.exe fájlt és a forráskódot.

Egyébként valószínűleg kíváncsi vagy, hogyan készítettem egy ilyen fantasztikus grafikus felhasználói felületet vbs -ben, és ha igen, ugorj a 3. lépésre.

1. lépés: Telepítés…

Telepítés…
Telepítés…
Telepítés…
Telepítés…

Ennek módjáról a REAMDE.txt fájlban is talál utasításokat. Mindenesetre először létre kell hoznia a C meghajtón a "temp" nevű mappát, ha még nem rendelkezik ilyennel. Továbbá, ha még nincs telepítve a java, akkor innen szerezheti be. Ezután töltse le a duckencode.jar fájlt, és helyezze át a fájlt a c: / temp mappába. Ezután bontsa ki az egyik.zip fájlt, és futtassa a Duck.hta fájlt ugyanabban a könyvtárban, mint az „ico.ico” és a „pic.gif”, ha a nem fordított verziót használja. Vagy ha a fordított.exe fájlt használja, egyszerűen futtassa a „Duck.exe” fájlt.

Most léphetünk a következő lépésre…

2. lépés: Használat…

Használat…
Használat…
Használat…
Használat…

Ez a program nagyon egyszerű, használatához egyszerűen kattintson a "Beillesztés a vágólapról" gombra a kód automatikus beillesztéséhez. Vagy kattintson a betöltés szövegfájlból lehetőségre a szkript betöltéséhez egy szöveges fájlból. Ezután a kód megjelenik az alábbi szövegmezőben. Végezze el a végleges módosításokat a kódon, és nyomja meg a "Kódolás" gombot. Keresse meg a c: / temp fájlt, és helyezze át az "inject.bin" fájlt az USB Rubber Ducky eszközére.

Lehet, hogy kíváncsi, mi az a script.txt. Mi ez, az a szövegdobozból származó lefordítatlan kód. A nyers kód biztonsági mentéseként használják.

MEGJEGYZÉS: Ha kis szkriptet szeretne készíteni, egyszerűen írja be a kódot a szövegmezőbe. Gyors és egyszerű módja az USB Rubber Ducky tesztelésének.

Ugorjon a következő lépésre, ha többet szeretne megtudni a vbs grafikus felhasználói felületéről és a program elkészítéséről, különben:

Köszönjük, hogy elolvasta ezt az útmutatót, és ha bármilyen kérdése, megjegyzése vagy aggálya van, kérjük, írjon megjegyzést vagy írjon nekem

3. lépés: GUI -k VBScriptben

GUI -k VBScriptben
GUI -k VBScriptben
GUI -k VBScriptben
GUI -k VBScriptben

Tehát igen, lehetséges grafikus felhasználói felületek készítése vbs -ben. Ezt úgy teheti meg, hogy a szöveget HTA -ba csomagolja. Ha még nem ismerné, a HTA egy olyan szkriptnyelv, amely nagyon hasonlít a html -hez, és egyszerűen olyan szkriptek csomagolására szolgál, mint a vbscripts és a jscript. Részletes magyarázat és oktatóanyag itt.

Most, hogy már tudja, mi a hta, hadd adjak néhány tippet a tézisek egyszerű elkészítéséhez. Először töltse le az alábbi HTA helpomatic -ot (2. kép). Sajnos az eredeti link már nem működik, de szerencsére mentettem egy másolatot egy ideje. Ezután töltse le és telepítse a vbsedit programot, amely a htaedit csomagban található.

Miután megvan ez a két program, valóban nem kell html/hta tapasztalat a GUI -k készítéséhez. Ami nagyszerű az olyan embereknek, mint én, akik nem akarnak hta -t tanulni csak azért, hogy GUI -kat készítsenek.

Most lépjen a következő lépésre, és nézze meg, hogyan készítettem el a kacsa kódolót…

4. lépés: Hogyan sikerült

Hogyan sikerült
Hogyan sikerült

Tehát először:

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

Ez beállít néhány dolgot, például az ikont, a szegélytípust stb.

Sub Window_OnLoad self.resizeTo 400, 454 Dim objFso: Set objFso = CreateObject ("Scripting. FileSystemObject") If Not objFso. FileExists ("c: / temp / duckencode.jar") Akkor MsgBox "Hiba, a fájl nem található: c: / temp / duckencode.jar ", 16," Duck Encoder "Self.close () End If End Sub

Ezt követően ez az alprogram automatikusan elindul a program első indításakor. Ez az ablak átméretezése, majd ellenőrizze, hogy a "duckencode.jar" a megfelelő könyvtárban van -e.

Sub OnClickButtonbtnLoad ()

Dim objShlApp, objFolderLocation, strFileLocation, objFso, objFolder, colFiles, strTextFileList, objFile Dim strCompleteText Set objFso = CreateObject ("Scripting. FileSystemObject") Állítsa be az objShlAppolppSetFlOpp (0, "Tallózás a fájlt tartalmazó mappában:", 16384, 0) Ha Err. Number 0 then MsgBox "Ki kell választania a fájlt tartalmazó mappát.", 16, "Duck Encoder" Err. Clear () Else If objFolderLocation = "" Ekkor lépjen ki az Sub On Error menüből. 0 Állítsa be az objFolder = objFso. GetFolder (objFolderLocation. Self. Path & "\") set colFiles = objFolder. Files strTextFileList = "" Minden egyes objFile -t a colFiles -ban If InStr (objFile. Name, " (strFileLocation) Akkor ha nem ObjFso. FileExists (objFolder Location. Self. Path & "\" & strFileLocation) Ezután az MsgBox "Hiba, szöveges fájlt kell választania a listából!", 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 Ha vége Ha vége Ha vége Ha vége, ha vége al

Rendben, ez a kódrész nagyon zavaró, ez a kód arra az esetre, amikor a felhasználó a "Betöltés szövegfájlból" gombra kattint. Mivel gyakorlatilag lehetetlen nyílt fájl párbeszédablakot létrehozni a hta-ban, a program felbukkan a mappa párbeszédablakban, és megkéri a felhasználót, hogy válassza ki a parancsfájlt tartalmazó mappát. Ezután a program megnyit egy beviteli mezőt, amely megkérdezi a felhasználót, hogy melyik szövegfájlt kell betölteni a mappába. Ezután a program elolvassa, ami a fájlban van, és beteszi a szövegmezőbe.

Sub OnClickButtonbtnPaste () Dim objHTML, ClipboardText Set objHTML = CreateObject ("htmlfile") ClipboardText = objHTML. ParentWindow. ClipboardData. GetData ("text") Ha IsNull (ClipboardText) = Igaz, akkor az MsgBox! "Duck Encoder" Egyéb txtScript. Value = VágólapText End If End Sub

Ez a kód csak akkor történik, ha a felhasználó a „Beillesztés a vágólapról” gombra kattint, a program betölti a szöveget a vágólapról a szövegmezőbe.

5. lépés: Hogyan készítettem (2. rész)

Sub OnClickButtonbtnEncode () If txtScript. Value = "" Akkor MsgBox "Nincs kód!", 16, "Duck Encoder" Else Dim objFso, txtScriptFile Set objFso = CreateObject ("Scripting. Filesystemobject") Állítsa be a txtScriptFile = objektum "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: Állítsa be az objWshShl = CreateObject ("WScript. Shell") objWshShl. Run "java.exe -jar c: / temp / duckencode.jar -ic: / temp / script.txt -oc: / temp / inject.bin ", 0 'MsgBox" A szkript az inject.bin fájlba lett összeállítva c: / temp ", vbOKOnly+vbInformation," Ducky Encoder "End Sub

Ez a kód akkor fut, ha a „Kódolás” gombra kattint.

Ez egy script.txt nevű szövegfájlt hoz létre, és a szövegdobozban lévő tartalmat behelyezi. Ezután vár 0,8 másodpercet, majd lefordítja.

A kód többi része csak létrehozza a GUI -t. Elég magától értetődő, ha ismeri az alapvető hta-t.

Ajánlott: