Bu forum konusunda, Windows 10 ve Windows 11 işletim sistemlerinde 7 günden eski Windows günlüklerini silen bir VBS (Visual Basic Script) betiği nasıl oluşturacağınızı adım adım anlatacağım. Bu betik, sisteminizdeki gereksiz günlükleri temizlemek için oldukça faydalı olabilir.
Gerekli Olanlar:
Windows işletim sistemi (10 veya 11)
Notepad veya başka bir metin düzenleyici
Yönetici izinleri
Adım 1: Betik Kodu
Aşağıdaki kodu bir metin düzenleyiciye (örneğin Notepad) kopyalayın:
Kod: Tümünü seç
Option Explicit
Dim objWMIService, colLogs, objLog
Dim strComputer, dateLimit
strComputer = "." ' Yerel bilgisayar
dateLimit = DateAdd("d", -7, Now) ' 7 günden eski tarih
' WMI hizmetine bağlan
Set objWMIService = GetObject("winmgmts:\\" & strComputer & "\root\cimv2")
' Tüm günlükleri al
Set colLogs = objWMIService.ExecQuery("Select * from Win32_NTLogEvent")
For Each objLog in colLogs
If objLog.TimeGenerated < FormatDateTime(dateLimit, vbShortDate) Then
' Günlüğü sil
objLog.Delete_
End If
Next
WScript.Echo "7 günden eski tüm günlükler silindi."
Metin düzenleyicisinde yukarıdaki kodu yapıştırdıktan sonra, dosyayı DeleteAllOldLogs.vbs adıyla kaydedin.
Dosya uzantısının .vbs olduğundan emin olun. (Dosya Türü : Tüm Dosyalar)
Adım 3: Betiği Çalıştırma
Komut İstemi'ni Yönetici Olarak Açın:
Başlat menüsüne sağ tıklayın ve "Windows Terminal (Yönetici)" veya "Komut İstemi (Yönetici)" seçeneğini seçin.
Betiğin Bulunduğu Dizin:
Betiği kaydettiğiniz dizine gitmek için aşağıdaki komutu kullanın (örneğin, masaüstüne kaydettiyseniz):
Kod: Tümünü seç
cd /d "C:\Users\Administrator\Masaüstü"Aşağıdaki komutu yazarak betiği çalıştırın:
Kod: Tümünü seç
cscript DeleteAllOldLogs.vbsBetik çalıştığında, "7 günden eski tüm günlükler silindi." mesajını göreceksiniz. Bu, betiğin başarılı bir şekilde çalıştığını gösterir.
Dikkat Edilmesi Gerekenler:
Bu betik, tüm günlükleri kontrol eder ve 7 günden eski olanları siler. Bu nedenle, önemli günlük verilerinizin yedeğini almayı unutmayın.
Betiği çalıştırmadan önce yönetici izinlerine sahip olduğunuzdan emin olun.
ÖRNEK EKRAN GÖRÜNTÜSÜ :
NOT:
Eğer forum'un dosya eki özelliği çalışaydı, dosya eki olarak foruma eklerdim söz konusu .vbs betiğini....
