Гость
Войти | Профиль | Очистить
Действия ...
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / Можно ли скопировать открытый файл, используя FSO? / 9 сообщений из 9, страница 1 из 1
08.04.2012, 19:39
    #37744182
кладовщик
кладовщик
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Можно ли скопировать открытый файл, используя FSO?
Решил периодически копировать нужные файлы на флэшку. Использую FileSystemObject, в Экселе сделал 2 столбца: Source и Destination. Циклом по строкам идет копирование:
Код: vbnet
1.
2.
3.
4.
For i = 1 To row_count
'    On Error Resume Next
    Set fso = CreateObject("Scripting.FileSystemObject")
    fso.CopyFile Cells(i, 1), Cells(i, 2)


При открытом файле adp файл mdf скопировать не получается. Run-time error '70', Permission Denied. Можно как-то побороть эту неприятность?
-----
Не люблю Progress OpenEdge.
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
08.04.2012, 22:01
    #37744323
Antonariy
Antonariy
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Можно ли скопировать открытый файл, используя FSO?
Здравый смысл это неприятность?
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
09.04.2012, 19:43
    #37745763
zchvv
zchvv
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Можно ли скопировать открытый файл, используя FSO?
set fso зачем засунул в цикл?
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
29.08.2012, 16:10
    #37935697
кладовщик
кладовщик
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Можно ли скопировать открытый файл, используя FSO?
На Win7 файлы mdf и ldf копируются вручную только с админскими правами. Кто знает, что-то можно в скрипте ниже изменить, чтобы эти файлы скриптом копировались? Сейчас из папки они не копируются этим скриптом.

Код: vbnet
1.
2.
3.
4.
5.
6.
7.
8.
Set fso = CreateObject("Scripting.FileSystemObject")
Set fld = fso.GetFolder(folderspec)
Set fc = fld.Files

'On Error Resume Next
For each f1 in fc
	f1.Copy FolderName2Copy & f1.name
Next
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
29.08.2012, 16:48
    #37935793
VSVLAD
VSVLAD
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Можно ли скопировать открытый файл, используя FSO?
кладовщик,

Попробуй через API. Например Mozilla ThunderBird лочила файлы некоторые свои, надо было её скопипастить. Через CopyFile работало
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
29.08.2012, 17:10
    #37935867
Казанский
Казанский
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Можно ли скопировать открытый файл, используя FSO?
Или командой CMD типа
Код: vbnet
1.
Shell "cmd /c copy /y " & Cells(i, 1) & " " & Cells(i, 2)

И вообще можно в батник это все записать, зачем Excel?
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
29.08.2012, 17:44
    #37935969
Akina
Akina
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Можно ли скопировать открытый файл, используя FSO?
кладовщикПри открытом файле adp файл mdf скопировать не получается. Run-time error '70', Permission Denied. Можно как-то побороть эту неприятность?То есть копия, в которой голова - от одного состояния БД, а задница - от совсем другого, тебя вполне устраивает?
И что ты не сможешь подключить к серверу эту копию, поскольку он заявит о разрушении файла БД и предложит сперва выполнить ремонт (с потерей части данных) - тебя тоже устраивает?
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
29.08.2012, 17:58
    #37936014
кладовщик
кладовщик
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Можно ли скопировать открытый файл, используя FSO?
AkinaкладовщикПри открытом файле adp файл mdf скопировать не получается. Run-time error '70', Permission Denied. Можно как-то побороть эту неприятность?То есть копия, в которой голова - от одного состояния БД, а задница - от совсем другого, тебя вполне устраивает?
И что ты не сможешь подключить к серверу эту копию, поскольку он заявит о разрушении файла БД и предложит сперва выполнить ремонт (с потерей части данных) - тебя тоже устраивает?
Нет, не устраивает. В моем посте
кладовщикНа Win7 файлы mdf и ldf копируются вручную только с админскими правами. Кто знает, что-то можно в скрипте ниже изменить, чтобы эти файлы скриптом копировались? Сейчас из папки они не копируются этим скриптом.
речь про файлы закрытой базы.
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
29.08.2012, 18:10
    #37936035
Akina
Akina
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Можно ли скопировать открытый файл, используя FSO?
Ну так дай пользователю права-то необходимые...
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / Можно ли скопировать открытый файл, используя FSO? / 9 сообщений из 9, страница 1 из 1
Целевая тема:
Создать новую тему:
Автор:
Найденые пользователи ...
Разблокировать пользователей ...
Читали тему (0):
Читали форум (0):
Пользователи онлайн (0):
Польз. соглашение
созд. / загр.: 615ms
Закрыть
start [/forum/topic.php?fid=60&mobile=1&tid=2157477]:
 0ms
get settings:
 12ms
get forum list:
 16ms
check forum access:
 5ms
check topic access:
 5ms
track hit:
 225ms
get topic data:
 14ms
get forum data:
 3ms
get page messages:
 52ms
get tp. blocked users:
 2ms
others: 281ms
total:  615ms
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]