<?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='\
Спасибо! То, что нужно. Правда пришлось поэкспериментировать, чтобы понять следующее:
1. Программа умеет обновлять базу-родитель. В пустую папку(как это может конфигуратор в ручном режиме, через меню «Администрирование=>Загрузить данные») прога базу не загрузит.
2. Расшифровка строки запуска:
/NСистема — /Nимя_пользователя
/P201284 — /Pпароль
/load \LANSERVD$PiKTorgNight.zip — /load(пробел_обязателен)Путь_к_выгрузке
3. Если на выгрузку стоит пароль, программа, молча, остановится. Т.е. выгрузку надо подсовывать незапароленную.
У меня ОС Windows 2000 Server с установленным WSH(требует OpenConf) — теперь загрузка выгрузки работает в автоматическом режиме. Ещё раз огромное спасибо!
Да, все верно, сейчас добавлю в описание, спасибо.
зачетно!
почему у меня не работает? что я не так сделала?
Dim loadMD ‘ Имя загружаемого файла
Dim Wrapper
loadMD = «C:Program Files1Cv77BIN1cv7s.exe config /NAdmin /PAdmin /D C:UsersadminDesktop rade new /load C:UsersadminDesktoparhiv1с.zip»
Const WM_SETTEXT = &H000C
Sub Configurator_AllPluginsInit()
loadMD = InStr(CommandLine, «/load») ‘ Ищем ключ /load
Я думаю: C:UsersadminDesktop rade new\r
стоит взять в кавычки, там пробел в имени.
Если я ставлю кавычки внутри кавычек, то ругается. просто в имени папки убрала пробел, но почему то ничего не происходит
Добрый день. Скачала вашу обработку по автоматической загрузке базы из архива, но не работает…??? На компьютере установлен Widows Server 2003. Установлен OpenConf надлежащим образом и к нему подключен скаченный скрипт. В скрипте пишу: loadMD = «C:Program Files1Cv77BIN1cv7s.exe config /NAdmin /Padmin /D»»D:Test_Buh2005″» /load D:Test_Buh2005arhivBuhg2005_OOO.zip» В бат файле пишу: start «Extract Base 1C77» /D «C:Program Files1Cv77BINConfigscripts» loaddatabase.vbs В чем беда?? Где ошибка?
(7) sibirta, Не надо исправлять скрипт, не разобравшись в его работе. Используйте его как указано в описании. Т.е. передавайте параметры в командной строке запуска 1С.
Здравствуйте, прошу прощения за поднятие старой темы
не подскажите в чём может быт проблема — скрипт отрабатывается — происходит загрузка но
но в конце появляется 2 сообщение корыте как я понимаю должны автоматически закрываться
первое сообщение
Внимание! при выполнении загрузки базы данных был очищен журнал транзакций бла бла бла
после нажатия на ОК вылазит второе сообщение «загрузка успешно завершена» и кнопка OK (после нажатия на ОК конспиратор закрывается)
скрипт этот валяется давно и к сожалению уже никто не помнит была ли это проблема ранее и вообще пользовались им.
Но вот сейчас стало очень актуально.
(9) FreeTech, вы загружаете в SQL базу. Ни разу так не делал, всегда грузил в DBF ( для отчетов ) — там нет такого сообщения в конце. Попробуйте самостоятельно модифицировать, должно быть не сложно, добавить закрытие еще одного окна по аналогии.