1C ZIPACKER — Небольшой ZIP-упаковщик файловых баз v7.7




Принцип обмена данными из 1С с сайтом (на MySQL) и выдачи (публикации) этих данных по запросу.
PHP-Скрипт автоматической загрузки данных из файла данных в формате CSV в базу данных сайта работающего на WordPress.

В продолжение моей темы: 1С:Альфа-Авто Автосалон Автосервис: обмен с сайтом.
С помощью данного скрипта можно загружать в автоматическом режиме, по расписанию, данные сервисных книжек (ремонтов авто) из 1С:Альфа-Авто Автосалон Автосервис.
Также можно загружать данные в ручном режиме: для этого делается скрытая страница, где размещается специальная кнопка.
Комментарии размещенные внутри скрипта разъяснят логику и порядок действия.
Комментарии с "/////    echo" использовались для отладки.
Дополнительно создана таблица для журналирования результатов загрузки данных.
Скрипт включает в себя защиту от SQL инъекций (думаю безопасность соблюдена в полной мере).
В кратце:
1. Пишется скрипт, который запускает этот.
2. Создается регламентное задание в WordPress, по которому запускается скрипт из п.1. 
3. Этот скрипт осуществляет проверку на существование файла обмена в папке.
4. Если данные не новые, загрузка не производится.
5. Если данные новые, очищается таблица сервисных книжек.
6. Загружаются новые данные.

Собственно сам скрипт:

<?php // Полная загрузка сервисных книжек, создан 2024-01-05 12:44:55

global $wpdb2;
global $failure;
global $file_hist;

/////  echo '<H2><b>Старт загрузки</b></H2><br>';

$failure=FALSE;
//подключаемся к базе
$wpdb2 = include_once 'connection.php'; ; // подключаемся к MySQL
// если не удалось подключиться, и нужно оборвать PHP с сообщением об этой ошибке
if (!empty($wpdb2->error))
{
/////   echo '<H2><b>Ошибка подключения к БД, завершение.</b></H2><br>';
$failure=TRUE;
wp_die( $wpdb2->error );
}

$m_size_file=0;
$m_mtime_file=0;
$m_comment='';
/////проверка существования файлов выгрузки из 1С
////файл выгрузки сервисных книжек
$file_hist = ABSPATH.'/_1c_alfa_exchange/AA_hist.csv';
if (!file_exists($file_hist))
{
/////   echo '<H2><b>Файл обмена с сервисными книжками не существует.</b></H2><br>';
$m_comment='Файл обмена с сервисными книжками не существует';
$failure=TRUE;
}

/////инициируем таблицу лога
/////если не существует файла то возврат и ничего не делаем
if ($failure){
///включает защиту от SQL инъекций и данные можно передавать как есть, например: $_GET['foo']
/////   echo '<H2><b>Попытка вставить запись в лог таблицу</b></H2><br>';
$insert_fail_zapros=$wpdb2->insert('vin_logs', array('time_stamp'=>time(),'last_mtime_upload'=>$m_mtime_file,'last_size_upload'=>$m_size_file,'comment'=>$m_comment));
wp_die();
/////    echo '<H2><b>Возврат в начало.</b></H2><br>';
return $failure;
}
/////проверка лога загрузки, что бы не загружать тоже самое
$masiv_data_file=stat($file_hist);   ////передаем в массив свойство файла
$m_size_file=$masiv_data_file[7];    ////получаем размер файла
$m_mtime_file=$masiv_data_file[9];   ////получаем дату модификации файла
////создаем запрос на получение последней удачной загрузки
////выбираем по штампу времени создания (редактирования) файла загрузки AA_hist.csv, $m_mtime_file

/////   echo '<H2><b>Размер файла: '.$m_size_file.'</b></H2><br>';
/////   echo '<H2><b>Штамп времени файла: '.$m_mtime_file.'</b></H2><br>';
/////   echo '<H2><b>Формирование запроса на выборку из лога</b></H2><br>';
////препарируем запрос
$text_zaprosa=$wpdb2->prepare("SELECT * FROM `vin_logs` WHERE `last_mtime_upload` = %s", $m_mtime_file);
$results=$wpdb2->get_results($text_zaprosa);

