Sorun: C dizininde a isimli bir klasörüm var bu klasörün içinde de bircok alt klasör var (degisik isimlerde) , ve bu alt klasörlerin içinde bircok dosya var
Cözüm: aşağıdaki kodlar ile C nin içindeki a klasöründe yeralan tüm .txt uzantılı dosyalari ve onun alt klasörü olan New Folder in icerigindeki .txt uzantılı dosyalari D:\Archive klasörüne kopyaladim , sen şimdi her bir alt klasör için bir satir ilave ederek bir tikla klasör ve tüm alt klasörlerin icerigini istedigin bir klasörün içine atabilirisin
Const OverwriteExisting = True Set objFSO = CreateObject("Scripting.FileSystemObject") objFSO.CopyFile "C:\a\*.txt" , "D:\Archive\" , OverwriteExisting objFSO.CopyFile "C:\a\New Folder\*.txt" , "D:\Archive\" , OverwriteExisting
bu kodları bir notepad e yapıştırıp ve Dosya - Farklı Kaydet... seçeneğine tıklayın
Açılan pencerede herhangi bir isim verin (dosya ismini istediğiniz şekilde düzenleyin ) ve uzantısı .bat/.vbs... olarak kaydedip çalıştırın
velociraptor