Visual Basic, .NET, ASP, VBScript
Новости | Примеры | Библиотека кодов | НеЧаВо | VBA | Справочник по VB | Справочник по WinAPI | ActiveX контролы | Статьи по VB | Мастерская разработчика | Форум VBNet | Яndex bar! | Голосование | Полезные программы | Магазин VBNet | Рассылка | Конкурсы | Юмор | Чат | Реклама на VBNet | Автора! | Ссылки | Бета-тестирование | Послать пример на сайт
 

   
   
     

Форум - ASP и VBScript

Страница: 1 |

 

  Вопрос: написание скрипта vbs который копирует файлы Добавлено: 16.06.10 15:41  

Автор вопроса:  meshutak
Здравствуйте,
Нужна помощь в написании скрипта vbs
скрипт который при запуске будет копировать файл который находится в:
c:\program files\temp\123.doc
в папку
C:\BACKUP\123.DOC
и при надобности будет его заменять или меня его имя на время копирования

Заранее благодарен

Ответить

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

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



Вопросов: 4
Ответов: 330
  Профиль | | #1 Добавлено: 17.06.10 09:39
  1.  
  2. On Error Resume Next
  3. Dim FSO
  4. Dim Source
  5. Dim Destination
  6.  
  7. Source = "c:\program files\temp\123.doc"
  8. Destination = "C:\BACKUP\123.DOC"
  9.  
  10. Set FSO = CreateObject("Scripting.FileSystemObject")
  11. If FSO.FileExists(Destination) = True Then
  12.   FSO.MoveFile Destination, FSO.GetParentFolderName(Destination) & "\" & FSO.GetBaseName(Destination) & "_backup_" & Hour(Now) & "-" & Minute(Now) & "_" & FSO.GetTempName()   ' & "." & FSO.GetExtensionName(Destination)
  13. End If
  14. FSO.CopyFile Source, Destination
  15.  
  16. ' MsgBox "Выход"
  17. Set FSO = Nothing
  18. Wscript.quit

Ответить

Страница: 1 |

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



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