Dizin içindeki Dizin Adını bulmak

Yazılım Genel

Son Cevaplar gön: Ahmet Şirin 13 yıl önce

3 Yazılar

2 Üyeler

0 Reactions

559 Görüntüleme

RSS

Ahmet Şirin

(@ahmetsirin)

Gönderiler: 77

Estimable Member

Konu başlatıcı

D:\Ahmet\123test

Örneğin D Sürücüsünün içerisindeki Ahmet dizinin içerisindeki dizinin adını(123test) öğrenmek (bir değişkene atamak) istiyorum.

Not: Dizinin içerisinde ismi sürekli değişen sadece bir tane içeriği boş dizin var. Yani belirttiğim dizininin içerisinde 1 tek dizinin adını öğrenmek istiyorum.

Bunu hangi kodlarla yapabiliriz?

Kodları Dos veya VbScrip te kullanacağım.

Gönderildi : 01/12/2011 15:51

Omer KARADENIZ

(@OmerKARADENIZ)

Gönderiler: 1560

Noble Member

Merhaba,

Aşağıdaki scripti denermisin?

On Error Resume Next

Set FSO = CreateObject("Scripting.FileSystemObject")
ShowSubFolders FSO.GetFolder("D:\Ahmet\")

Sub ShowSubFolders(Folder)
    For Each Subfolder in Folder.SubFolders
        If Subfolder.Size = 0 Then
            Wscript.Echo Subfolder.Path
        End If
        ShowSubFolders Subfolder
    Next

End Sub

Gönderildi : 02/12/2011 17:32