ReSQL.ru
     
powered by simpleCommunicator - 2.0.51     © 2025 Programmizd 02
Мобильная версия    Контакт    Правила    FAQ    Помощь
Доб. в избранное | Игнор. тему | Прикреп. тему | Пометить прочит. / непрочит. | Фильтр
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / Разархивирование вложенного файла с изменением имени
10 сообщений из 10, страница 1 из 1
Разархивирование вложенного файла с изменением имени
    #39128271
Dmitry_Zap
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Dmitry_Zap
Гость
Добрый день!

Подскажите, сохраняю архив в указанную папку с изменением имени, но вложенный файл всегда с новым именем, как мне разархивировать вложенный файл с постоянным названием:


Код: vbnet
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
13.
14.
15.
16.
Public Sub LavtosaveAttachtoDisk(itm As Outlook.MailItem)
Dim objAtt As Outlook.Attachment
Dim saveFolder As String
WinRarApp$ = "C:\Program Files\WinRAR\WinRAR.exe e -o+"
iPath = "C:\inetpub\wwwroot\"
iArhivName$ = "Lavto.rar"
dateOfMailItem = Format(itm.CreationTime, "yyyy.mm.dd.hhnnss")
saveFolder = "C:\inetpub\wwwroot"
For Each objAtt In itm.Attachments
objAtt.SaveAsFile saveFolder & "\" & "Price.rar"
adr$ = WinRarApp$ & " """ & iPath & iArhivName$ & """ """ & iPath & """ "
RetVal = Shell(adr$, vbHide)  'vbNormalFocus)
Set objAtt = Nothing
Next

End Sub



Модератор: Учимся использовать тэги оформления кода - FAQ


Спасибо
...
Рейтинг: 0 / 0
15.12.2015, 11:52
| Ответить | Цитировать | Написать  
Разархивирование вложенного файла с изменением имени
    #39128322
Фотография Akina
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Akina
Участник
Переименовывать - либо после распаковки, либо до архивирования.
Ещё вариант - распаковывать в поток, который перенаправить в файл с нужным именем. Но не советую...
...
Рейтинг: 0 / 0
15.12.2015, 12:20
| Ответить | Цитировать | Написать  
Разархивирование вложенного файла с изменением имени
    #39128363
Dmitry_Zap
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Dmitry_Zap
Гость
До архивирования не возможно заархивировать с нужным именем, т.к. на почту приходит Прайс с именем где указана дата, мне нужно распаковать архив и задать постоянное имя вложенному файлу, для того, чтобы программа импортировала его. В случае если имя каждый раз разное, я не могу настроить программу на импорт вложенного файла
...
Рейтинг: 0 / 0
15.12.2015, 12:42
| Ответить | Цитировать | Написать  
Разархивирование вложенного файла с изменением имени
    #39128452
Фотография Akina
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Akina
Участник
Dmitry_Zapесли имя каждый раз разное, я не могу настроить программу на импорт вложенного файлаА в чём проблема?
...
Рейтинг: 0 / 0
15.12.2015, 13:26
| Ответить | Цитировать | Написать  
Разархивирование вложенного файла с изменением имени
    #39128504
Dmitry_Zap
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Dmitry_Zap
Гость
Проблема в том что для импорта в программу нужно использовать заранее указанное имя файла. Я настраиваю правило для OUTLOOK где будет приходить письмо с прайсом, оно автоматом распаковывается в указанную папку и программа в указанное время сама будет брать файл .xls и импортировать в программу. Но т.к. вложенный xls файл заархивирован каждый день с новым именем у меня есть необходимость при разархивировании файла указывать постоянное название файла. Например сегодня в архив упакован файл "Price_15.12.15.xls", завтра будет "Price_16.12.15.xls" но мне нужно чтобы при распаковке файл распаковывался с именем "Price.xls"
...
Рейтинг: 0 / 0
15.12.2015, 13:48
| Ответить | Цитировать | Написать  
Разархивирование вложенного файла с изменением имени
    #39128927
Dmitry_Zap
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Dmitry_Zap
Гость
Так как же переименовать файл при распаковке?
...
Рейтинг: 0 / 0
15.12.2015, 17:55
| Ответить | Цитировать | Написать  
Разархивирование вложенного файла с изменением имени
    #39128936
Фотография Akina
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Akina
Участник
Dmitry_Zapпрограмма в указанное время сама будет брать файл .xls и импортировать в программу.Т.е. программа постоянно работает? дёргая таймер, и в "час икс" лезет в заданное место выгребать файл с предопределённым именем? или как?
...
Рейтинг: 0 / 0
15.12.2015, 18:02
| Ответить | Цитировать | Написать  
Разархивирование вложенного файла с изменением имени
    #39128952
Dmitry_Zap
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Dmitry_Zap
Гость
Программа лезет в определенную папку за определенным файлом с указанным именем.
Вот скрин из программы. Но внутри .rar каждый день приходит вложение с новым именем, мне нужно чтобы это вложение рапаковывалось с именем Indrive.xls
...
Рейтинг: 0 / 0
15.12.2015, 18:08
| Ответить | Цитировать | Написать  
Разархивирование вложенного файла с изменением имени
    #39128962
Dmitry_Zap
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Dmitry_Zap
Гость
http://joxi.ru/bmokMlWTMNRZkm
...
Рейтинг: 0 / 0
15.12.2015, 18:14
| Ответить | Цитировать | Написать  
Разархивирование вложенного файла с изменением имени
    #39128983
Фотография Akina
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Akina
Участник
Dmitry_ZapПрограмма лезет в определенную папку за определенным файлом с указанным именем.Ты её запускаешь вручную? Её запускает шедулер? Она работает постоянно?
В первых двух случаях - запускай её скриптом, которая предварительно переименует файл. В третьем - переименуй файл планировщиком или макросом Outlook.
...
Рейтинг: 0 / 0
15.12.2015, 18:23
| Ответить | Цитировать | Написать  
10 сообщений из 10, страница 1 из 1
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / Разархивирование вложенного файла с изменением имени
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Найденые пользователи ...
Разблокировать пользователей ...
Читали тему (0):
Читали форум (0):
Пользователи онлайн (0):
Польз. соглашение
NoSQL.ru       Новости, Чат       Фотоальбом: Участники, Встречи
Закрыть
start [/forum/topic.php?fid=60&msg=39128452&tid=2155691]:
 0ms
get settings:
 10ms
get forum list:
 14ms
check forum access:
 4ms
check topic access:
 4ms
track hit:
 31ms
get topic data:
 10ms
get forum data:
 3ms
get page messages:
 49ms
get tp. blocked users:
 1ms
others: 13ms
total:  139ms
созд. / загр.: 139ms
x
x
Закрыть


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