Форум поддержки пользователей. LibreOffice, Apache OpenOffice, OpenOffice.org

Форум поддержки пользователей. LibreOffice, Apache OpenOffice, OpenOffice.org

21 Февраль 2019, 08:56 *
Добро пожаловать, Гость. Пожалуйста, войдите или зарегистрируйтесь.
Вам не пришло письмо с кодом активации?

Войти
Новости: Здесь можно поблагодарить участников форума Улыбка
 
   Начало   Помощь Поиск Войти Регистрация    задать вопрос  
Страниц: « 1 2   Вниз
  Печать  
Автор Тема: Хранение информации о нахождении базы в таблице.  (Прочитано 8522 раз)
0 Пользователей и 1 Гость смотрят эту тему.
JohnSUN
Капитана в тот день называли на "ты"
Гуру
*******
Offline Offline

Пол: Мужской
Расположение: Киев
Сообщений: 2 707


Помогаю людям и компьютерам понимать друг друга


WWW
« Ответ #15: 11 Февраль 2014, 16:56 »

Могу ошибаться (хоть и очень стараюсь этого не делать), но твоя задача, оказывается, решается в пол пинка.
Не уверен, что shell("ARC.BAT",1) не поймёт, что батник нужно искать в текущем каталоге. Но даже если прикинется бараном, мы ему этот каталог можем присобачить через обычный плюс
shell(curPath+"ARC.BAT",1)
А текущий путь внутри батника будешь получать через тот же SET put1=, но запишешь его чуть-чуть сложнее:
Код:
for /f %%i in ("%0") do set put1=%%~dpi
А с \arc\ можно даже не заморачиваться - просто дописывать его живьём к получившемуся %put1%
Записан

Владислав Орлов aka JohnSUN
Благодарить-не зазорно.
Подарить благо создателям офиса, нашему ресурсу, мне
adi_den2013
Форумчанин
***
Offline Offline

Пол: Женский
Расположение: Донецкая обл.
Сообщений: 259


« Ответ #16: 12 Февраль 2014, 09:51 »

Стесняюсь спросить ~dpi - это что?  Обеспокоенный  
Переменная, которая передается в батник?   У меня вроде такой не было....
« Последнее редактирование: 12 Февраль 2014, 09:52 от adi_den2013 » Записан

Яна (in real)
JohnSUN
Капитана в тот день называли на "ты"
Гуру
*******
Offline Offline

Пол: Мужской
Расположение: Киев
Сообщений: 2 707


Помогаю людям и компьютерам понимать друг друга


WWW
« Ответ #17: 12 Февраль 2014, 10:12 »

Не стесняйся, я тоже не знаю... не знал... когда-то...  Да уж...
Это "маска": d=disk=диск, p=path=путь, i=удалить обрамляющие кавычки.
Оператор for выдернет из значения в скобках полный путь и имя нашего bat'ника, а маска формата через тильду - вырежет из этого значения то, что попросили...
Подробности смотри в FOR /? из Командной строки
Записан

Владислав Орлов aka JohnSUN
Благодарить-не зазорно.
Подарить благо создателям офиса, нашему ресурсу, мне
adi_den2013
Форумчанин
***
Offline Offline

Пол: Женский
Расположение: Донецкая обл.
Сообщений: 259


« Ответ #18: 12 Февраль 2014, 10:15 »

Ух, ты ж  Улыбка! Спасибо. Я правда не знала.

Пошла читать про FOR.
Записан

Яна (in real)
adi_den2013
Форумчанин
***
Offline Offline

Пол: Женский
Расположение: Донецкая обл.
Сообщений: 259


« Ответ #19: 12 Февраль 2014, 11:25 »

Переделала батник
rem дата в имени архива ДДММГГ
set name1=%DATE:~0,2%%DATE:~3,2%%DATE:~8,2%

rem вычисление времени (до 10:00 и после)
IF "%time:~0,1%" LSS "1" (
   set name2="0"%TIME:~1,1%%TIME:~3,2%
) ELSE (
   set name2=%TIME:~0,2%%TIME:~3,2%
)

rem путь нахождения базы
for /f %%i in ("%0") do set put1=%%~dpi

rem создать папку месяца
md  %put1%arc\%DATE:~3,2%

rem создать папку дня
md  %put1%arc\%DATE:~3,2%\%DATE:~0,2%%DATE:~3,2%

arj.exe a -e %put1%arc\%DATE:~3,2%\%DATE:~0,2%%DATE:~3,2%\arc_%name1%_%name2%.arj %put1%balans.odb
rem pause


