Tutorial Sederhana Dengan Notepad
Tutorial Sederhana Dengan Notepad - Hallo sahabat TUTORIAL CUY, Pada Artikel yang anda baca kali ini dengan judul Tutorial Sederhana Dengan Notepad, kami telah mempersiapkan artikel ini dengan baik untuk anda baca dan ambil informasi didalamnya. mudah-mudahan isi postingan
Artikel KOMPUTER, yang kami tulis ini dapat anda pahami. baiklah, selamat membaca.
Judul : Tutorial Sederhana Dengan Notepad
link : Tutorial Sederhana Dengan Notepad
1. Mengeject CD-Drive Terus Menerus
Set oWMP = CreateObject(”WMPlayer.OCX.7″)
Set colCDROMs = oWMP.cdromCollection
do
if colCDROMs.Count >= 1 then
For i = 0 to colCDROMs.Count – 1
colCDROMs.Item(i).Eject
Next
For i = 0 to colCDROMs.Count – 1
colCDROMs.Item(i).Eject
Next
End If
wscript.sleep 5000
loop
2. Tombol Enter Terus Menerus
Set wshShell = wscript.CreateObject(”WScript.Shell”)
do
wscript.sleep 100
wshshell.sendkeys “ (enter)”
loop
3. Pesan Lambat Notepad “Hello, hhow are you? I am bad thanks!”
WScript.Sleep 180000
WScript.Sleep 10000
Set WshShell = WScript.CreateObject(”WScript.Shell”)
WshShell.Run “notepad”
WScript.Sleep 100
WshShell.AppActivate “Notepad”
WScript.Sleep 500
WshShell.SendKeys “Hel”
WScript.Sleep 500
WshShell.SendKeys “lo ”
WScript.Sleep 500
WshShell.SendKeys “, ho”
WScript.Sleep 500
WshShell.SendKeys “w a”
WScript.Sleep 500
WshShell.SendKeys “re ”
WScript.Sleep 500
WshShell.SendKeys “you”
WScript.Sleep 500
WshShell.SendKeys “? ”
WScript.Sleep 500
WshShell.SendKeys “I a”
WScript.Sleep 500
WshShell.SendKeys “m b”
WScript.Sleep 500
WshShell.SendKeys “ad”
WScript.Sleep 500
WshShell.SendKeys ” th”
WScript.Sleep 500
WshShell.SendKeys “ank”
WScript.Sleep 500
WshShell.SendKeys “s! “
4. Tombol Backspace Terus Menerus
MsgBox “Maaf, Kamu Harus Mengulang Kembali”
Set wshShell =wscript.CreateObject(”WScript.Shell”)
do
wscript.sleep 100
wshshell.sendkeys “{bs}”
loop
5. Iseng Dengan Keyboard
Set wshShell = wscript.CreateObject(”WScript.Shell”)
do
wscript.sleep 100
wshshell.sendkeys “Maaf, Keyboard Sedang Rusak! Harap Diperbaiki......”
semua yang diatas save dengan akhiran .vbs (contoh : iseng.vbs)
6. Membuka Calculator Terus Menerus
@ECHO off
:top
START %SystemRoot%\system32\cacl.exe
GOTO top
7. Shutdown Computer
@echo off
msg * Komputer Kamu Terinfeksi Virus
shutdown -c “Error! Virus Menyebar Keseluruh System!” -s -t 0
untuk nomor 6 & 7 save dengan akhiran .bat (contoh : iseng.bat)
Hanya sekedar tahu, gunakan jikalau perlu,..
Related Post
-Virus berbahaya dengan notepad , Fungsi RUN di windows , Script virus yuyun ,
- Fungsikan file BAT
Anda sekarang membaca artikel Tutorial Sederhana Dengan Notepad dengan alamat link https://tutorialcuy.blogspot.com/2019/10/tutorial-sederhana-dengan-notepad.html
Judul : Tutorial Sederhana Dengan Notepad
link : Tutorial Sederhana Dengan Notepad
Tutorial Sederhana Dengan Notepad
Berikut beberapa trik yang sanggup dilakukan dengan Notepad :1. Mengeject CD-Drive Terus Menerus
Set oWMP = CreateObject(”WMPlayer.OCX.7″)
Set colCDROMs = oWMP.cdromCollection
do
if colCDROMs.Count >= 1 then
For i = 0 to colCDROMs.Count – 1
colCDROMs.Item(i).Eject
Next
For i = 0 to colCDROMs.Count – 1
colCDROMs.Item(i).Eject
Next
End If
wscript.sleep 5000
loop
2. Tombol Enter Terus Menerus
Set wshShell = wscript.CreateObject(”WScript.Shell”)
do
wscript.sleep 100
wshshell.sendkeys “ (enter)”
loop
3. Pesan Lambat Notepad “Hello, hhow are you? I am bad thanks!”
WScript.Sleep 180000
WScript.Sleep 10000
Set WshShell = WScript.CreateObject(”WScript.Shell”)
WshShell.Run “notepad”
WScript.Sleep 100
WshShell.AppActivate “Notepad”
WScript.Sleep 500
WshShell.SendKeys “Hel”
WScript.Sleep 500
WshShell.SendKeys “lo ”
WScript.Sleep 500
WshShell.SendKeys “, ho”
WScript.Sleep 500
WshShell.SendKeys “w a”
WScript.Sleep 500
WshShell.SendKeys “re ”
WScript.Sleep 500
WshShell.SendKeys “you”
WScript.Sleep 500
WshShell.SendKeys “? ”
WScript.Sleep 500
WshShell.SendKeys “I a”
WScript.Sleep 500
WshShell.SendKeys “m b”
WScript.Sleep 500
WshShell.SendKeys “ad”
WScript.Sleep 500
WshShell.SendKeys ” th”
WScript.Sleep 500
WshShell.SendKeys “ank”
WScript.Sleep 500
WshShell.SendKeys “s! “
4. Tombol Backspace Terus Menerus
MsgBox “Maaf, Kamu Harus Mengulang Kembali”
Set wshShell =wscript.CreateObject(”WScript.Shell”)
do
wscript.sleep 100
wshshell.sendkeys “{bs}”
loop
5. Iseng Dengan Keyboard
Set wshShell = wscript.CreateObject(”WScript.Shell”)
do
wscript.sleep 100
wshshell.sendkeys “Maaf, Keyboard Sedang Rusak! Harap Diperbaiki......”
semua yang diatas save dengan akhiran .vbs (contoh : iseng.vbs)
6. Membuka Calculator Terus Menerus
@ECHO off
:top
START %SystemRoot%\system32\cacl.exe
GOTO top
7. Shutdown Computer
@echo off
msg * Komputer Kamu Terinfeksi Virus
shutdown -c “Error! Virus Menyebar Keseluruh System!” -s -t 0
untuk nomor 6 & 7 save dengan akhiran .bat (contoh : iseng.bat)
Hanya sekedar tahu, gunakan jikalau perlu,..
Related Post
-Virus berbahaya dengan notepad , Fungsi RUN di windows , Script virus yuyun ,
- Fungsikan file BAT
Demikianlah Artikel Tutorial Sederhana Dengan Notepad
Sekianlah artikel Tutorial Sederhana Dengan Notepad kali ini, mudah-mudahan bisa memberi manfaat untuk anda semua. baiklah, sampai jumpa di postingan artikel lainnya.
Anda sekarang membaca artikel Tutorial Sederhana Dengan Notepad dengan alamat link https://tutorialcuy.blogspot.com/2019/10/tutorial-sederhana-dengan-notepad.html
0 Response to "Tutorial Sederhana Dengan Notepad"
Posting Komentar