Кода -копия выглядит следующим образом:
Tempsource, Tempend должен использовать абсолютный путь
rootpath = request.servervariables ("appl_physical_path") 'Получите абсолютный путь текущей программы
FunctionCopyFiles (TempSource, Tempend)
Dimfso
Setfso = server.createObject ("scripting.filesystemobject")
Iffso.fileexists (Tempend) Then
Response.write "Файл резервного копирования цели <b>" & tempend & "</b> уже существует, пожалуйста, удалите его сначала!"
Setfso = ничего
Выходная функция
Эндиф
Iffso.fileexists (Tempsource) Then
Еще
Response.Write "Файл исходной базы данных для копирования <b>" & tempsource & "</b> не существует!"
Setfso = ничего
Выходная функция
Эндиф
Fso.copyfiletempsource, Tempend
Response.write "успешно скопировал файл <b>" & tempsource & "</b> to <b>" & tempend & "</b>"
Setfso = ничего
Конечная функция