Visual Basic, .NET, ASP, VBScript
 

   
   
     

Форум - ASP и VBScript

Страница: 1 | 2 | 3 |

 

  Вопрос: Нужна помощь в написании скрипта VBS Добавлено: 21.03.11 00:47  

Автор вопроса:  Влерий

Ответить

  Ответы Всего ответов: 35  

Номер ответа: 16
Автор ответа:
 Влерий



Вопросов: 1
Ответов: 24
 Профиль | | #16 Добавлено: 22.03.11 01:02
Ну на счет пути я понял)))

Ответить

Номер ответа: 17
Автор ответа:
 Влерий



Вопросов: 1
Ответов: 24
 Профиль | | #17 Добавлено: 22.03.11 01:04
а в логе все пишет как надо и лог создает где надо а файлы не копирует

Ответить

Номер ответа: 18
Автор ответа:
 Влерий



Вопросов: 1
Ответов: 24
 Профиль | | #18 Добавлено: 22.03.11 01:06
все догнал надо было sDestPath =";D:\xxx\" & "\"

Ответить

Номер ответа: 19
Автор ответа:
 Just



Вопросов: 4
Ответов: 330
 Профиль | | #19 Добавлено: 22.03.11 01:06
не торопись ты так... ты свое имя даже поторопился написать )
дай себе хотяб пол часа посмотреть код
а для проверки переменных можно использовать msgbox
например:
  1. sDestPath = sDestPath & D:\Администротирование\Работы\ & "\"
  2. msgbox sDestPath

и смотри что ты программе даешь )
и кстати путь в ковычках пиши в программе

Ответить

Номер ответа: 20
Автор ответа:
 Влерий



Вопросов: 1
Ответов: 24
 Профиль | | #20 Добавлено: 22.03.11 01:07
А атрибуты этой папке как задать или точно так же как в предыдущем сообщении?

Ответить

Номер ответа: 21
Автор ответа:
 Влерий



Вопросов: 1
Ответов: 24
 Профиль | | #21 Добавлено: 22.03.11 01:08
xDDD
на счет имени ты прав)))

Ответить

Номер ответа: 22
Автор ответа:
 Just



Вопросов: 4
Ответов: 330
 Профиль | | #22 Добавлено: 22.03.11 01:08
  1. Set objFolder = objFSO.GetFolder(strSRC)
  2. objFolder.attributes=0

Ответить

Номер ответа: 23
Автор ответа:
 Just



Вопросов: 4
Ответов: 330
 Профиль | | #23 Добавлено: 22.03.11 01:09
strSRC - это путь к папке
"c:\папки\папка"

Ответить

Номер ответа: 24
Автор ответа:
 Just



Вопросов: 4
Ответов: 330
 Профиль | | #24 Добавлено: 22.03.11 01:11
http://zalil.ru/30714405
маленькая справка по vbs
там же можно и уточнить как атрибуты ставить

Ответить

Номер ответа: 25
Автор ответа:
 Влерий



Вопросов: 1
Ответов: 24
 Профиль | | #25 Добавлено: 22.03.11 01:13
Спасибо большое за помощь!!!

Ответить

Номер ответа: 26
Автор ответа:
 Just



Вопросов: 4
Ответов: 330
 Профиль | | #26 Добавлено: 22.03.11 01:16
ну как успехи там? )

и еще
с 7 по 11 строку рассказываю про опции... )

(true - да, false - нет, можно 1 или 0 ставить еще)

bLog = True - создавать лог-файл или нет
bCopy = True - копировать файлы
bDel = False - удалять файлы
bAskDel = True - спрашивать разрешение на удаление файлов если стоит удалять файлы
sExt = LCase("doc,docx,txt";) - ну и какие расширения искать

Ответить

Номер ответа: 27
Автор ответа:
 Влерий



Вопросов: 1
Ответов: 24
 Профиль | | #27 Добавлено: 22.03.11 01:19
Все чего хотел то получилось
Спасибо большое!

Ответить

Номер ответа: 28
Автор ответа:
 Just



Вопросов: 4
Ответов: 330
 Профиль | | #28 Добавлено: 22.03.11 01:22
Удачи! )

Ответить

Номер ответа: 29
Автор ответа:
 Влерий



Вопросов: 1
Ответов: 24
 Профиль | | #29 Добавлено: 22.03.11 13:30
Назрел еще один вопрос
А что изменить или добавить если надо будет найти файлы с определенными именами и расширениями
допустим на D:\xxx\yyy\123.txt и D:\xxx\321.txt

Ответить

Номер ответа: 30
Автор ответа:
 Влерий



Вопросов: 1
Ответов: 24
 Профиль | | #30 Добавлено: 22.03.11 13:36
И если
  1. Set WSHShell = WScript.CreateObject("WScript.Shell")
  2. sPath = WshShell.ExpandEnvironmentStrings("%appdata%")

то файлы копирует
а если
  1. Set WSHShell = WScript.CreateObject("WScript.Shell")
  2. sPath = WshShell.ExpandEnvironmentStrings("%appdata%\xxx\yyy")

то не копирует

Ответить

Страница: 1 | 2 | 3 |

Поиск по форуму



© Copyright 2002-2011 VBNet.RU | Пишите нам