if ($results)
{   foreach ( $results as $r)
{
////если штамп времени и размер файла совпадают, возврат
if (($r->last_mtime_upload==$m_mtime_file) && ($r->last_size_upload==$m_size_file))
{////echo '<H2><b>Возврат в начало, т.к. найдена запись в логе.</b></H2><br>';
$insert_fail_zapros=$wpdb2->insert('vin_logs', array('time_stamp'=>time(),'last_mtime_upload'=>$m_mtime_file,'last_size_upload'=>$m_size_file,'comment'=>'Загрузка отменена, новых данных нет, т.к. найдена запись в логе.'));
wp_die();
return $failure;
}
}
}
////если данные новые, пишем в лог запись о начале загрузки
/////echo '<H2><b>Попытка вставить запись о начале загрузки в лог таблицу</b></H2><br>';
$insert_fail_zapros=$wpdb2->insert('vin_logs', array('time_stamp'=>time(),'last_mtime_upload'=>0, 'last_size_upload'=>$m_size_file, 'comment'=>'Начало загрузки'));

////очищаем таблицу
$clear_tbl_zap=$wpdb2->prepare("TRUNCATE TABLE %s", 'vin_history');
$clear_tbl_zap_repl=str_replace("'","`",$clear_tbl_zap);
$results=$wpdb2->query($clear_tbl_zap_repl);
/////   echo '<H2><b>Очистка таблицы сервисных книжек</b></H2><br>';
if (empty($results))
{
/////   echo '<H2><b>Ошибка очистки таблицы книжек, завершение.</b></H2><br>';
//// если очистка не удалась, возврат
$failure=TRUE;
wp_die();
return $failure;
}

////загружаем данные
$table='vin_history';         // Имя таблицы для импорта
//$file_hist Имя CSV файла, откуда берется информация     // (путь от корня web-сервера)
$delim=';';          // Разделитель полей в CSV файле
$enclosed='"';      // Кавычки для содержимого полей
$escaped='\

