Поиск  Пользователи  Правила 
Закрыть
Логин:
Пароль:
Забыли свой пароль?
Регистрация
Войти
 
Страницы: 1
RSS
FileCopy не спрашивает подтверждения замены файла?
 
FileCopy "D:\Д.xls", "D:\Ж.xls" не спрашивает подтверждения замены файла, даже когда на D диске есть другой файл Ж.xls?
1) как сделать чтобы спрашивало?
2) какая команда вырезает файл и вставляет в другое место?
 
Используй FileSystemObject:
Код
Sub f()

    Dim fso As Object

    Set fso = CreateObject("Scripting.FileSystemObject")
    
    fso.CopyFile "C:\1.txt", "C\2.txt", OverWriteFiles:=False

End Sub
There is no knowledge that is not power
 
1.
Код
If dir("C:\Ж.xls",16) <> "" then
   If MsgBox("Спрашиваю: заменить?", vbYesNo) = vbYes Then FileCopy "D:\Д.xls", "D:\Ж.xls"
End if


2.
Код
FileCopy "D:\Д.xls", "D:\Ж.xls"
Kill "D:\Д.xls"
Даже самый простой вопрос можно превратить в огромную проблему. Достаточно не уметь формулировать вопросы...
 
Johny, спасибо
Дмитрий, спасибо

про kill знал, думал может имеется ОДНА команда, которая бы скопировала и сразу удалила исходник (Copy+Kill), наверно нету такой...
 
Если еще интересно, то можно поиграть с API
 
Да, кстати на счет констант:
http://msdn.microsoft.com/en-us/library/bb759795(v=vs.85).aspx
Там множество вариантов копирования, можно выбрать нужное :-)
 
SVM - спасибо, но я не знаком ещё с API :-)
 
Так и я не особо.
Просто функции VBA это и есть замаскированные API.
Только в API их сотни - чувствуете разницу. А в интернете всегда можно найти, как их можно применять в VBA
 
SVM - спасибо, учту на будущее
 
Если что-то можно сделать без применения API - лучше сделать без него. Так хотя бы избежите проблем переноса кода на ПК с различными версиями OS. Хоть и можно сделать объявление функций API в зависимости от версии - это не лучший вариант когда можно API заменить двумя строками кода с применением встроенных методов.
Все в разумных пределах, конечно. Если для замены использования API придется написать строк 300 кода - то лучше, конечно, применить API.
Даже самый простой вопрос можно превратить в огромную проблему. Достаточно не уметь формулировать вопросы...
 
Цитата
The_Prist пишет:
...Если что-то можно сделать без применения API - лучше сделать без него...
...Все в разумных пределах, конечно...
ясно
Изменено: Б А Х Т И Ё Р - 27 Май 2013 18:04:45
Страницы: 1
Читают тему (гостей: 1)
Наверх