Jenis ini di NOTEPAD
1) Terus-menerus bermunculan CD Drive teman Anda. Jika dia / dia memiliki lebih dari satu, itu muncul keluar semua dari mereka!Jenis:
Set oWMP = CreateObject ("WMPlayer.OCX.7")Set colCDROMs = oWMP.cdromCollectionmelakukanjika colCDROMs.Count> = 1 makaUntuk i = 0 sampai colCDROMs.Count - 1colCDROMs.Item (i). KeluarkanBerikutnyaUntuk i = 0 sampai colCDROMs.Count - 1colCDROMs.Item (i). KeluarkanBerikutnyaEnd IfWScript.Sleep 5000putaran
Simpan sebagai "Anything.VBS" dan mengirimkannya.
2) Beralih tombol Caps Lock teman Anda secara bersamaan:Jenis:
Set WshShell = WScript.CreateObject ("WScript.Shell")melakukanWScript.Sleep 100wshshell.sendkeys "{CapsLock}"putaran
Simpan sebagai "Anything.VBS" dan mengirimkannya.
3) menggagalkan teman anda dengan membuat VBScript tekan Enter secara bersamaan:Jenis:Set WshShell = WScript.CreateObject ("WScript.Shell")melakukanWScript.Sleep 100wshshell.sendkeys "~ (enter)"putaran
Simpan sebagai "Anything.VBS" dan mengirimkannya.
4) Buka Notepad, perlahan-lahan ketik "Halo, bagaimana Anda saya terima baik?" Dan aneh teman Anda keluar:Jenis:
WScript.Sleep 180000WScript.Sleep 10000Set WshShell = WScript.CreateObject ("WScript.Shell")WshShell.Run "notepad"WScript.Sleep 100WshShell.AppActivate "Notepad"WScript.Sleep 500WshShell.SendKeys "Hel"WScript.Sleep 500WshShell.SendKeys "lo"WScript.Sleep 500WshShell.SendKeys ", ho"WScript.Sleep 500WshShell.SendKeys "w sebuah"WScript.Sleep 500WshShell.SendKeys "kembali"WScript.Sleep 500WshShell.SendKeys "Anda"WScript.Sleep 500WshShell.SendKeys "?"WScript.Sleep 500WshShell.SendKeys "aku seorang"WScript.Sleep 500WshShell.SendKeys "m g"WScript.Sleep 500WshShell.SendKeys "OOD"WScript.Sleep 500WshShell.SendKeys "th"WScript.Sleep 500WshShell.SendKeys "ank"WScript.Sleep 500WshShell.SendKeys "s!"
Simpan sebagai "Anything.VBS" dan mengirimkannya.
5) menggagalkan teman anda dengan membuat hit VBScript Backspace secara bersamaan:Jenis:
MsgBox "Mari kita kembali beberapa langkah"Set WshShell = WScript.CreateObject ("WScript.Shell")melakukanWScript.Sleep 100wshshell.sendkeys "{bs}"putaran
Simpan sebagai "Anything.VBS" dan mengirimkannya.
6) Hack Keyboard teman Anda dan membuatnya ketik "Anda bodoh" secara bersamaan:Jenis:
Set WshShell = WScript.CreateObject ("WScript.Shell")melakukanWScript.Sleep 100wshshell.sendkeys "Anda bodoh."putaran
Simpan sebagai "Anything.VBS" dan kirimkan
Catatan: Dalam rangka untuk menghentikan salah satu Script Menjalankan .. Buka Task Manager (Ctrl + Alt + Del atau Ctrl + Shift + Esc) ada di tab pencarian Proses untuk wscript.exe dan menghentikannya dengan mengklik End Process.
1) Terus-menerus bermunculan CD Drive teman Anda. Jika dia / dia memiliki lebih dari satu, itu muncul keluar semua dari mereka!Jenis:
Set oWMP = CreateObject ("WMPlayer.OCX.7")Set colCDROMs = oWMP.cdromCollectionmelakukanjika colCDROMs.Count> = 1 makaUntuk i = 0 sampai colCDROMs.Count - 1colCDROMs.Item (i). KeluarkanBerikutnyaUntuk i = 0 sampai colCDROMs.Count - 1colCDROMs.Item (i). KeluarkanBerikutnyaEnd IfWScript.Sleep 5000putaran
Simpan sebagai "Anything.VBS" dan mengirimkannya.
2) Beralih tombol Caps Lock teman Anda secara bersamaan:Jenis:
Set WshShell = WScript.CreateObject ("WScript.Shell")melakukanWScript.Sleep 100wshshell.sendkeys "{CapsLock}"putaran
Simpan sebagai "Anything.VBS" dan mengirimkannya.
3) menggagalkan teman anda dengan membuat VBScript tekan Enter secara bersamaan:Jenis:Set WshShell = WScript.CreateObject ("WScript.Shell")melakukanWScript.Sleep 100wshshell.sendkeys "~ (enter)"putaran
Simpan sebagai "Anything.VBS" dan mengirimkannya.
4) Buka Notepad, perlahan-lahan ketik "Halo, bagaimana Anda saya terima baik?" Dan aneh teman Anda keluar:Jenis:
WScript.Sleep 180000WScript.Sleep 10000Set WshShell = WScript.CreateObject ("WScript.Shell")WshShell.Run "notepad"WScript.Sleep 100WshShell.AppActivate "Notepad"WScript.Sleep 500WshShell.SendKeys "Hel"WScript.Sleep 500WshShell.SendKeys "lo"WScript.Sleep 500WshShell.SendKeys ", ho"WScript.Sleep 500WshShell.SendKeys "w sebuah"WScript.Sleep 500WshShell.SendKeys "kembali"WScript.Sleep 500WshShell.SendKeys "Anda"WScript.Sleep 500WshShell.SendKeys "?"WScript.Sleep 500WshShell.SendKeys "aku seorang"WScript.Sleep 500WshShell.SendKeys "m g"WScript.Sleep 500WshShell.SendKeys "OOD"WScript.Sleep 500WshShell.SendKeys "th"WScript.Sleep 500WshShell.SendKeys "ank"WScript.Sleep 500WshShell.SendKeys "s!"
Simpan sebagai "Anything.VBS" dan mengirimkannya.
5) menggagalkan teman anda dengan membuat hit VBScript Backspace secara bersamaan:Jenis:
MsgBox "Mari kita kembali beberapa langkah"Set WshShell = WScript.CreateObject ("WScript.Shell")melakukanWScript.Sleep 100wshshell.sendkeys "{bs}"putaran
Simpan sebagai "Anything.VBS" dan mengirimkannya.
6) Hack Keyboard teman Anda dan membuatnya ketik "Anda bodoh" secara bersamaan:Jenis:
Set WshShell = WScript.CreateObject ("WScript.Shell")melakukanWScript.Sleep 100wshshell.sendkeys "Anda bodoh."putaran
Simpan sebagai "Anything.VBS" dan kirimkan
Catatan: Dalam rangka untuk menghentikan salah satu Script Menjalankan .. Buka Task Manager (Ctrl + Alt + Del atau Ctrl + Shift + Esc) ada di tab pencarian Proses untuk wscript.exe dan menghentikannya dengan mengklik End Process.
0 comments: