mp3 Yada Farkli Uzantiya Sahip Dosyalari Topluca Silmek

Posted: 11 Mayıs 2011 in Script, Sistem

Asagidaki scriptin çalistigi bilgisayardaki MP3 uzantili dosyalar, otomatik olarak bulunur ve silinir.

strComputer = “.”
Set objWMIService = GetObject(“winmgmts:” _
& “{impersonationLevel=impersonate}!\\” & strComputer & “\root\cimv2″)
Set colFiles = objWMIService.ExecQuery _
(“Select * from CIM_DataFile where Extension = ‘mp3′”)
For Each objFile in colFiles
objFile.Delete
Next

Ayni anda birden fazla uzantiyi tarayip silmek istersek, scripti asagidaki gibi editleyebiliriz. (örnegin mp3 ve wma dosyalari..)

strComputer = “.”
Set objWMIService = GetObject(“winmgmts:” _
& “{impersonationLevel=impersonate}!\\” & strComputer & “\root\cimv2″)
Set colFiles = objWMIService.ExecQuery _
(“Select * from CIM_DataFile where Extension = ‘mp3′ OR Extension = ‘wma’”)
For Each objFile in colFiles
objFile.Delete
Next

Bu sekilde taranacak dosya uzanti sayisini arttirabiliriz ve GPO ile domain ortamina uygulayabiliriz

Bir Cevap Yazın

Aşağıya bilgilerinizi girin veya oturum açmak için bir simgeye tıklayın:

WordPress.com Logosu

WordPress.com hesabınızı kullanarak yorum yapıyorsunuz. Log Out / Değiştir )

Twitter resmi

Twitter hesabınızı kullanarak yorum yapıyorsunuz. Log Out / Değiştir )

Facebook fotoğrafı

Facebook hesabınızı kullanarak yorum yapıyorsunuz. Log Out / Değiştir )

Google+ fotoğrafı

Google+ hesabınızı kullanarak yorum yapıyorsunuz. Log Out / Değiştir )

Connecting to %s