VBNet - Форум - Как скопировать открытый файл?

Вопрос: Как скопировать открытый файл? Добавлено: 31.01.11 02:36

Автор вопроса: to-to | ICQ: 358430209

Необходимо скопировать документ Exel в то время когда он открыт.
Пишу так:

System.IO.File.Copy("C:\rasp.xls", "C:\12365\", True)

Выводит ошибку.
Ответить

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

Номер ответа: 1 Автор ответа: udn79 Вопросов: 2 Ответов: 95	Профиль \| \| #1	Добавлено: 31.01.11 02:40
	Имеете ввиду сохранить как? Ответить

Номер ответа: 2 Автор ответа: udn79 Вопросов: 2 Ответов: 95	Профиль \| \| #2	Добавлено: 31.01.11 02:46
	есть очень красовое решение, котомым будите потом пользоваться все время включите в офисе запись макроса, после необходимой работы, откройте встроенный редактор и посмотрите сходник Ответить

Номер ответа: 3 Автор ответа: AgentFire ICQ: 192496851 Вопросов: 75 Ответов: 3178	Профиль \| \| #3	Добавлено: 31.01.11 10:11
	> , "C:\12365\", если мне не изменяет память, то второй параметр так же должен включать в себя имя файла .. Ответить

Номер ответа: 4 Автор ответа: to-to ICQ: 358430209 Вопросов: 10 Ответов: 11	Профиль \| \| #4	Добавлено: 31.01.11 15:47
	Я тоже так думал, оказывается не надо, VB.NET2010 udn79 Я что то Вас не очень понял. Ну вот получил я код: ActiveWorkbook.SaveAs Filename:="C:\Users\to-to\Documents\11.xlsx", FileFormat:=xlOpenXMLWorkbook, CreateBackup:=False Как мне из внешней программы Экселю это сказать? Я придумал костыль, запускать Unlocker и обрубать экселю доступ к файлу, но хотелось бы как то по нормальному))) Ответить

Номер ответа: 5 Автор ответа: udn79 Вопросов: 2 Ответов: 95	Профиль \| \| #5	Добавлено: 31.01.11 18:39
	ResourceManager.GetObject - метод (System.Resources) GetObject - перегрузка Automating Excel from VB .NET GetObject("C:\Users\to-to\Documents\11.xlsx" Ответить

Номер ответа: 6 Автор ответа: udn79 Вопросов: 2 Ответов: 95	Профиль \| \| #6	Добавлено: 31.01.11 18:58
	Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click im oExcel As Object ' Start a new instance of Microsoft Excel. Shell("C:\Program Files\Microsoft Office\Office10\Excel.exe", AppWinStyle.MinimizedNoFocus) oExcel = GetObject(, "Excel.Application" oExcel.ActiveWorkbook.SaveAs ("c:\Book2.xls" oExcel = Nothing End Sub Ответить

Номер ответа: 7 Автор ответа: to-to ICQ: 358430209 Вопросов: 10 Ответов: 11	Профиль \| \| #7	Добавлено: 31.01.11 21:35
	Спасибо Ответить

Страница: 1 |