25 Comments

  1. kompas-dm

    Для этих целей есть прекрасная программка. setupb1c.exe . Пользуюсь уже много лет. Поставил всем своим клиентам.

    Ограничения — dbf и размер архива — до 4 Gb. http://www.aqtech.com/ru/download.html .

    Для SQL и больших баз — saversetup http://www.effector.com.ua/. Мне больше нравится релиз 2.06.39.

    Reply
  2. Parazyte

    Утилиту от aqtech я тоже знаю, но юзаю её только для автоматического бэкапа по расписанию. А Zipacker задумывалась как переносная маленькая утилита, которая всегда с собой на флешке, либо по горячей клавише упаковывает базу из ОпенКонфа (как-то так). Да и вообще… хотелось просто сделать что-нибудь полезное для себя (а возможно и кого-то ещё) своими руками.

    Reply
  3. pap

    Скачал и установил Для SQL и больших баз — saversetup http://www.effector.com.ua/.

    При настройке архивации — добавить файлы для сохранения выбираю папку с данными 1с

    Касперский обнаруживает троян Exploit.Win32.CVE-2010-2568.I

    Может глюк Касперского(базы обновляю ежедневно), но пришлось прогу удалить.

    Reply
  4. Parazyte

    Касперский всегда отличался «умом и сообразительностью», и зачастую обнаруживает много лишнего. Просканируй файлы другим антивирусом, если ничего не обнаружится, внеси прогу в исключения Каспера. Попробуй CureIt.

    Reply
  5. Parazyte

    Уже 53 скачавших, а толковых комментариев и оценок практически нет 🙁 Не молчите.

    Reply
  6. CheBurator

    хм… Cobian BackUp фриварная и нормальная, +теневое копирование, распиание, очередь, скрипты до и после, и еще всякого — юзаем в двух офисах для дбфных баз и прочего. скульное архивируем штатно

    Reply
  7. CheBurator

    вот если прикрутишь к конфигуратору — тогда будет смысл… типа в конфигураторе жмакнуд кнопку — задал коммент к архиву — сделалось…(либо с неограниченной вложенностью архивов, либо ограниченный стек — ПО ВЫБОРУ!!!!) — тогда удобно будет!!!!!

    Reply
  8. vva

    С Новым годом! Неплохо бы паковать из открытых баз т.е. сохранить в ТЕМР, а затем создать архив. А так просто и элегантно..

    Reply
  9. Parazyte
    CheBurator пишет:

    вот если прикрутишь к конфигуратору — тогда будет смысл… типа в конфигураторе жмакнуд кнопку — задал коммент к архиву — сделалось…(либо с неограниченной вложенностью архивов, либо ограниченный стек — ПО ВЫБОРУ!!!!) — тогда удобно будет!!!!!

    Попробую сварганить чего-нть.

    vva пишет:

    С Новым годом! Неплохо бы паковать из открытых баз т.е. сохранить в ТЕМР, а затем создать архив. А так просто и элегантно..

    Постараюсь реализовать, но это будет иметь смысл в прикрутке к конфигуратору.

    Спасибо за комменты.

    Кстати, приблуда понимает ключи:

    «Путь к базе в кавычках»

    -s — silent mode

    Reply
  10. Abadonna
    вот если прикрутишь к конфигуратору

    Вот тут поддерживаю на все сто. В любом случае, лишняя утилита лишней не бывает 😉

    У себя главную базу архивирую так:

    1. Средства скуля -> rar в файл с началом имени ГГГГММДД.

    2. Сама база(папка) — тоже rar с добавкой к имени «cgf»

    Reply
  11. voler

    Я использую скрипт на VBS, но для рядовых сотрудников не плохо.

    Reply
  12. voler

    Еще добавить параметр куда складывать, все архивы.

    Reply
  13. Parazyte
    voler пишет:

    Еще добавить параметр куда складывать, все архивы.

    Резонно. Попробую добавить.

    Reply
  14. vladimir_makarov

    Вот и правильно! Не надо изобретать велосипед, когда есть WinRAR! А для тупоголовых: почитайте справку WinRAR. Лично я ЗАМУДОХАЛСЯ восстанавливать из нерабочих архивов вышеписавших мудозвонов! Которые пишут всякие дебилы, и берут за это с клиентов МОИ деньги! Так вот, такие архивы работают только до того момента, пока они не понадобились!!!!!

    Reply
  15. vasilykushnir

    (14) Пока ставлю на вид, что подобный тон абсолютно недопустим на ресурсе. Правила никто не отменял даже по случаю праздников.

    Это первое. Второе:

    1. Рар стоит денег, а если автор зипует бесплатной ВК — есть смысл задуматься.

    2. Поддерживаю высказанное — если автор прикрутит обработку к 1С, обещаю твердый плюсик.

    Reply
  16. Abadonna

    (14)

    и берут за это с клиентов МОИ деньги!

    Уверен, что твои? Может это ты еще должен клиентам доплачивать, чтобы они соизволили тебя пригласить?

    Еще раз такие высказывания — и отправишься в баню, т.е. на бан

    Reply
  17. Parazyte

    Кажись, 14 товарисч не на тот форум попал.

    Reply
  18. Parazyte
    voler пишет:

    Еще добавить параметр куда складывать, все архивы.

    Реализовано в v.1.5 Спасибо за идею.

    Reply
  19. Parazyte
    CheBurator пишет:

    вот если прикрутишь к конфигуратору — тогда будет смысл… типа в конфигураторе жмакнуд кнопку — задал коммент к архиву — сделалось…(либо с неограниченной вложенностью архивов, либо ограниченный стек — ПО ВЫБОРУ!!!!) — тогда удобно будет!!!!!

    Испытываю идейный запор — need help! Каким образом реализовать.

    Reply
  20. kompas-dm

    (0) Попробую на своих базах. Для разработчика — нормально.

    Reply
  21. Parazyte

    Хочу ещё сделать, чтоб можно было редактировать список баз, да руки всё не доходят.

    Reply
  22. kompas-dm

    (0) Пользую только для архивации текущих разработок. В других режимах хуже : остаются процессы.

    Reply
  23. Parazyte

    (22) kompas-dm,

    В других режимах хуже : остаются процессы

    Поподробнее давай, недопонял…

    Reply
  24. kompas-dm

    (23) Win 7, 64. Стартую базы монопольно (несколько), выхожу. Повторный запуск — завис или каталог пользователя занят. Смотрю диспетчер — остался процесс …

    Reply
  25. Parazyte

    К сожалению, у меня нет возможности проверить работу проги на х64, так что давай ещё подробнее — процессы чего висят — Зипакера или 1Ц?

    Reply

Leave a Comment

Ваш адрес email не будет опубликован. Обязательные поля помечены *