อำเพื่อนๆเล่นด้วย VB Script
posted on 20 Dec 2007 09:05 by warbanditเรื่องนี้ออกจะไร้สาระไปหน่อย
แต่รับรองว่า ทั้งสนุก สะใจ และได้ความรู้ไปอย่างแน่นอน
ระบบปฏิบัติการวินโดวส์จะสามารถรัน Visual Basic Script ได้แน่นอน
เพราะ VB รันบนวินโดวส์มาได้นมนานแล้ว จะรันบน OS อื่นๆได้รึเปล่า อันนี้ไม่รู้ แต่คิดว่าไม่น่าจะได้
เอาล่า เรามาเริ่มต้นกันดีกว่า
ให้เราเปิด Notepad แล้วพิมพ์คำสั่งนี้ลงไป
x=msgbox("[ข้อความที่ต้องการ]",*+*,"[Title ของ Msgbox]")
* หมายถึงตัวเลขที่จะนำมาใส่ นั่นคือ
ในตัวแรกนะครับ จะเป็นตัวเลข 0-5 ตามนี้
- 0 คือ VbOkOnly
- 1 คือ VbOkCancel
- 2 คือ VbAbortRetryIgnore
- 3 คือ VbYesNoCancel
- 4 คือ VbYesNo
- 5 คือ VbRetryCancel
ปล. จำปุ่มคำสั่ง VB ไม่ได้อ่ะ แต่ก็น่าจะตามนี้
ส่วน * ตัวถัดมาก็จะเป็นรูปภาพตามนี้
- 16 = VbCritical
- 32 = VbQuestion
- 48 = VbExclamation
- 64 = VbInformation
เสร็จแล้วให้เซฟเป็นไฟล์ชื่ออะไรก็ได้ ให้มีส่วนขยายหรือนามสกุลเป็น .vbs
ในที่นี้ผมจะลองใส่โค๊ดนี้ดู
x=msgbox("A Virus Detected Can't Open The Application",5+16,"Danger!!")
เมื่อกดรันแล้วจะได้รูปนี้้
ซึ่งไม่ว่าจะกด Retry หรือ Cancel ก็จะเป็นการปิดหน้าต่างนี้ทั้งสิ้น
===================
มาถึงขั้นตอนการอำคนแล้ว อิอิ
ให้เราเอาไฟล์นี้ไปไว้ที่ไหนก็ได้ และสร้าง Shotcut มาที่ไฟล์นี้
เปลี่ยนชื่อ และรูปไอคอนของ Shotcut ที่เราสร้างไว้เมื่อกี้เป็นอย่างอื่นครับ
โดยที่เราจะลองเปลี่ยนเป็น IE ดู
โอ้โห เหมือนกันอย่างกับแกะ (อันซ้ายของปลอมฮะ)
และให้เอา IE (ตัวจริง) ไปซ่อนไว้ โดยการ Customize Desktop ให้เลือกเอา IE ออก
และแล้ว เมื่อเหยื่อต้องการจะใช้ IE เค้าก็จะดับเบิ้ลคลิกที่ไอคอน IE ปลอม
และมีหน้าต่าง Error เด้งขึ้นมาให้ตกใจเล่นๆ
ไม่ว่าเค้าจะพยายามยังไง ก็จะไม่สามารถเปิด IE (ปลอม)ได้
หลอกให้เครียดไปเลย เหอ เหอ !!
สำหรับวันนี้ก็ขอลากันไปก่อนนะครับ ไว้พบกันใหม่ฮิ









งี้ตั้งให้มันเด้งขึ้นเป็น infinity loop ก็ได้สินะงับ
#1 By ไลก้าคุง on 2007-12-20 20:18