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

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

или просто надо раром заархивировать?
...
Рейтинг: 0 / 0
06.08.2009, 17:18
| Ответить | Цитировать | Написать  
Автоархивация данных
    #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
06.08.2009, 17:27
| Ответить | Цитировать | Написать  
Автоархивация данных
    #36131556
Nik_Koraman
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Nik_Koraman
Гость
надо чтобы создавался новый excel файл, шапка копировалась из уже существующего а данные вырезались. Т.к перемещение данных в новые файлы будет происходить неоднократно, примерно раз в три месяца, надо чтобы название файла также менялось автоматом
...
Рейтинг: 0 / 0
07.08.2009, 09:14
| Ответить | Цитировать | Написать  
Автоархивация данных
    #36131602
Фотография big-duke
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
big-duke
Участник
Nik_Koraman,

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

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

ДДММГГГ
...
Рейтинг: 0 / 0
07.08.2009, 10:07
| Ответить | Цитировать | Написать  
Автоархивация данных
    #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, 10:22
| Ответить | Цитировать | Написать  
Автоархивация данных
    #36131896
Фотография big-duke
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
big-duke
Участник
Игорь Горбонос,

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

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


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

GetTempName - это темповое имя, а чему его присваивать - папке или файлу - это совсем другое дело.
Хотя вы правы, для архивации это не подойдет.
...
Рейтинг: 0 / 0
07.08.2009, 19:33
| Ответить | Цитировать | Написать  
13 сообщений из 13, страница 1 из 1
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / Автоархивация данных
Найденые пользователи ...
Разблокировать пользователей ...
Читали тему (0):
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


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