XTRenamer.vbs Program Kecil Pengubah Ekstensi File

XTRenamer.vbs
Program Kecil Pengubah Ekstensi File

XTRenamer.vbs merupakan program kecil untuk merubah format ekstensi file, singkatnya yaitu merename semua ekstensi file-file penting sekaligus dalam sebuah Drive dengan sekali click. Disini saya menggunakan bantuan script VBS untuk penerapannya.VBScript atau lengkapnya Visual Basic Scripting Edition adalah sebuah bahasa skrip yang diinterpretasikan saat dieksekusi yang dikembangkan oleh Microsoft Corporation pada tahun 1996.
VBScript merupakan sebuah bahasa skrip turunan dari bahasa pemrograman Visual Basic for Applications (VBA) yang digunakan di dalam Microsoft Office dan beberapa platform pengembangan buatan Microsoft lainnya. VBScript menghilangkan beberapa fungsi dari VBA,seperti halnya fungsi I/O berkas dan akses langsung terhadap sistem operasi. VBScript dapat dijalankan di atas Windows 9x/ME, Windows 2000, Windows XP, Windows Server 2003, Windows Vista, Windows Server 2008 serta beberapa platform UNIX.

Berikut Langkah-langkahnya:
 Start > Accessories > Notepad
 Atau pada Start > Run, Pada jendela Run ketikkan notepad.exe lalu Enter
 Setelah itu ketik atau Copy Scriptnya sebagi berikut :
Script Program :
Dim Drive, Root, fname
Drive = "D" '(drive yg akan diproses)
Set Root = CreateObject("Scripting.FileSystemObject"). _
GetDrive(Drive).RootFolder
Set fname = New RegExp
With fname
.Pattern = "\.doc$" ('ekstensi file yang akan direname)
.IgnoreCase = True
.Global = False
.Multiline = False
End With
Call Rename(Root, fname)
Sub Rename(Folder, RegExp)
Dim SubFolder, File
For Each File in Folder.Files
If RegExp.Test(File.Name) Then
File.Name = RegExp.Replace(File.Name, ".MSWord")
End If
Next
For Each SubFolder In Folder.SubFolders
Call Rename(SubFolder, RegExp)
Next
End Sub
 SaveAs di folder mana-saja dengan filename: XTRenamer.vbs , click pada kolom“Save as type” dan ganti “Text Document (*.txt)” menjadi “All Files” lalu clicktombol “Save”.
 Eksekusi file XTRenamer.vbs yang telah anda buat tadi untuk mengubah semua file yang ber-ekstensi *.doc menjadi *.MSWord di Drive D:\ *Jika terjadi error pada script tapi anda yakin nggak salah ketik, perhatikan dan pahami script anda terutama pada: HIGHLIGHT (Drive target, dan jenis ekstensinya cocok/ada nggak di komputer situ, atau cek file-file anda ada perubahan nggak? mudah.

Tunggu beberapa saat hingga proses perenamannya selesai. Lama proses ditentukan oleh kecepatan komputer dan banyaknya file. Biasanya pada komputer rumahan murahan nggak akan memakan waktu lebih dari 10 detik. Untuk lebih pastinya buka Task manager (ctrl+alt+del) > tab “Processes” Apabila dalam daftar “Image-Name” masih terdapat “wscript.exe” berarti prosesnya masih belum selesai. Setelah proses pe-renamannya selesai maka kita harus meng-assosiasikan ekstensi file baru tersebut agar bisa di buka di aplikasi yang dikehendaki, agar bisa dibuka dengan langkah sebagai berikut :
 Buka Windows Explorer > Tools > Folder Options > File Types.
 Click tombol “New” lalu pada kolom “File Type Extensions” ketik MS word atau Extensions lain yang sudah anda rubah tadi.
 Klik tombol “<
 Ganti gambar icon defaultnya agar tidak mudah tertipu dengan filevirus yang sering ber-icon menyerupai File Word. (Optional)
 Click OK dan selesai sudah……?

Selamat Mencoba…………….?

Analisa keruskan Monitor (Troubleshoting)

Analisa keruskan Monitor (Troubleshoting)

Pendahuluan

Monitor merupakan perangkat yang penting dalam computer,dibawah ini ada bebebrapa hal yang harus dianalisa jika computer kita mulai rusak.

Isi

1. Daftar Kerusakan Power Supply

Gejala Yang Diimbulkan Kerusakan Komponen
Indikator layar gelap Kabel power, fuse, dioda bridge, transistor output Regulator,
Dioda Zener, IC Oscilator
Gambar gelombang Elco Filter, Dioda Bridge
Gambar bergetar Condensator diseputarakan Oscilator

2. Daftar Kerusakan Horizontal

Gejala yang ditimbulkan Kerusakan komponen
Indikator hidup layar gelap IC Oscilator Horizontal, Transistor Driver Horizontal,
Transistor Output Horizotal, Playback
Gambar terlalu ke kiri atau ke kanan Trimpot H-Hold, Trimpot H-Line, IC Oscilator Horizontal
Gambar melebar bagia kiri dan kanan Transistor Pelebar Jalur, Yoke Defleksi.
Raser satu garis vertikal Condensator Non Polar.
Gambar garis-garis hold Card Adapter, IC Syncronisasi, Kabel data.
Gambar terlalu kontras Trimpot Sub-Brigtness, Trimpot Sub-Contras, Potensio Screen.
Gambar tidak fokus Potensio Fokus, SocketCRT.
Gambar redup/gelap Trimpot Sub-Brigtness, Trimpot Sub-Contras, Potensio Screen, CRT.
Gambar lengkung dipinggir kiri dan kanan Trimpot Pinchusion, Yoje Defleksi.
Ada blanking/garis-garis putih Potensio Screen, Flayback.

3. Datar Kerusakan Vertikal

Gejala yang ditimbulkan Kerusakan komponen
Raster satu garis horizontal C Vertical, Yoke Defleksi.
Gambar turun naik tidak berhenti Card Adapter, Kabel Data, IC Oscilator Vertical, rimpot V-Hold.
Gambar memendek ketengah IC Vertical, Trimpot V-Size.
Gambar terlalu keatas atau ke bawah Trimpot V-Hold, Trimpot V-Line.
Gambar melebar bagian atas atau bawah Trimpot V-Hold,Trimpot V-Line, Trimpot V- Size
Gambar memanjang bagian atas atau bawah Trimpot V-Hold, Trimpot V-Line, Trimjpot V-Size

4.Daftar Kerusakan RGB

Gejala yang ditimbulkan Kerusakan Komponen
Tidak ada warna Card Adafter, IC RGB
Gambar tidak keluar atau kurang jelas Card Adafer, IC RGB
Gambar tidak kelihatan tapi raster terang Card Adafter, IC RGB, Trimpot RGB
Warna gambar tidak lengkap/warna dasar Card Adafter, IC RGB, Trimpot RGB, Transistor RGB, CRT.

5. Daftar Kerusakan Yoke

Gejala yang ditimbulkan Kerusakan Komponen
Raster satu garis horizontal/vertikal Yoke Defleksi
Gambar travesium Yoke Defleksi
Gambar berbentuk lingkaran Posisi Yoke kurang maju kedepan.
Gambar miring ke kiri atau ke kanan Posisi Yoke Defleksi terlalu miring.
Indikator hidup l;ayar gelap Yoke Defleksi

6. Daftar Kerusakan CRT

Gejala yang ditimbulkan Kerusakan Komponen
Indikator hidup layar gelap CRT, lihat kerusakan horizontal.
Filamen tidak menyala CRT, telusuri pembagian tegangan filamen.
Gambar redup tidak kelihatan CRT, naikkan tegangan filamen.
Pada saat power diOFF kan ada cahaya dilayar seperti korek api CRT.
Ada blanking berwarna merah/hijau/biru CRT.
Ada bercak-bercak warna pada layar Hilangkan dengan magnet Degausing. Biografi Penulis

Nama Penulis. saya adalah putra riau,saya dilahirkan didumai pada tanggal 29 maret 1982,selama pendidikan saya di pekanbaru,kemudian saya pindah ke lampung untuk memasuki kuliah komputer,saya kuliah d3 dcc bandar lampung kemudian saya melanjutkan di darmajaya sambil menjadi asisten laboraturium dan membantu dosen dalam mengajar.saya ingin membagi ilmu dengan teman teman pembaca semua.semoga saling tukar ilmu akan bermanfaat buat kita.

Manipulasi Jalannya Aplikasi

Memanipulasi aplikasi, maksudnya apa? Seharusnya kita menjalankan aplikasi Word, malah yang jalan Excel. Begitu kita menjalankan excel, windows malah shutdown. Jangan kira ini spyware yang melakukannya, namun ternyata Windows-pun demikian! Kita dapat memanipulasi jalannya aplikasi dengan apapun yang kita suka!

Trik ini sangat efektif untuk skenario seperti dibawah:

• Dalam sebuah komputer pemakainya lebih dari satu, semisal di rumah, dan di warnet sedangkan Admin (Penguasa komputer tersebut) menginginkan para user/pengguna untuk tidak menjalankan suatu program.
• Dalam sebuah komputer yang pemakainya satu, namun dikhawatirkan ada orang jahil yang akan memakai kompi tersebut.
• Anda menginginkan kompi yang berbeda dengan kompi lainnya.
• Anda mengerti skrip VBS dan menguasainya.

Skrip VBS memang tidak terlalu kompleks, namun skrip VBS dapat berinteraksi dengan COM jika Anda mengetahuinya dan bermain lebih lanjut.

Perlu diketahui bahwa kita akan bermain dengan skrip dan registry. Anda harus membaca panduan dibawah dengan detail dan kesalahan tidak ditanggung karena tips dibawah Insya Allah tidak akan memberikan kerusakan kepada sistem.
Quote:
Untuk menjalankan registry editor, klik Start > Run, lalu ketikkan "regedit" lalu klik OK.
Apa Dan Bagaimana

Setiap kali menjalankan program, windows akan mengecek key:

HKLM\SOFTWARE\Microsoft\Windows NT\CurrentVersion\Image File Execution Options\

yang mana subkey-nya adalah nama dari file dan bukan Full Path nya.
Sub-key-nya akan disamakan dengan nama program. Apabila sama, didalam sub-key tersebut windows akan mencari string Debugger. Dan apabila string tersebut ada windows akan menjalankan file yang sesuai dengan string tersebut.

Sebagai contoh:

[IMG]http://img81.**********.us/img81/8195/reptaskmgr2ry2.gif[/IMG]

HKLM\SOFTWARE\Microsoft\Windows NT\CurrentVersion\Image File Execution Options\taskmgr.exe
isinya kosong, maka apabila kita menjalankan aplikasi bernama taskmgr.exe (Tidak peduli path nya dimana), maka aplikasi itu yang dijalankan.

[IMG]http://img95.**********.us/img95/9328/reptaskmgr3lp3.gif[/IMG]

Namun apabila:
HKLM\SOFTWARE\Microsoft\Windows NT\CurrentVersion\Image File Execution Options\taskmgr.exe
berisi string Debugger dengan nilai C:\Program Files\Microsoft Office\Office11\WinWord.exe maka apabila kita menjalankan Windows Task Manager (atau Ctrl + Alt + Del) maka yang jalan bukannya Windows Task Manager malah Microsoft Office Word!

Penerapan

Saya kira cukup mudah untuk melakukan hal itu seperti contoh yang diterangkan diatas. Namun disini saya akan memberikan tips - tips unik.

Saya sudah jelaskan diawal, bahwa sesuai registry, windows hanya mengecek berdasarkan nama file. Bagaimana kalau seandainya Saya membuat key dengan nama taskmgr.exe lalu Saya isi debugger nya kosong? Hasilnya: Windows tidak melakukan reaksi apapun kalau taskmgr.exe dijalankan.

Saya akan memberikan tips yang lebih unik lagi, dengan menggunakan VBS (Visual Basic Script).

Akan lebih baik untuk melakukan hal ini Anda mengetahui skrip VBS

Menakuti - takuti pengguna

Apabila ada pengguna yang mau jahil menjalankan program Taskmgr atau dengan menekan [Ctrl] + [Alt] + [Delete], maka pada taskmgr, debugger isi dengan:

wscript C:\skrip.vbs

[IMG]http://img208.**********.us/img208/9919/reptaskmgr4iv1.gif[/IMG]

Kemudian, jalankan notepad lalu ketikkan Code:
msgbo "ENTE MAU JAILIN KOMPI ANE!? AWAS ENTE YA! SEMUA PERBUATAN ENTE DAH DICATET AMA KOMPI INI! MAJIKAN KOMPI INI BAKAL MARAH NGELIAT APA YANG ENTE KERJAKAN!")


Perlu dicatat anda dapat mengubah pesannya dengan format:

Code:
msgbo"pesan")
Setelah sudah, simpan dengan nama "C:\skrip.vbs" dengan kutip.

