Re[2]: Запуск функции в фоне
От: КДА  
Дата: 10.12.02 12:12
Оценка:
Здравствуйте, Silent_Sky, Вы писали:

SS>Используй АПИ функцию CopyFile для копирования


SS>Declare Function CopyFile Lib "kernel32" Alias "CopyFileA" (ByVal lpExistingFileName As String, ByVal lpNewFileName As String, ByVal bFailIfExists As Long) As Long

SS>' Скопируем файл C:\Samples\temp.txt в C:\Russia\buffer.txt.
SS>' Не будем переписывать файл C:\Russia\buffer.txt если он существует.
SS>Dim retval As Long ' возвращаемое значение

SS>' копируем файл

SS>retval = CopyFile("C:\Samples\temp.txt", "C:\Russia\buffer.txt", 1)
SS>If retval = 0 Then ' если ошибка
SS> Debug.Print "Не могу скопировать файл -- C:\Russia\buffer.txt уже существует.
SS>Else ' если все нормально
SS> Debug.Print "Файл скопирован."
SS>End If


Я допустил неточность в постановке вопроса (за это прошу прощения). Суть в том, что функция предназначена не для простого копирования... Эту функцию предоставляет компонент (ActiveX DLL), и она не только копирует файл, но и размещает его в БД (в бинарном виде). Но это ну суть важно... Что конкретно делает эта функция я не знаю. Нужно, чтобы она (функция) не мешала окну жить в то время, как она выполняется.
ЗЫ. Все равно спасибо за внимание и ответ
 
Подождите ...
Wait...
Пока на собственное сообщение не было ответов, его можно удалить.