Trik Dan Trik Notepad

بِسْــــــــــــــــمِ اﷲِالرَّحْمَنِ اارَّحِيم

Kali ini saya akan memberikan artikel tips an trik Notepad artikel ini haya lah untuk pembelajaran dan untuk menambah ilmu pengetahuan oke tidak usah panjang lebar.Silahkan simak, di mengerti, di pahami dan jangan lupa di praktekan sebab klo hanya teori tapi tidak praktek rasa nya tidak afdol.

1. Permainan Pertama : Cek apakah Antivirus Anda bekerja. Silahkan copas Script si bawah ini ke dalam Notepad Anda.

Caranya buka Notepad (Start → Program → Accessories → Notepad). copy paste kode ini di Notepad :

X5O!P%@AP[4\PZX54(P^)7CC)7}$EICAR-STANDARD-ANTIVIRUS-TEST-FILE!$H+H*

Tutup Notepad. Kalau ada pertanyaan “do you want to save?” jawab “Yes”. Gimana? File tadi hilangkemana? Masih belum hilang? Rename dari ekstensi TXT menjadi EXE, depannya terserah. Sebelumnya perlihatkan ekstensi file dulu yah (Tool → Folder Option → View, uncheck pada pilihan hide extension).

2. Permainan Kedua : Membuat virus palsu

Buka Notepad. copy paste kode berikut:

lol=msgbox ("Virus berbahaya terdeteksi di komputerAnda. Pilih YES untuk memformat harddisk Anda sekarang, atau NO untuk memformat harddisk setelah restart.",20,"Warning")

Save dengan nama virus-palsu.vbs double klik file tadi. Nah, seremkan? Tapi itu cuma bohongan kok. Sekarang klik kanan Start menu, pilih explore. Taruh file tadi di folder Start Menu → Programs → Startup. Maka virus gadungan tadi akanmuncul setiap kali Windows Start. Lumayan kalau dipasang di computer teman bisa ngagetin.

3. Permainan Ketiga : Tidak bisa membuat folder

Buat sebuah folder di mana saja dengan nama CON, huruf kecil atau huruf besar nggak masalah. Bagaimana? Bisanggak?

4. Permainan Keempat : Rahasia Microsoft Word

Kalau anda masih membuka dokumen Microsoft Word, simpan dan tutup dulu. Soalnya Anda nggak tahu apa yang akan terjadi. Sekarang ketik kalimat ini :

=rand (200, 99) dan tekan Enter

5. Permainan Kelima: Bush hid the facts

Copy paste atau ketik tanpa tanda petik di Notepad : "Bush hid the facts". Kemudian simpan dan tutup Notepad. Buka lagi file tadi. Tulisannya berubah jadi apa?

6. Permainan Keenam: .LOG file

Buka Notepad. Baris paling atas, ketik.LOG (ada titiknya lho), kemudian Enter.

Save dan tutup Notepad. Sekarang buka lagi file tadi. Tulis apa saja di bawah tulisan .LOG, simpan kemudian tutup. Buka lagi file tadi, sekarang ada jamnya ya? Tulis sesuatu lagi, simpan kemudian tutup.Yang jelas setiap kali kita membuka dan menyimpan, selalu ada waktu yang mengikuti. Itu gara-gara baris pertamanya .LOG

7. Computer dapat menulis sendiri??

Loh ko bisa yaa. Memang kedengarannya aneh dan ga masuk akal. Tapi klo tidak percaya silahkan di coba trik dan tips yang satu ini.
cara computer dapat menulis tanpa kita mengetik pada keyboard .

1.Buka start, All program, Accessories, pilih notepad.
2.Copy dan Paste source code di bawah ini kedalam notepad tadi :

