Archiv des Monats: Juni 2012

Sicherungs/Löschscripts

Nachdem ich bei mehreren Kunden nächtliche Komplettsicherungen mache, hier ein ein batch-Script zum erstellen der Sicherungen und ein VBScript, das dazu dient, diese Sicherungen nach n Tagen wieder automatisiert zu löschen.
Ich glaube mich zu erinnern, dass ich Teile des (oder das gesamte?) Script aus dem Netz habe…
Sollte der mögliche Urheber sein Werk hier (teilweise) wiedererkennen, dann möge er mir bitte Bescheid geben…

(Ich stelle das Script hier trotz mangelnder Urheberschaft ab, damit ich es unterwegs stets parat habe, und anstatt zu tippen copypasten kann… [was bei vielen meiner Artikel ein wichtiger Antrieb ist])

1.) sicherungerstellen.bat

md f:\!!!backup\%date%

xcopy C:\officeVHD\*.vhd f:\!!!BACKUP\%date%\*.* /Y /J /R

 

2.) sicherungloeschen.vbs

AlterinTagen = -8

Basisordner = "S:\Termin-Sicherung"

Heute = FormatDateTime(Date, 2)
OldDate = DateAdd("d", AlterinTagen, now()) 

Set objFS = CreateObject("Scripting.FilesystemObject")

If objFS.FolderExists(Basisordner) Then
    DoFolder objFS.GetFolder(Basisordner)

End If

'für "Erstellungsdatum" anstelle von "DateLastModified" "DateCreated" verwenden
Sub DoFolder(Folder)
For Each File In Folder.Files
    If File.DateLastModified < OldDate Then File.Delete
Next

For Each SubFolder In Folder.SubFolders
        If SubFolder.DateLastModified < OldDate Then
        WScript.Echo SubFolder.Delete
    Else
        DoFolder SubFolder
        If (SubFolder.SubFolders.Count + SubFolder.Files.Count) = 0 Then SubFolder.Delete 'leere Unterordner löschen
    End If
Next
End Sub

AD_Client_Controller in Version 1.3 erschienen

++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
ACHTUNG: AD_Client_Controller wird nicht mehr weiterentwickelt!
Das Nachfolgetool (mit entscheidend mehr Funktionen) ist ADMINOMAT 
Infos hier bzw. download unter  www.adminomat.at
++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++

Der AD_Client_Controller ist ab sofort in Version 1.3 erhältlich

Änderungen:

  • Wake On Lan funktioniert nun in Infrastrukturen MIT und OHNE VLANS (bzw. auch bei fehlender Broadcastadresse)
  • Beim Start wird geprüft, ob unter www.schulnetz.info Updates verfügbar sind (Daher könnte nun die Firewall „anschlagen“, wenn man die Software startet…)
  • ein Popup weisst darauf hin, den DHCP-Server einzutragen (falls man die Software auf einem DC ohne DHCP startet)
  • Div. kleine Änderungen (die ich jetzt nicht im Kopf habe 😉
  • Es gibt jetzt (leider) eine EULA, die bestätigt werden muss

Download:
AD_Client_Controller.exe [[downloadcounter(AD_Client_Controller.exe)] x heruntergeladen]

Nähere Erklärungen siehe hier: Artikel