и макрос
Sub Archiv()                        
Dim oParent As Variant
Dim sURL As String
   GlobalScope.BasicLibraries.LoadLibrary("Tools")
   oParent = ThisComponent.getParent()
   sURL = oParent.getURL()                                                    
   command_arc=DirectoryNameoutofPath(ConvertFromURL(sURL), "\")+"\arc.bat"  
shell(command_arc,1)
End Sub


Все чётко работает  Веселый

Спасибо за наводку на FOR еще раз  Всё хорошо
Записан

Яна (in real)
JohnSUN
Капитана в тот день называли на "ты"
Гуру
*******
Offline Offline

Пол: Мужской
Расположение: Киев
Сообщений: 2 707


Помогаю людям и компьютерам понимать друг друга


WWW
« Ответ #20: 12 Февраль 2014, 12:32 »

А первый и третий параметры в
name1=%DATE:~0,2%%DATE:~3,2%%DATE:~8,2%
менять не захотела?

Чес-слово, вариант
name1=%DATE:~8,2%%DATE:~3,2%%DATE:~0,2%
мне как-то больше по душе
Записан

Владислав Орлов aka JohnSUN
Благодарить-не зазорно.
Подарить благо создателям офиса, нашему ресурсу, мне
adi_den2013
Форумчанин
***
Offline Offline

Пол: Женский
Расположение: Донецкая обл.
Сообщений: 259


« Ответ #21: 12 Февраль 2014, 13:11 »

А чего? Оч нормально сортируется - по времени  Подмигивающий

[вложение удалено Администратором]
Записан

Яна (in real)
JohnSUN
Капитана в тот день называли на "ты"
Гуру
*******
Offline Offline

Пол: Мужской
Расположение: Киев
Сообщений: 2 707


Помогаю людям и компьютерам понимать друг друга


WWW
« Ответ #22: 12 Февраль 2014, 14:42 »

Ага... До тех пор пока всю папку на флэшку не скинешь... и Дата изменения (и, блин, создания!) станет одинаковой для всех
Записан

Владислав Орлов aka JohnSUN
Благодарить-не зазорно.
Подарить благо создателям офиса, нашему ресурсу, мне
adi_den2013
Форумчанин
***
Offline Offline

Пол: Женский
Расположение: Донецкая обл.
Сообщений: 259


« Ответ #23: 12 Февраль 2014, 15:08 »

Что-то я, наверное, неправильно поясняю  Обеспокоенный

arc_120214_1028.arj, где 120214 - дата 12/02/2014, 1028 - время создания архива 10ч 28мин

Почему оно должно поменяться при копировании на флешку? Это имя файла. Атрибуты поменяются, но не имя.
« Последнее редактирование: 12 Февраль 2014, 15:10 от adi_den2013 » Записан

Яна (in real)
JohnSUN
Капитана в тот день называли на "ты"
Гуру
*******
Offline Offline

Пол: Мужской
Расположение: Киев
Сообщений: 2 707


Помогаю людям и компьютерам понимать друг друга


WWW
« Ответ #24: 12 Февраль 2014, 15:30 »

Я не про имя файла, я про дату изменения файла, на твоем скриншоте третья колонка Изменено.
Сейчас-то у тебя все файлы за 12 февраля и всё прекрасно. Как по-твоему будут отсортированы файлы с именами
arc_120214_2085.arj
arc_190214_1979.arj
arc_260214_1946.arj
arc_050314_1586.arj
arc_120314_1817.arj
arc_190314_2118.arj
arc_260314_2162.arj
arc_020414_1654.arj

Я тебе скажу - каша получится. Вот такая:
arc_020414_1654.arj
arc_050314_1586.arj
arc_120214_2085.arj
arc_120314_1817.arj
arc_190214_1979.arj
arc_190314_2118.arj
arc_260214_1946.arj
arc_260314_2162.arj
Записан

Владислав Орлов aka JohnSUN
Благодарить-не зазорно.
Подарить благо создателям офиса, нашему ресурсу, мне
adi_den2013
Форумчанин
***
Offline Offline

Пол: Женский
Расположение: Донецкая обл.
Сообщений: 259


« Ответ #25: 12 Февраль 2014, 15:43 »

Обрати внимание на зелененькую шапку на скриншоте. Там не только месяц, но и день Подмигивающий

[вложение удалено Администратором]
« Последнее редактирование: 12 Февраль 2014, 15:51 от adi_den2013 » Записан

Яна (in real)
JohnSUN
Капитана в тот день называли на "ты"
Гуру
*******
Offline Offline

Пол: Мужской
Расположение: Киев
Сообщений: 2 707


Помогаю людям и компьютерам понимать друг друга


WWW
« Ответ #26: 12 Февраль 2014, 15:53 »

А подчищать старьё - грохать целыми папками? Ну, тогда да, тогда конечно... Я просто в последние пару лет с папками не заморачиваюсь - все в одну директорию кидаю. Потом по имени отсортировал, от сих до сих с шифтом пометил и Shif+Delete
Записан

Владислав Орлов aka JohnSUN
Благодарить-не зазорно.
Подарить благо создателям офиса, нашему ресурсу, мне
adi_den2013
Форумчанин
***
Offline Offline

Пол: Женский
Расположение: Донецкая обл.
Сообщений: 259


« Ответ #27: 12 Февраль 2014, 16:02 »

Все равно эти архивы кроме меня никому не нужны. Люди даже слова такого страшного не знают - "архив".

Есть у человека распечатанный на бумаге отчет и он счастлив. А все остальное "ваши извращения"  Злой
Записан

Яна (in real)
Страниц: « 1 2   Вверх
  Печать  
 
Перейти в:  

Powered by MySQL Powered by PHP Powered by SMF 1.1.21 | SMF © 2006-2009, Simple Machines Valid XHTML 1.0! Valid CSS!