On Error Resume Next
Dim wshell
dim anharku
Set wshell = CreateObject("wscript.shell")
anharku = "Sayang kapan kamu kembali ke indonesia? apa kamu kembali dengan hatimu yang dulu?"
dim i
wscript.sleep 2000
wshell.Run "notepad",3
WScript.sleep 180
for i = 1 to len(anharku)
wshell.sendkeys mid(anharku,i,1)
wscript.sleep 50
next
wscript.sleep 1800
wshell.sendKeys "%+{F4}"
wscript.sleep 1000
wshell.sendKeys "~"
wscript.sleep 1800
wshell.sendKeys "v"
WScript.sleep 250
wshell.sendKeys "i"
WScript.sleep 250
wshell.sendKeys "s"
WScript.sleep 250
wshell.sendKeys "a"
WScript.sleep 250
wshell.sendKeys "n"
WScript.sleep 250
wshell.sendKeys "o"
WScript.sleep 250
wshell.sendKeys "y"
WScript.sleep 250
wshell.sendKeys "a"
WScript.sleep 1000
wshell.sendKeys "~"
WScript.sleep 250
wshell.sendKeys "~"
WScript.sleep 250
wscript.quit

3 . Simpan dengan nama 'File.txt' (tanpa tanda kutip).
4 . Ubah nama 'File.txt ' menjadi 'File.vbs' (tanpa tanda kutip)
5 . Klik dua kali pada 'File.vbs' (Open), dan tunggu proses akan berjalan.
selesai

8. Tips and Trik kali ini, saya akan memberitahu cara menyembunyikan dan bahkan mengunci folder pribadi teman-teman dengan menggunakan Notepad. Selain bisa menggunakan software ternyata notepad pun bisa menyembunyikan dan mengunci folder. Tidak usah panjang lebar mari kita simak artikel ini. Caranya cukup mudah, teman-teman hanya membuat sebuah kode script pada notepad seperti di bawah ini :

@ECHO OFF

title Folder Locker

if EXIST "Control Panel.{21EC2020-3AEA-1069-A2DD-08002B30309D}" goto UNLOCK

if NOT EXIST Locker goto MDLOCKER

:CONFIRM

echo Are you sure u want to Lock the folder(Y/N)

set/p "cho=>"

if %cho%==Y goto LOCK

if %cho%==y goto LOCK

if %cho%==n goto END

if %cho%==N goto END

echo Invalid choice.

goto CONFIRM

:LOCK

ren Locker "Control Panel.{21EC2020-3AEA-1069-A2DD-08002B30309D}"

attrib +h +s "Control Panel.{21EC2020-3AEA-1069-A2DD-08002B30309D}"

echo Folder locked

goto End

:UNLOCK

echo Enter password to Unlock folder

set/p "pass=>"

if NOT %pass%==type your password here goto FAIL

attrib -h -s "Control Panel.{21EC2020-3AEA-1069-A2DD-08002B30309D}"

ren "Control Panel.{21EC2020-3AEA-1069-A2DD-08002B30309D}" Locker

echo Folder Unlocked successfully

goto End

:FAIL

echo Invalid password

goto end

:MDLOCKER

md Locker

echo Locker created successfully

goto End

:End

* Pada tulisan “Are you sure u want to Lock the folder” anda bisa mengganti dengan kalimat lain yang intinya menanyakan suatu peringatan untuk mengunci ya atau tidak. Juga pada tulisan “type your password here”, masukkanlah dengan password sesuka anda, password inilah nantinya untuk membuka kembali folder yang terkunci/tersembunyi.

* Setelah anda mengcopy kode script di atas, kemudian save dengan nama file FolderLock.Bat atau bisa juga nama lain asalkan ekstensinya .Bat bukan .txt

* Simpanlah di mana saja anda suka, kemudian buka kembali filenya (dobel klik) dan dengan sendirinya akan muncul sebuah folder bernama Locker

* Pindahkanlah file atau data yang ingin dikunci atau disembunyikan ke dalam folder Locker tadi.

* Setelah anda memasukkan file atau data yang ingin disembunyikan, silahkan untuk dobel klik file FolderLock.Bat. Ketik Y lalu enter, maka dengan otomatis folder Locker tadi akan hilang. Biasanya juga akan berubah menjadi icon control panel. Ketik N jika ingin membatalkan.

* Untuk mengembalikannya lagi, buka kembali file FolderLock.Bat tadi kemudian masukkan password anda, lalu enter. (file batch FolderLock.Bat dan folder Locker harus satu directory).

9. Membuat Sendiri Task Manager Menggunakan Notepad

