Visual Basic script ile işlem yaptırırken eğer hep aynı dosya veya klasör kullanılıyorsa kod içerisinde bu yol belirtilmek suretiyle sonuca gidilir , mesela "C:\Windows\System32" klasör boyutumuzu sürekli

takip edeceksek bunun için bir diyalog kutusu oluşturmaya gerek yoktur , gel gelelim kullanıcıya istediği bir dosya veya klasörün boyutunu bulması işlevini vereceksek bu duruma bir diyalog penceresinin kullanılması gerekir , böylece kullanıcı scripte tıkladığında klasör veya dosyayı seçebileceği bir pencere açılıp buradan istediği klasör veya dosyayı seçebilir. buda mesela bir klasör içerisindeki bütün dosyalar üzerinde işlem yaparken oldukça pratiklik sağlayacaktır mesela bir klasör ve onun tüm alt klasörlerinde bulunan dosyaların sayısını almak istediğimizde veya toplu uzantı değiştirmek istediğimizde klasör seçim penceresini kullanabiliriz.

Vbs de Klasör seçim ekranı

Tıklandığında kullanıcıya aşağıdaki gibi bir diyalog penceresi açacaktır

Elbette "Klasöre gözat" penceresini istediğimiz dizinden başlatabiliriz , mesela işlem yapılacak klasör diyelimki "C:\Windows" dizinindeyse Kodlarda aşağıdaki satıra
Set objFolder = objShell.BrowseForFolder(0, "Please select the folder.", 1, "")
ilgili klasör yolu ilavesini yapabiliriz

Set objFolder = objShell.BrowseForFolder(0, "Please select the folder.", 1, "C:\Windows")
Bu değişiklikten sonra "Klasöre Gözat" diyalog penceresi direkt olarak "C:\Windows" klasöründen açılacaktır.

Basit olması açısından seçilen klasörün yolunu yazdırtalım "wscript.echo "Full Path: " & objFolder.Self.path " bize yolu verecektir

Vbs de Dosya seçim ekranı

Üstteki Klasör seçim ekranında dosyalar görünmemektedir , eğer seçilen dosya üzerinde işlem yaptırılacaksa kullanıcıya bir dosya seçim ekranı sunulması pratik olacaktır , dosya seçim ekranı için belirli yöntemler olsada ActiveXObject kullanarak bu işlem gerçekleştirilebilir scripte tıklandığında aşağıdaki gibi bir dosya seçim diyalog penceresi görüntülenecektir.

istenen bir dosya seçildiğinde ise "wscript.echo sFileSelected" kodları ile seçilen dosyanın yolu ekranda görüntülenecektir.

Üstteki klasör veya Dosya seçimim diyalog kutularını oluşturan kodları aşağıdaki download linkinden edinebilir ve kodlar üzerinde denemeler veya değişiklikler yapabilirsiniz

Download