Vbs script ile Windows kilitlendiğinde sesi kapatalım


Windows kilitlendiğinde ses kapansın
Windowsun bize birçok kolaylıklar sunmasına rağmen İnsan ihtiyaçlarının sınırsız oluşu sebebi ile (Maslow amca öyle demiş) herkesin ihtiyaçlarını karşılaması mümkün değildir,mesela Windowsun hangi sürümünü

kullanırsanız kullanın ekranı kilitlediğinizde arka planda çalan ses otomatik olarak kapanmaz,ee ne var bunda diyenler olacaktır ,oysaki böyle bir seçenek bizim gibi toplumlarda GEREKLİ dir , Şöyle bir senaryo düşünün yaşı 18 civarı olan bir ergen,o biçim filim seyrediyor,hoop odaya biri daldı bu durumda yapacakları sırası ile:

1. Hemen ekranı kilitlemesi gerekir , Klavyedeki Windows ve L tuşlarına birlikte basar

Windows kilitleme kısayolu

Ekran anında kilitlendi iyi de arkadan sesler gelmeye devam ediyor , Ergen arkadaş ele güne rezil oldu , İlginçtirki bir işletim sistemi bu konuda seçenek sunmamış evet herşey ayrıntılarda gizlidir.Türkiye Genç nüfuslu bir ülke olduğundan örneğimi böyle çarpıcı şekilde vermek durumunda kaldım , bu soruna çözüm olması açısından Burada bir başlık açmıştık gel gelelim bu başlığı uygulamak için

a) Nircmd isimli bir yazılımı gerekiyor
b) Zamanlanmış görev oluşturmak gerekiyor ...

kısacası biraz uğraştırıcı işte bu yazımızda çok daha kolayını küçük bir script ile uygulayacağız.

Vbs script ile Windows kilitlendiğinde sesi otomatik kesmek

Scrip dillerinin gücünü küçüksememek gerek , yüzlerce satırlık kodlarla yapılamayan işleri birkaç satırlık script ile yaptırmak keyiflidir,lafı fazla uzatmadan vbs script kodlarımızı paylaşalım

'www.sordum.net - Velociraptor (19.05.2019)
Set WshShell = CreateObject("WScript.Shell") 
WshShell.SendKeys(chr(&hAD))
WshShell.Run "%windir%\System32\rundll32.exe user32.dll,LockWorkStation"

Gelin bu kodlarla klavyemizdeki bir tuşa basıldığında hem ekranımız kilitlensin hemde ses otomatik kapansın

1. Üstteki kodu Not defterine yapıştırıp bir isim verelim ve uzantısı .vbs olacak şekilde kaydedelim

2. Bu şekli ile çalıştırırsak ses kesilip ekran kilitlenecektir lakin işlemi klavyedeki tek bir tuşa basıldığında gerçekleştirmek istiyor olalım bu sebeple scripti sağ tıklayıp Masaüstü kısayol oluştur diyelim

kilitleyip sessize al kısayolu

3. Masaüstünde oluşan kısayolu sağ tıklayalım ve özellikler diyelim açılan ekranda "Kısayol" sekmesine geçelim ve Kısayol tuşu yazan yere fare işaretçimizle dokunup klavyemizden bir tuş atayalım , ben F6 yı seçtim , anlam: klavyemdeki F6 tuşuna bastığımda bilgisayar sessize alınıp ekran kilitlenecek

Scripte kısayol atamak

Tüm işlem bukadar Artık Klavyemdeki F6 tuşuna bastığımda ses kesilip ekran kilitlenecektir , bu yöntemin tek dezavantajı bilgisayar açıldığında sessizde açılması , o sebeple kilitli ekrandan giriş yaptıktan sonra sesi açmanız gerekecektir, gerçi sizi kurtardığı durum düşünülürse okadarcık olacak çözüm olarak giriş yaptıktan sonra aşağıdaki iki satılık vbs scriptini de çalıştırılabilirsiniz

Set WshShell = CreateObject("WScript.Shell") 
WshShell.SendKeys(chr(&hAD))

Bu script tıklandığında ses kapalı ise açar açıksa kapatır , yazıda verilen her iki scriptin hazır hallerini aşağıdaki yerden indirebilirsiniz.

Desteklediği sistemler : Windows 10 , Windows 8.1 , Windows 8 , Windows 7


7 Yorum Var
  1. Avatar for volkan
  2. Avatar for Velociraptor
  3. Avatar for shampuan
  4. Avatar for Velociraptor
  5. Avatar for volkan
  6. Avatar for Velociraptor
  7. Avatar for Kaan Selçuk

Yorum Ekle

E-posta adresiniz yayınlanmayacak. Gerekli alanlar * ile işaretlenmişlerdir

Captcha