ইউএসবি রাবার ডাকি স্ক্রিপ্ট এনকোডার (VBScript): 5 টি ধাপ

2024 লেখক: John Day | [email protected]. সর্বশেষ পরিবর্তিত: 2024-01-30 08:00

আপনার যদি একটি ইউএসবি রাবার ডাকি থাকে, আপনি জানতে পারবেন যে একটি খুব বিরক্তিকর কাজ, আপনার স্ক্রিপ্টটিকে একটি.bin ফাইলে সংকলন করছে। যদি আপনাকে কোন ধরণের ডিবাগিং করতে হয় তবে আপনি জানতে পারবেন যে আপনার সংকলিত স্ক্রিপ্টটি ক্রমাগত ডাউনলোড করা একটি যন্ত্রণা হতে পারে। সুতরাং এই সমস্যাটি সমাধানের জন্য, আমি একটি VBScript তৈরি করেছি যা আপনার কোড দ্রুত এবং সহজে কম্পাইল করতে পারে।

আপনি সংকলিত.exe এবং নীচের সোর্স কোডটি ডাউনলোড করতে পারেন।

যাইহোক, আপনি সম্ভবত ভাবছেন যে আমি কীভাবে ভিবিএস -এ এমন একটি দুর্দান্ত জিইউআই অ্যাপ্লিকেশন তৈরি করেছি এবং যদি তা হয় তবে ধাপ 3 এ যান।

ধাপ 1: ইনস্টল করা হচ্ছে …

REAMDE.txt ফাইলে এটি কীভাবে করবেন তার নির্দেশনা রয়েছে। যাইহোক, প্রথমে আপনার সি ড্রাইভে 'টেম্প' নামে একটি ফোল্ডার তৈরি করতে হবে যদি আপনার ইতিমধ্যে এটি না থাকে। এছাড়াও, যদি আপনি ইতিমধ্যে জাভা ইনস্টল না করে থাকেন তবে আপনি এটি এখান থেকে পেতে পারেন। পরবর্তী duckencode.jar ডাউনলোড করুন এবং ফাইলটি আপনার c: / temp ফোল্ডারে সরান। পরবর্তী,.zip ফাইলগুলির মধ্যে একটি বের করুন এবং 'ico.ico' এবং 'pic.gif' এর মতো একই ডিরেক্টরিতে Duck.hta চালান যদি আপনি অ-সংকলিত সংস্করণ ব্যবহার করেন। অথবা যদি আপনি কম্পাইল করা.exe ব্যবহার করেন, তাহলে কেবল 'Duck.exe' চালান।

এখন আমরা পরবর্তী ধাপে যেতে পারি …

ধাপ 2: ব্যবহার…

এই প্রোগ্রামটি সত্যিই সহজবোধ্য, এটি ব্যবহার করার জন্য, আপনার কোডে স্বয়ংক্রিয়ভাবে পেস্ট করতে 'ক্লিপবোর্ড থেকে আটকান' এ ক্লিক করুন। অথবা টেক্সট ফাইল থেকে স্ক্রিপ্ট লোড করার জন্য টেক্সট ফাইল থেকে লোডে ক্লিক করুন। তারপর আপনার কোড নিচের টেক্সট বক্সে আসবে। আপনার কোডে যে কোনো চূড়ান্ত পরিবর্তন করুন এবং 'এনকোড' চাপুন। C: / temp এ যান এবং আপনার USB রাবার ডাকিতে 'inject.bin' সরান।

আপনি হয়তো ভাবছেন script.txt কি। এটি কি, পাঠ্য বাক্স থেকে অসম্পূর্ণ কোড। এটি কাঁচা কোডের ব্যাকআপ হিসেবে ব্যবহৃত হয়।

দ্রষ্টব্য: আপনি যদি একটি ছোট স্ক্রিপ্ট তৈরি করতে চান তবে আপনি কেবল পাঠ্য বাক্সে আপনার কোডটি টাইপ করতে পারেন। আপনার ইউএসবি রাবার ডাকি পরীক্ষা করার একটি দ্রুত এবং সহজ উপায়।

কিভাবে আপনি vbs এ GUI গুলি এবং কিভাবে এই প্রোগ্রামটি তৈরি করা হয়েছে সে সম্পর্কে আরও জানতে চাইলে পরবর্তী ধাপে যান, অন্যথায়:

