PDA

Показать полную графическую версию : удаление каталогов в зависимости от времени их модификации


vasyakym12
21-03-2011, 21:45
Нужен скрипт с расширением .js который удаляет каталоги в зависимости от времени их модификации
Пример на vbs:
Set FSO=CreateObject("Scripting.FileSystemObject")
sDIR = "directory"
lDATE = "lowerdate"
uDATE = "upperdate"
lDATE = CDate(lDATE)
uDATE = CDate(uDATE)
Set objDIR = GetFolder(sDIR)
GoSubFolders objDIR

Sub MainSub (objDIR)
If objDIR <> "\System Volume Information" Then
For Each eFolder in objDIR.SubFolders
If lDATE = Null and uDATE = Null Then
If efolder.DateLastModified = 0 Then
DelFolder efolder
End If

Else IF lDATE <> Null and uDATE = Null Then
If efolder.DateLastModified < lDATE Then
DelFolder efolder
End IF

Else IF lDATE = Null and uDATE <> Null Then
If efolder.DateLastModified > UDATE Then
DelFolder efolder
End IF

Else IF lDATE = uDATE Then
If efolder.DateLastModified = lDATE Then
DelFolder efolder
End IF

Else IF efolder.DateLastModified > lDATE and efolder.DateLastModified < uDATE Then
DelFolder efolder
End IF
End If
Next
End If
End Sub




© OSzone.net 2001-2012