Buat password untuk melakukan sesuatu

Apabila ada pengguna yang mau jahil menjalankan program Taskmgr atau dengan menekan [Ctrl] + [Alt] + [Delete], maka pada taskmgr, debugger isi dengan:

wscript C:\skrip.vbs

Kemudian, jalankan notepad lalu ketikkan

Code:
Dim s
s = InputBo"Masukkan kode untuk ngancurin komputer ini:")
If s = "asiik" Then 's Adalah Password
set wscr=CreateObject("WScript.Shell")
wscr.RegDelete("HKLM\SOFTWARE\Microsoft\Windows NT\CurrentVersion\Image File Execution Options\taskmgr.exe\debugger")
wscr.exec("taskmgr.exe") '<< Diganti dengan nama programnya
wscr.RegWrite "HKLM\SOFTWARE\Microsoft\Windows NT\CurrentVersion\Image File Execution Options\taskmgr.exe\debugger","wscript C:\skrip.vbs","REG_SZ"
Else
Msgbo"ENTE MAU MAEN - MAEN AME KOMPIE ANE?!?!?!? ANE ADUIN KE DUKUN BARU TAHU RASA!")
End IF
Lalu simpan dengan nama "C:\skrip.vbs" dengan kutip.

APABILA anda mau mem-password-kan regedit, maka buat key baru bernama regedit dan debugger diisi dengan "wscript C:\skrip.vbs" dan buat skrip diatas. Lalu ganti wscr.exec dengan: Code:
wscr.exec("regedit.exe")
Bila mau mengganti passwordnya maka ketikkan s = diikuti dengan passwordnya di dalam kutip, misalnya s = "The BEst"