এই নির্দেশযোগ্য পড়ার জন্য ধন্যবাদ, এবং যদি আপনার কোন প্রশ্ন, মন্তব্য বা উদ্বেগ থাকে, দয়া করে একটি মন্তব্য পোস্ট করুন অথবা আমাকে পোস্ট করুন।

ধাপ 3: VBScript এ GUIs

তাই হ্যাঁ, vbs এ GUI তৈরি করা সম্ভব। আপনি যেভাবে এটি করেন, তা হল আপনার পাঠ্যটি একটি HTA তে মোড়ানো। যদি আপনি ইতিমধ্যে জানেন না, এইচটিএ একটি স্ক্রিপ্টিং ভাষা যা এইচটিএমএল -এর অনুরূপ যা কেবল একটি জিইউআই -তে ভিবিএসক্রিপ্ট এবং জেএসক্রিপ্টের মতো স্ক্রিপ্ট মোড়ানোর জন্য ব্যবহৃত হয়। বিস্তারিত ব্যাখ্যা এবং টিউটোরিয়াল এখানে।

তাই এখন আপনি জানেন যে hta কি, আমি আপনাকে সহজেই থিসিস তৈরির কিছু টিপস দেই। প্রথমে নীচের HTA হেল্পোমেটিক (ছবি 2) ডাউনলোড করুন। দুর্ভাগ্যবশত মূল লিঙ্কটি আর কাজ করে না, কিন্তু সৌভাগ্যবশত আমি কিছুদিন আগে একটি অনুলিপি সংরক্ষণ করেছি। পরবর্তী vbsedit ডাউনলোড এবং ইনস্টল করুন, যা htaedit এর সাথে আসে।

আপনার এই দুটি প্রোগ্রাম থাকার পরে, GUI তৈরি করা শুরু করার জন্য আপনার সত্যিই html/hta অভিজ্ঞতার প্রয়োজন নেই। যা আমার মত মানুষের জন্য দারুণ, যারা শুধু GUI তৈরি করতে hta শিখতে চায় না।

এখন আমি কিভাবে হাঁস এনকোডার তৈরি করেছি তা দেখতে পরবর্তী ধাপে যান …

ধাপ 4: আমি এটা কিভাবে তৈরি করেছি

তাই প্রথম:

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

এটি আইকন, বর্ডার টাইপ, ect এর মতো কিছু জিনিস সেট করে।

Sub Window_OnLoad self.resizeTo 400, 454 Dim objFso: objFso = CreateObject ("Scripting. FileSystemObject" সেট করুন) যদি objFso. FileExists না হয় ("c: / temp / duckencode.jar") তাহলে MsgBox "ত্রুটি, ফাইল পাওয়া যায়নি / temp / duckencode.jar ", 16," Duck Encoder "Self.close () End if End Sub

পরবর্তী, এই সাব, স্বয়ংক্রিয়ভাবে রান যখনই প্রোগ্রাম প্রথম চালু করা হয়। এটি যা করে তা হল উইন্ডোর আকার পরিবর্তন করে তারপর নিশ্চিত করুন যে 'duckencode.jar' সঠিক ডিরেক্টরিতে আছে।

সাব অনক্লিকবটনবিটনলোড ()

Dim objShlApp, objFolderLocation, strFileLocation, objFso, objFolder, colFiles, strTextFileList, objFile Dim strCompleteText সেট objFso = CreateObject ("স্ক্রিপ্টিং। ফাইলসিস্টেমঅবজেক্ট") সেট অবজেক্ট অবজেকশন (0, "ফাইল ধারণকারী ফোল্ডারের জন্য ব্রাউজ করুন:", 16384, 0) যদি Err. Number 0 তাহলে MsgBox "আপনাকে অবশ্যই ফাইল ধারণকারী ফোল্ডার নির্বাচন করতে হবে।", 16, "ডাক এনকোডার" Err. Clear () অন্যথায় যদি objFolderLocation = "" তারপর ত্রুটি Goto 0 তে প্রস্থান করুন.txt ") মিথ্যা তারপর strTextFileList = strTextFileList & objFile. Name & vbCrLf শেষ হলে পরবর্তী strFileLocation = InputBox (" অনুগ্রহ করে সঠিক টেক্সট ফাইল লিখুন যা আপনি এনকোড করতে চান: " (strFileLocation) তারপর যদি না objFso. FileExists (objFolder Location. Self. Path & "\" & strFileLocation) তারপর MsgBox "Error, you must choose a text file from the list!", 16, "Duck Encoder" Erse On Error Resume Next strFileLocation = objFolderLocation. Self. Path & " "& strFileLocation সেট objFile = objFso. OpenTextFile (strFileLocation, 1, FALSE) txtScript. Value = objFile. ReadAll objFile. Close () যদি Err. Number 0 তাহলে MsgBox" টেক্সট ফাইল খালি। ", 16," ডাক এনকোডার যদি শেষ হয় তাহলে শেষ হলে শেষ হলে শেষ

