Membuka Banyak Program dengan Satu Shortcut

Berikut cara menjalankan beberapa program windows (PC) dengan satu shortcut.


Terkadang kita dalam menjalankan suatu program di windows menginginkan kemudahan dalam menjalankan program seperti dengan satu klik shortcut, maka kita bisa membuka atau menjalankan beberapa program yang diinginkan secara bersamaan.


Setelah berbingung ria cari-cari di google soal cara menjalankan beberapa program dengan satu shortcut dan kga dapat-dapat juga caranya seperti yang saya inginkan, Maka terpaksa mencoba mengakali sendiri dengan menggunakan bantuan script vbs yang tentunya tidak memberatkan komputer karena kita tidak perlu menginstal software tambahan lagi diwindows.

Triknya cukup sederhana saja dimana yang kita jalankan adalah script vbs, kemudian script vbs tersebut yang akan menjalankan program"nya sesuai yang sudah kita atur pada script tersebut.


Agar teman-teman yang membutuhkan trik ini tidak bertambah bingung dengan maksud dari trik ini, maka kita mencoba memulai salasatu cara untuk menjalankan beberapa program secara bersamaan dalam satu shortcut.


Okey...


Pertama-tama kita ambil contoh umpamanya kita menginginkan dengan satu klik shortcut, maka program yang jalan atau terbuka adalah


  • Firefox
  • Pemutar MP3
  • (program masih bisa ditambah sesuai keinginan)


Selanjutnya setiap shortcut program tersebut ditempatkan dalam satu folder.


Seperti pada contoh ini, maka shortcut firefox dan pemutar MP3-nya ditempatkan dalam satu folder seperti pada contoh gambar dibawah ini.



Jumlah shortcut program yang disimpan pada folder tersebut tidak terbatas jumlahnya, tergantung seberapa banyak program yang nantinya akan kita buka secara bersamaan dalam satu shortcut.

(nama shortcut sebaiknya tidak menggunakan spasi)

Selanjutnya kita buatkan script vbs untuk mengeksekusi atau menjalankan shortcut" tersebut, dan salasatu scriptnya bisa kita gunakan seperti pada contoh dibawah ini.

dim bahar
On Error Resume Next
Set objWMIService = GetObject("winmgmts:" _
& "{impersonationLevel=impersonate}!\\" & strComputer & "\root\cimv2")
set bahar=wscript.CreateObject("wscript.shell")
bahar.run"NamaShortcut"
bahar.run"NamaShortcut"


Seperti pada contoh script diatas, tinggal kita rename saja pada NamaShortcut sesuai dengan nama shortcut programnya.

dan pada bahar.run"NamaShortcut", masih bisa kita tambahkan lagi dibawahnya sesuai dengan jumlah program yang akan kita jalankan secara bersamaan.

Jadi pada contoh ini, maka penulisan scriptnya seperti pada contoh dibawah ini.

dim bahar
On Error Resume Next
Set objWMIService = GetObject("winmgmts:" _
& "{impersonationLevel=impersonate}!\\" & strComputer & "\root\cimv2")
set bahar=wscript.CreateObject("wscript.shell")
bahar.run"firefox"
bahar.run"QCDPlayer"


Script bisa kita buat lewat notepad, kemudian setelah itu kita save dengan extensi vbs seperti pada contoh gambar dibawah ini.




Dan jangan lupa untuk Save as type dipilih All Files.

Setelah itu klik Save dan simpan pada folder dimana shortcut" programnya tadi disimpan.

Seperti pada contoh gambar dibawah ini setelah selesai scriptnya disimpan.


Selanjutnya kita tinggal bikin shortcut dari scrip vbsnya dan disimpan di dekstop dengan cara klik kanan pada file scripnya, kemudian klik Send to >> Desktop (create shortcut).

Selanjutnya untuk lebih mempercantik tampilannya, maka icon shortcutnya yang sudah tersimpan di desktop bisa juga kita ganti dengan icon sesuai dengan keinginan kita masing", dan cara mengganti icon program http://satriogame.blogspot.com.


No comments:

Post a Comment