 |
|
| vasyakym12 |
21-03-2011 21:45 1640472 |
удаление каталогов в зависимости от времени их модификации
Нужен скрипт с расширением .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
|
|
Время: 16:01.
© OSzone.net 2001-