Гость
Войти | Профиль | Очистить
Целевая тема:
Создать новую тему:
Автор:
Действия ...
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / Автоархивация данных / 13 сообщений из 13, страница 1 из 1
06.08.2009, 11:59
    #36129522
Nik_Koraman
Nik_Koraman
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Автоархивация данных
Подскажите плиз как сделать чтобы по нажатию кнопки создавалсяновый файл и туда вырезались все данные (за исключением шапки) из этой таблицы. Заранее спасибо
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
06.08.2009, 12:17
    #36129595
big-duke
big-duke
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Автоархивация данных
Nik_Koraman,
И с чем проблема ?
С кнопкой , созданием или вырезанием ?
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
06.08.2009, 16:58
    #36130764
Nik_Koraman
Nik_Koraman
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Автоархивация данных
проблема в автосоздании файла, и вырезаниия данных. Название файла само сабой также должно меняться хотябы по номерам а в идеале по месяцам ну это уже мелочи
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
06.08.2009, 17:18
    #36130836
Kallandor
Kallandor
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Автоархивация данных
Nik_Koraman,

файл какой: текстовый, ворд, эксель?

или просто надо раром заархивировать?
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
06.08.2009, 17:27
    #36130862
Игорь Горбонос
Игорь Горбонос
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Автоархивация данных
> Автор: Kallandor
> или просто надо раром заархивировать?

Просто рар
Код: plaintext
RAR.Exe a -df -ep -ep1 -Y outbox\ 1  outbox\*.*
рар в дискетках
Код: plaintext
RAR.Exe a -df -ep -ep1 -v1440f -Y outbox\ 1  outbox\*.*




Posted via ActualForum NNTP Server 1.4
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
07.08.2009, 09:14
    #36131556
Nik_Koraman
Nik_Koraman
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Автоархивация данных
надо чтобы создавался новый excel файл, шапка копировалась из уже существующего а данные вырезались. Т.к перемещение данных в новые файлы будет происходить неоднократно, примерно раз в три месяца, надо чтобы название файла также менялось автоматом
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
07.08.2009, 09:44
    #36131602
big-duke
big-duke
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Автоархивация данных
Nik_Koraman,

ну так разбейте задачу :
Создание файла
Копирование шапки
Копирование данных
Переименование файла.

И попробуйте сделать что-нибудь сами.
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
07.08.2009, 09:54
    #36131620
Nik_Koraman
Nik_Koraman
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Автоархивация данных
копирование шапки, перемещение данных проблема решаема. Требуется только синтаксис создания нового файла с уникальными именами
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
07.08.2009, 10:07
    #36131647
big-duke
big-duke
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Автоархивация данных
Nik_Koraman,

ДДММГГГ
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
07.08.2009, 10:22
    #36131692
Игорь Горбонос
Игорь Горбонос
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Автоархивация данных
> Автор: Nik_Koraman
> копирование шапки, перемещение данных проблема решаема. Требуется только синтаксис создания нового файла с
> уникальными именами

Код: plaintext
1.
2.
3.
4.
5.
6.
Dim wb As Workbook, sName As String
sName = CStr(Date) & "_" & CStr(Time) & "_" & CStr(Rnd())
sName = Replace(sName, ".", "_")
sName = Replace(sName, ":", "_")
sName = Replace(sName, ",", "_")
Set wb = Application.Workbooks.Add
wb.SaveAs "c:\" & sName & ".xls"

З.Ы. Rnd() это если генерировать нужно очень часто :)


Posted via ActualForum NNTP Server 1.4
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
07.08.2009, 11:30
    #36131896
big-duke
big-duke
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Автоархивация данных
Игорь Горбонос,

или fso.GetTempName
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
07.08.2009, 11:37
    #36131921
Игорь Горбонос
Игорь Горбонос
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Автоархивация данных
> Автор: big-duke
> Игорь Горбонос,
>
> или fso.GetTempName

Можно и это использовать, но я думаю врядли, потому, что задача в сохранении каких-то данных, а значит под архивные
данные должно быть явно указаное место постоянного хранения, а не временные папки.


Posted via ActualForum NNTP Server 1.4
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
07.08.2009, 19:33
    #36133121
big-duke
big-duke
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Автоархивация данных
Игорь Горбонос,

GetTempName - это темповое имя, а чему его присваивать - папке или файлу - это совсем другое дело.
Хотя вы правы, для архивации это не подойдет.
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / Автоархивация данных / 13 сообщений из 13, страница 1 из 1
Найденые пользователи ...
Разблокировать пользователей ...
Читали тему (0):
Читали форум (0):
Пользователи онлайн (0):
Польз. соглашение  
Полит. конфиден.  
созд. / загр.: 307ms
Закрыть
start [/forum/topic.php?fid=60&tablet=1&tid=2160686]:
 0ms
get settings:
 8ms
get forum list:
 14ms
check forum access:
 3ms
check topic access:
 3ms
track hit:
 49ms
get topic data:
 9ms
get forum data:
 2ms
get page messages:
 34ms
get tp. blocked users:
 1ms
others: 184ms
total:  307ms
x
x
Закрыть


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