Top-Themen

AppleEntwicklungHardwareInternetLinuxMicrosoftMultimediaNetzwerkeOff TopicSicherheitSonstige SystemeVirtualisierungWeiterbildungZusammenarbeit

Aktuelle Themen

Administrator.de FeedbackApache ServerAppleAssemblerAudioAusbildungAuslandBackupBasicBatch & ShellBenchmarksBibliotheken & ToolkitsBlogsCloud-DiensteClusterCMSCPU, RAM, MainboardsCSSC und C++DatenbankenDatenschutzDebianDigitiales FernsehenDNSDrucker und ScannerDSL, VDSLE-BooksE-BusinessE-MailEntwicklungErkennung und -AbwehrExchange ServerFestplatten, SSD, RaidFirewallFlatratesGoogle AndroidGrafikGrafikkarten & MonitoreGroupwareHardwareHosting & HousingHTMLHumor (lol)Hyper-VIconsIDE & EditorenInformationsdiensteInstallationInstant MessagingInternetInternet DomäneniOSISDN & AnaloganschlüsseiTunesJavaJavaScriptKiXtartKVMLAN, WAN, WirelessLinuxLinux DesktopLinux NetzwerkLinux ToolsLinux UserverwaltungLizenzierungMac OS XMicrosoftMicrosoft OfficeMikroTik RouterOSMonitoringMultimediaMultimedia & ZubehörNetzwerkeNetzwerkgrundlagenNetzwerkmanagementNetzwerkprotokolleNotebook & ZubehörNovell NetwareOff TopicOpenOffice, LibreOfficeOutlook & MailPapierkorbPascal und DelphiPeripheriegerätePerlPHPPythonRechtliche FragenRedHat, CentOS, FedoraRouter & RoutingSambaSAN, NAS, DASSchriftartenSchulung & TrainingSEOServerServer-HardwareSicherheitSicherheits-ToolsSicherheitsgrundlagenSolarisSonstige SystemeSoziale NetzwerkeSpeicherkartenStudentenjobs & PraktikumSuche ProjektpartnerSuseSwitche und HubsTipps & TricksTK-Netze & GeräteUbuntuUMTS, EDGE & GPRSUtilitiesVB for ApplicationsVerschlüsselung & ZertifikateVideo & StreamingViren und TrojanerVirtualisierungVisual StudioVmwareVoice over IPWebbrowserWebentwicklungWeiterbildungWindows 7Windows 8Windows 10Windows InstallationWindows MobileWindows NetzwerkWindows ServerWindows SystemdateienWindows ToolsWindows UpdateWindows UserverwaltungWindows VistaWindows XPXenserverXMLZusammenarbeit

VBS script zum Löschen alter Backups

Frage Microsoft

Mitglied: oziriz

oziriz (Level 1) - Jetzt verbinden

05.12.2007, aktualisiert 06.12.2007, 3880 Aufrufe, 4 Kommentare

Hallo,

vielleicht kann mir ja hier jemand helfen.
Ich suche ein VB script welches Backups die älter als 3 Tage sind von der Platte eines W2k3 Server löscht.
Ich hab mich hier zwar schon Umgeschaut aber nicht wirklich was Verwendbares gefunden.
Mein Quelltext sieht folgendermassen aus:

Option Explicit
Dim intZahl '
Dim strExtension '
Dim intTage '
Dim objDatei '
Dim objFSO '
Dim objOrdner '
Dim strOrdner '

Set objFSO = CreateObject("Scripting.FileSystemObject")
strOrdner = "W:\BACKUP\DB"
strExtension = ""
intTage = 3

Set objOrdner = objFSO.GetFolder(strOrdner)
intZahl = 0
For Each objDatei In objOrdner.Files
If LCase(Right(objDatei.name, Len(strExtension))) = LCase(strExtension) _
And DateDiff("d", objDatei.DateLastModified, Now) > intTage Then
objDatei.Delete
intZahl = intZahl + 1
End If
Next

WScript.Echo intZahl & "Dateien gelöscht."



Ich bin dankbar für Korrekturen

lg
Oziriz
Mitglied: virtuelleruser
06.12.2007 um 07:40 Uhr
Guten Morgen Oziriz,
probiere es doch mal mit dem kleinen Tool "delage32". Es wird in einer Batch aufgerufen wo man die entsprechenden Parameter übergeben kann.

Gruß
virtuelleruser
Bitte warten ..
Mitglied: bastla
06.12.2007 um 10:39 Uhr
Hallo oziriz und willkommen im Forum!

Wo liegt eigentlich das Problem? Bei mir läuft das Script in der oben dargestellten Form problemlos durch und macht auch, was es soll ...

Grüße
bastla
Bitte warten ..
Mitglied: oziriz
06.12.2007 um 22:44 Uhr
Hallo Bastla,

Ja das war meine frage da ich nicht wirklich eine gelegenheit zum testen habe
und es mir nicht möglich ist delage32 auf dem server abzulegen.

Danke für die rasche Antwort

grüsse

oziriz
Bitte warten ..
Mitglied: bastla
06.12.2007 um 22:53 Uhr
Hallo oziriz!

Testen kannst Du ja eigentlich mit jedem beliebigen Ordner, und das auch ganz ohne Risiko - wenn Du die Zeile
01.
objDatei.Delete
einfach durch
01.
WScript.Echo "Gelöscht: " & objDatei.Name
ersetzt und das Script von der Commandline mit zB
01.
cscript //nologo C:\Scripts\WegMitDenAlten.vbs
startest, erhältst Du eine Liste der zu löschenden Dateien - auf Wunsch auch in einer Datei:
01.
cscript //nologo C:\Scripts\WegMitDenAlten.vbs > D:\DieWerdenNichtMehrDaSein.txt
Grüße
bastla
Bitte warten ..
Ähnliche Inhalte
Batch & Shell
gelöst Hilfe Bei einem vbs Script (19)

Frage von Hattori-Hanzo zum Thema Batch & Shell ...

Batch & Shell
gelöst Batchdatei für Aufgabenplanung zum Löschen von Backups (2)

Frage von Winuser zum Thema Batch & Shell ...

VB for Applications
VBS Script zum versenden mehrerer Verknüpfungen zu Dateien per Lotus Notes

Frage von Sentinel87 zum Thema VB for Applications ...

Batch & Shell
gelöst VBS Script in eine Textdatei ausgeben (VBS mit Batch zusammenführen) (5)

Frage von Luuke257 zum Thema Batch & Shell ...

Neue Wissensbeiträge
RedHat, CentOS, Fedora

Fedora, RedHat, Centos: DNS-Search Domain setzen

(13)

Tipp von Frank zum Thema RedHat, CentOS, Fedora ...

Drucker und Scanner

Samsung SL-M4025ND, firmware update und (kompatible) Tonerkassetten

(1)

Erfahrungsbericht von markus-1969 zum Thema Drucker und Scanner ...

Heiß diskutierte Inhalte
Batch & Shell
Skripterstellung Lehrling (22)

Frage von 133119 zum Thema Batch & Shell ...

Exchange Server
Microsoft Exchange Weiterleitung mit anderer primären E-Mail Adresse (14)

Frage von Rene12345 zum Thema Exchange Server ...

Windows Userverwaltung
gelöst Wie verfahrt Ihr mit den Windows-Benutzerkonten und -dateien von ausgeschiedenen Mitarbeitern? (14)

Frage von Bl0ckS1z3 zum Thema Windows Userverwaltung ...

LAN, WAN, Wireless
Devolo DLAN 500 pro Wireless+ (13)

Frage von IceAge zum Thema LAN, WAN, Wireless ...