PERINGATAN! PASSWORD-NYA CASE SENSITIVE!

Jangan beri hak program!

OK, Sekarang kita masih bermain dengan VBScript namun dengan lingkup berbeda. Sekarang kita pakai senjata pamungkas kita untuk mencegah orang - orang jahil melakukan sesuatu: Password kedua! Mengapa Saya sebut password kedua? Karena ada password pertama .

[IMG]http://img138.**********.us/img138/7836/reptaskmgr5mz8.gif[/IMG]

Setiap kali menjalankan windows, maka aplikasi yang pertama kali dijalankan NTOSKRNL disusul oleh WINLOGON dan berujung kepada EXPLORER. Kita buat key WINLOGON.EXE dan debuggernya "wscript C:\skrip.vbs"? Bisa! Hal itu sangatlah bisa! Tapi hal yang seperti ini terlalu ekstrim. Sekarang saya akan memberikan contoh pertama: Explorer. Setiap kali anda mau masuk windows akan ditanya password oleh program kecil ini dan kalau salah mengetikkan password, windows akan segera shutdown!

STEP-BY-STEP PROCEDURE

1. Jalankan Notepad
Sekarang kita ketikkan script-nya. Di Dalam Notepad ketikkan: Code:
Dim s
s = InputBo"Masukkan kode untuk ngancurin komputer ini:")
set wscr=CreateObject("WScript.Shell")
If s = "asiik" Then '<< Passwordnya
wscr.RegDelete("HKLM\SOFTWARE\Microsoft\Windows NT\CurrentVersion\Image File Execution Options\explorer.exe\debugger")
wscr.exec("explorer.exe")
wscr.RegWrite "HKLM\SOFTWARE\Microsoft\Windows NT\CurrentVersion\Image File Execution Options\explorer.exe\debugger","wscript C:\muncul.vbs","REG_SZ"
Else
Msgbo"ENTE MAU MAEN - MAEN AME KOMPIE ANE?!?!?!? ANE ADUIN KE DUKUN BARU TAHU RASA!")
wscr.exec("shutdown -s -f -t 00")
End IF
Simpan dengan nama "C:\muncul.vbs"

