Имя пользователя:
Пароль:
 

Показать сообщение отдельно

Новый участник


Сообщения: 3
Благодарности: 0

Профиль | Отправить PM | Цитировать


Изображения
Тип файла: png 2016-05-26_18-58-42.png
(7.7 Kb, 21 просмотров)

Iska, спасибо за ответ и размещенный скрипт, то что требовалось он делает, но только жаль что есть ошибки(

1) Да все верно, именно этот скрипт.
Огромное вам спасибо еще раз за размещение.

2) Я изменил путь к серверу соответственно.

3) После запуска скрипта выскакивает окно. Я во вложении разместил скрин.
Попытался подшаманить и убрал строку

[q=Iska]strSourceFolder = WScript.CreateObject("WScript.Shell").SpecialFolders("MyDocuments")
strFullDestFolder = objFSO.BuildPath(strUserNameDestFolder, objFSO.GetFileName(strSourceFolder))
If Not objFSO.FolderExists(strFullDestFolder) Then
objFSO.CreateFolder strFullDestFolder
End If
With objFSO.GetFolder(strSourceFolder)
.Copy strFullDestFolder, True
End With »[/q
]

После удаления этой строки скрипт срабатывает, но не копирует и не удаляет файлы из документов пользователя.

Копирует рабочий стол нормально и очищает тоже без этой строчки, но только вместе с файлами у пользователей удаляются lnk и rdp файлы тоже.

4) "rdp" в строчку я пробовал добавить, но безрезультатно, все тоже самое.

5) Windows 10 думает очень долго, но перезагружается или выходит из системы. На рабочем столе все очищается.
Пофиксить проблему я так понимаю не получится(

P.S. Так же при работе скрипта без этой строчки, во время первого выхода все хорошо, но второй и последующие входы с новыми файлами на рабочем столе выскакивают ошибки непонятные, но все переносится и чистится.

Отправлено: 19:09, 26-05-2016 | #16