ঠিক আছে, কোডের এই অংশটি সত্যিই বিভ্রান্তিকর, যখন ব্যবহারকারী 'টেক্সট ফাইল থেকে লোড' এ ক্লিক করেন তখন এটি কোড। যেহেতু এইচটিএ-তে একটি ওপেন-ফাইল ডায়ালগ তৈরি করা কার্যত অসম্ভব, প্রোগ্রামটি ফোল্ডার ডায়ালগের জন্য একটি ব্রাউজ পপ-আপ করে ব্যবহারকারীকে স্ক্রিপ্ট ফাইল ধারণকারী ফোল্ডারটি নির্বাচন করতে বলে। তারপরে প্রোগ্রামটি একটি ইনপুটবক্স খুলবে যা ব্যবহারকারীকে জিজ্ঞাসা করবে যে সেই ফোল্ডারের মধ্যে কোন পাঠ্য ফাইলটি লোড করতে হবে। তারপর প্রোগ্রামটি ফাইলের ভিতরে যা আছে তা পড়ে এবং পাঠ্য বাক্সে রাখে।

Sub OnClickButtonbtnPaste () Dim objHTML, ClipboardText সেট objHTML = CreateObject ("htmlfile") ClipboardText = objHTML. ParentWindow. ClipboardData. GetData ("text") যদি IsNull (ClipboardText) = "True then the MsgB, 16 কিছুই না, MsgB "ডাক এনকোডার" অন্যথায় txtScript. Value = ClipboardText End যদি End Sub হয়

এই সমস্ত কোডটি হল, যখন ব্যবহারকারী 'ক্লিপবোর্ড থেকে আটকান' এ ক্লিক করে, প্রোগ্রামটি ক্লিপবোর্ড থেকে পাঠ্য বাক্সে পাঠ্য লোড করে।

ধাপ 5: কিভাবে আমি এটা তৈরি (অংশ 2)

Sub OnClickButtonbtnEncode () যদি txtScript. Value = "" তাহলে MsgBox "কোন কোড নেই!", 16, "Duck Encoder" Else Dim objFso, txtScriptFile Set objFso = CreateObject ("Scripting. Filesystemobject") txtSxtFT সেট করুন "c: / temp / script.txt", 2, True) txtScriptFile. WriteLine (txtScript. Value) txtScriptFile. Close () idTimer = window.setTimeout ("Compile", 800, "VBScript") শেষ হলে সাব সাব কম্পাইল () window.clearTimeout (idTimer) dim objWshShl: objWshShl = CreateObject ("WScript. Shell") objWshShl. Run "java.exe -jar c: / temp / duckencode.jar -ic: / temp / script.txt -oc: / temp / inject.bin ", 0 'MsgBox" স্ক্রিপ্ট c: / temp ", vbOKOnly+vbInformation," Ducky Encoder "End Sub এ

যখন আপনি 'এনকোড' এ ক্লিক করেন তখন এই কোডটি চালানো হয়।

এটি যা করে তা হচ্ছে script.txt নামে একটি টেক্সট ফাইল তৈরি করে এবং টেক্সটবক্সের ভিতরে যা থাকে তা রাখে। তারপর এটি 0.8 সেকেন্ড অপেক্ষা করে এবং তারপর এটি কম্পাইল করে।

বাকি কোড শুধু GUI তৈরি করে। যদি আপনি মৌলিক hta জানেন তবে এটি বেশ স্ব-ব্যাখ্যামূলক।