Пост.. для того что б акк не блоканули.....вооотЪ

В колонках играет - 3 doors down - "away from the sun"
Настроение сейчас - эээээ нормальное

' -=Scripted by Cevas =-
strComputer = "."
Const OverwriteExisting = True
Source="D:\Scripts1\"
Destination="D:\Scripts2\"
Set objWMIService = GetObject("winmgmts:" & "{impersonationLevel=impersonate}!\\" & strComputer & "\root\cimv2")
Set colFilesSource = objWMIService. ExecQuery("Select * from CIM_DataFile where Path ='\\Scripts1\'")
Set objFSO = CreateObject("Scripting.FileSystemObject")
For Each objFile in colFilesSource
If objFSO.FileExists(Destination+objFile.FileName+"."+objFile.Extension)=False Then
objFSO.CopyFile objFile.Name , Destination, OverwriteExisting
Else
Set objFileCompar = objFSO.GetFile(Destination+objFile.FileName+"."+objFile.Extension)
Set objFileComparInitial = objFSO.GetFile(Source+objFile.FileName+"."+objFile.Extension)
If objFileComparInitial.DateLastModified > objFileCompar.DateLastModified Then
objFSO.CopyFile objFile.Name , Destination, OverwriteExisting
End if
End If
Next



'Описание:
'этот скрипт копирует файлы из папки Scripts1 в папку Scripts2. Причем если есть несколько папок Scripts1
'(например C:\Scripts1 и D:\Scripts1), то файлы будут копироваться из каждой папки!
'фалы копируются в папку Scripts2 когда
'1- их нет в папке Scripts2
'2- когда файл из папки Scripts1 был изменен позже (получается он новее :) ) файла из Scripts2
'иначе ничего не происходит (типа все фалы из Scripts2 свежее тех что в Scripts1 :) )
'
'Обратить внимание на 6-ю строк,у а конкретней на Path ='\\Scripts1\'
'к сожилению так я и не победил нехороший "глюк" и как видно тут нужно ЯВНО указывать папку Scripts1
'пример другого варианта: \\Scripts1\\SubFolder1\\Subfolder2\\
'диск НЕ нужно указывать (иначе выдаст ошибку :( )
'\\D:\\Scripts1\\SubFolder1\\Subfolder2\\ = ERROR
'
'Скрипт (VBS)в шедулер и го го го! %)

А лучше узнать что такое DFS и юзать не парясь

у юзера есть папка, созданная, к примеру, 10.10.2005 в 14-56. и гоняецца она между серваком и клиентом,
мониторясь нащёт каких=то изменений... т.е. если юзер шо-то менял, то дата поменяецца и новые файлы синхронизируюцца
с сервером... и тыды... кароче, лихко всё...
нужно скриптом залить на сервак в соотвецтвующую папку (например \\сервак\шара\папка васи) другую папку... но у этой
папки дата старее, чем у такой же папки у юзера, т.е. он с сервака новые данные не понянет...
нужно:
1. в винде или хз где поменять в свойствах папки её дату с 10.10.2005 14-56 на 10.10.2005 18-47 (а у юзера дата,
например, 10.10.2005 15-38, т.е. папка с сервака обновицца)
2. скриптом скопировать из \\петя\супир-папка в системную скрытую папку
\\сервак\шара\вася, \\сервак\шара\серёжа, \\сервак\шара\коля и тыды
подкормочка по второй задаче - это всё же должен быть скрипт..=)
я делаю какие-то файлы новые, но я делаю их в 15-00 и мне нада, шоп ани были у юзера, но юзер работает до 20-00 и у него дата создания файлов - 20-00... т.е. мне надо поменять дату своих файлов на 23-45 и залить на сервак, шоп при следущей загрузке сравнилась дата и юзер стянул новые данные с сервака...