Visual Basic Script (VBScript) dilinde klavye tuş kombinasyonlarını uygulatmak mümkündür böylece mesela sanki bir klavye kısayoluna basılmış gibi o eylem gerçekleştirilebilir bu da bize klavye tuşlarına
gerçekte basmadan aynı işlemi yapma kolaylığı sağlar elbette Microsoft güvenlik amacıyla Ctrl + Alt +Del kullanımını kısıtlamıştır ve normalde tepki vermez , Klavye tuşlarını simule etmek için kullanılan yöntem SendKeys yöntemidir
Vbs de SendKeys metodu ile klavye tuş komutlarını uygulatın
Öncelikle kullanıma sunulmuş olan Klavye tuş kombinasyonlarını ve bunların vbs deki karşılıklarını bir liste halinde görelim.
Peki belirli karakter kombinasyonlarını kullanmak istersek mesela , Crlt , Alt ... gibi ? işte tablomuz.
Vbs de bunların kullanım örneklerini verecek olursak , mesela Windowsta görev yöneticisini açmak için Klavyedeki Ctrl + Shift + Esc tuşlarına birlikte basmamız gerekir yukarıdaki tabloda bunların komut karşılıklarını bulup kod içinde kullanırsak aşağıdaki gibi bir script elde etmiş oluruz.
set shell = CreateObject("Wscript.Shell") shell.SendKeys "^+{ESC}"
Görüldüğü gibi Ctrl + Shift + Esc = ^+{ESC} şeklinde komutta kullanıldı , üstteki scripti not defterine yapıştırıp bir isim verip uzantısı da vbs olacak şekilde kaydedip çalıştırırsak Görev yöneticisini açacaktır. Bilmem dikkatinizi çektimi ama Tabloda Windows tuşu yok , bunu açtırmak için şöyle bir kombinasyondan faydalanacağız eğer klavyedeki Ctrl + Esc (Crtl ve ESC) tuşlarına aynı anda basarsak Windows tuşuna basmış olacağımızdan tablodan bunların değerlerini kombine edersek aşağıdaki gibi bir script oluşacaktır
Set WshShell = WScript.CreateObject("WScript.Shell") WshShell.SendKeys "^{ESC}"
Uygulandığında Windows tuşuna basılmış etkisi yapar ve başlatı çalıştırır , son bir örnek yapıp gerisini sizlein hayal gücüne bırakalım , bu örneğimizde Not defterini açalım , selam millet ve altında da Sordum.net yazıp farklı kaydet penceresini açtırtalım.
Set WshShell = WScript.CreateObject("WScript.Shell") WshShell.Run "notepad.exe", 9 WScript.Sleep 1500 WshShell.SendKeys "Selam Millet!" WshShell.SendKeys "{ENTER}" WshShell.SendKeys "Sordum.net" WshShell.SendKeys "^s"
Sizde çok kullandığınız tuş kombinasyonlarını script haline getirip ister açılışta ister kapanışta çalışacak şekilde ayarlayabilirsiniz , belirli işlemlerin otomatikleştirilmesinde faydalı olacağına inanıyoruz. windows klavye kısayolları için bakınız , Aşağıdaki linkten üstteki örnekleri ve birkaç ekstra kullanım örneğini de içeren scriptleri indirebilirsiniz.
26 Şubat 2016 Tarihli başlık güncellendi
Umarım işinize yarar, Selamlar.
Teşekkürler oldukça pratikleştirecek.
Kodları görmediğimden birşey demem zor , lakin yerinde olsam kısayol yerine aşağıdaki kodları kullanırdım.
Web Link ...
Hocam alt f4 ile pc kapatma komutu yapıyorum alt f4 çalışıyor ama enter a basmıyor neden acaba
Vbs de Windows Tuşu desteklenmez. Autoit yada AutoHotkey gibi birşey deneyin
Send("{#Left}")
3 lü kod nasıl oluyor mesela ben win+e yapmak istiyorum
Set WshShell = WScript.CreateObject("WScript.Shell")
WshShell.SendKeys "^{ESC},{E}"
ben yapamadım dorusu nasıl yardımcı olurmusun
Faydalı olmasına sevindim , selamlar