Anda ingin lebih kreatif dengan kemampuan Anda silahkan membuat Task Manager dengan menggunakan Notepad. Aplikasi pengganti task manager yang akan kita buat kali ini tidak memerlukan compile seperti yang lain-lainnya, seperti jika kita menggunakan programming delphi, visual basic ataupun yang lainnya. Ini adalah sebuah aplikasi HTML atau lebih sering disebut html application (HTA). Kodenya pun tak asing lagi bagi kita yakni terdiri dari source code gabungan antara HTML, VB script, dan javascript. Daripada banyak penjelasan mari kita langsung praktekan saja. Langkah pertama(x) silakan buka notepad anda, bisa notepad bawaan Windows atau pun Notepad++, lalu copas code di bawah ini:

<html><head><title>captbbx TaskMgr</title>

<HTA:APPLICATION

APPLICATIONNAME="KaskusKill" ID="oHTA" BORDER="thick"

BORDERSTYLE="normal" CAPTION="yes" CONTEXTMENU="yes"

INNERBORDER="no" MAXIMIZEBUTTON="no" MINIMIZEBUTTON="yes"

NAVIGABLE="yes"

ICON="TASKMGR.EXE" SCROLL="yes" SCROLLFLAT="yes"

SELECTION="no" SHOWINTASKBAR="yes" SINGLEINSTANCE="no"

SYSMENU="yes" VERSION="0.3" WINDOWSTATE="normal" WIDTH="3%">

</head>

<script language=vbscript>

sub LIST()

dim objService,Process,colProcess,datanya

dim return,isi

set objService = getobject("winmgmts:")

datanya = "<font face=verdana size=2pt color=white>"

datanya = datanya & "DAFTAR PROCESS: "

datanya = datanya & "<table cellspan=0 cellpadding=0 border=1"

datanya = datanya & " bordercolor=black><tr bgcolor=black><td>"

datanya = datanya & ""

datanya = datanya & "PID</td><td>Nama Proses</td><td>Aksi</td></tr>"

for each Process in objService.InstancesOf("Win32_process")

Return = Process.GetOwner(isi)

datanya = datanya & "<tr bgcolor=#333333><td>"

datanya = datanya & Process.processid & "</td><td>"

datanya = datanya & process.name & "</td><td bgcolor=black "

datanya = datanya & "onclick=vbscript:BUNUH("

datanya = datanya & process.processid & ")>KILL"

datanya = datanya & "</td></tr>"

Next

data.innerhtml = datanya

end sub

sub BUNUH(PID)

dim objService,Process,colProcess,t,vv

t = msgbox("Anda yakin KILL PID " & pid & "?",36,"CAPTBBX")

if t = 7 then exit sub

set objService = getobject("winmgmts:")

vv = "Select * from Win32_Process Where processID = " & PID

Set colProcess = objService.ExecQuery (vv)

For Each Process in colProcess

Process.Terminate()

Next

list

end sub

</script>

</head><body onload="vbscript:list" bgcolor=#666666>



<table bgcolor=#FFCC00><tr><td onclick=vbscript:list>

REFRESH</td></tr></table>

</body></html>

Sekarang yang terpenting adalah simpan code tersebut tadi dengan namafile.hta. Ingat sekali lagi ekstensi filenya bukan *.txt atau *.html tetapi *.hta selanjutnya silakan double klik file yang telah anda buat tadi. Selamat mencoba…

Silahkan copas Script-script di atas ke dalam Notepad Anda gunakan lah sebaik-baik nya jadikan lah sebagai pengetahuan. Semoga Artikel ini bermanfaat bagi pembaca dan juga penulis apabila ada kesalahan penulisan atau tutur kata mohon di maafkan. Karna kesempurnaan hanyalah milik ALLAH S.W.T.
assalamualaikum wr.wb

Incoming Search Term:

Anda sedang membaca artikel tentang Trik Dan Trik Notepad dan anda bisa menemukan artikel Trik Dan Trik Notepad ini dengan url https://asa-25.blogspot.com/2014/01/trik-dan-trik-notepad.html.. Anda boleh menyebarluaskan atau mengcopy artikel Trik Dan Trik Notepad ini jika memang bermanfaat bagi anda atau teman-teman anda,namun jangan lupa untuk mencantumkan link sumbernya.