Vbs script ile Windows kilitlendiğinde sesi kapatalım


Windows kilitlendiğinde ses kapansın

Windows 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 kısılmaz , ee ne var bunda diyenler olacaktır , oysaki böyle bir seçenek bizim gibi toplumlarda ŞART tır , Şöyle bir senaryo düşünün yaşınız 18 , o biçim filim seyrediyorsunuz , hoop odaya biri daldı bu durumda yapılacaklar :

1. Hemen ekranı kilitlemeniz gerekir , Klavyedeki Windows ve L tuşlarına birlikte basarsınız

Ekran anında kilitlendi iyi de arkadan sesler gelmeye devam ediyor , madara olduk ve Microsoft elaleme bizi rezil etti , YUH ki 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 duruma çö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ırla 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 (12.02.2016)
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 gelin biz klavyedeki tek bir tuşa basıldığında bunu gerçekleştirelim 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” tabına geçelim ve Kısayol tuşu yazan yere fare ucumuzla dokunup klavyemizden bir tuş atayalım , ben F6 yı seçtim , anlam: klavyemdeki F6 tuşuna bastığımda bilgisyar 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ı sesi kontrol edememek , o sebeple kilitli ekrandan giriş yaptıktan sonra ses kısık vaziyette kalacaktır , gerçi bizi kurtardığı durum düşünülürse okadarcık olacak çözüm olarak giriş yaptıktan sonra aşağıdaki iki satılık vbs scripti çalıştırılabilir

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

Download



Yorum Ekle

E-posta hesabınız yayımlanmayacak. Gerekli alanlar * ile işaretlenmişlerdir

CAPTCHA