2. Buat key
Di dalam regedit, buatlah key HKLM\SOFTWARE\Microsoft\Windows NT\CurrentVersion\Image File Execution Options\explorer.exe

3. Buat string Debugger
Di dalam regedit dan di dalam key HKLM\SOFTWARE\Microsoft\Windows NT\CurrentVersion\Image File Execution Options\explorer.exe, buatlah string debugger dan isi dengan "wscript C:\muncul.vbs"

4. Selesai!
Mau bukti!? Restart Kompi ente dan ente tahu kasiatnye!

Ubah Program Yang Jalan

Kalau seandainya key-nya winword.exe lalu debugger-nya excel.exe bagaimana? Yang jalan adalah excel.exe dan bukan winword.exe! Benar Sekali. Kenapa kita tidak buat hal yang seperti itu saja? Mari kita coba,

STEP-BY-STEP PROCEDURE

1. Jalankan regedit
Jalankan Regedit lalu pergi ke HKLM\SOFTWARE\Microsoft\Windows NT\CurrentVersion\Image File Execution Options\
dan buat key baru bernama "winword.exe" tanpa kutip

2. Buat string
Di dalam key "winword.exe" tersebut buatlah string "Debugger" tanpa kutip dan isi dengan

"excel.exe" tanpa kutip
atau
"c:\Program Files\Microsoft Office\OFFICE11\EXCEL.EXE" dengan/tanpa kutip, Jika tanpa kutip tidak bekerja maka cobalah dengan kutip.

3. Lihat hasilnya!
Sekarang coba jalankan Word, yang nongol malah Excel.

Ubah Program Yang Jalan Dengan Script!

Bermain VBS LAgi. Ikuti cara yang diatas tapi debuggernya diganti dengan "wscript C:\jahil.vbs" lalu jalankan Notepad dan ketikkan:
Code:
set wscr=CreateObject("WScript.Shell")
Msgbo"A Ghost has attacked this computer. This computer may result an invalid execution. Contact your Ghostbusters for more information.")
dim i
for i=0 to 100
msgbox "Ayo bermain tekan enter 100x! Anda harus menekannya " & 100 - i & "x lagi"
next
msgbox "Gooooooooooooooooooood Byeeeeeeeeeeeeeeee!!!!!"
wscr.exec("c:\Program Files\Microsoft Office\OFFICE11\EXCEL.EXE")
Simpan dengan nama "C:\jahil.vbs" dengan kutip lalu lihat hasilnya dengan menjalankan Microsoft Office Word.



SEMUA CARA DIATAS BERLAKU UNTUK SEMUA APLIKASI DAN TIDAK TERBATAS PADA EXPLORER DAN TASKMGR! Untuk yang lainnya, coba ganti key-nya dengan nama aplikasi dan pada script-nya ganti di bagian wsrc.RegDelete dan wsrc.RegWrite.


Nah itulah dia bagaimana kita dapat memanipulasi jalannya aplikasi. Mudah memang, namun terkadang sulit. Anda dapat saja mencobanya. Trik ini sangat baik bila Anda mengerti VBS dan dapat berkerasi dengannya...