<?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) Еле нашел в формуле кнопки «Море приколов в формате *.pps» на форме:
;-)))))
Ну …venger. Раньше времени все и «разболтал»
— это тоже подарок для всех пользователей Инфостарт — все можно скачать бесплатно.
Вот один из примеров посмотрите может кого и заитересует )))
🙂 реализовано прикольно.
с начала не разобрал что имел ввиду (2) , но потом дошло 😉 , прикольно реализовано, нужно будет на заментку себе взять.
«Эх, нам бы день простоять, да ночь продержаться»
Прикольненько, пойду сейчас поставлю.
Да ….господа ! почти 300 человек скачало и тишина ))).
Наверное, понравилось ! С Наступающим !
(0)
Да оно как-то лень 1С запускать 😀 , но данное графотворчество определенно плюса заслуживает!
В своей Магазьке отчетик рисовал 😉
{«TaskItem»,
{«1″,»МАГАЗЬКА (NR) v.2.0″,»2.0.020»,»МАГАЗЬКА — программа для магазина «,»»,»1″,»0″,»0″,»0″,»2683″}},
P.S. Интересно, а сколько народа не дотумкало, что файл read only 😀
С Праздником тебя !!!
(9) Ты не поверишь, очень много.
Ругаются на ошибку 😉 😀
ну что еще 3 и на главной странице !
(не плюсюков ради , а ради праздника
ЗЫ: если жалко -24 можете всегда снять)
Инфостартовцы — с праздиником !
Стоя, полную, до дна…
Ура! Ура! Ура !!!
(11) Что с моим красным окном делать? 😉
Автор, перед обращением — ставится ЗПТ! поправь!
С праздником вас , мужики ! ❗ ❗ ❗
10-й плюсик! 😀
Фонтанируешь , Юра !
Красотища то какая…Совсем другой профиль
хехе!!! прикольно!!!
Спит еще медведь в берлоге,
а в окопах тишина,
это значит на пороге 23 февраля!
Если ты мужик и воин, не сквалыга и не хам,
наливай и выпей стоя, русской водки…200 грамм.
(0) Забавно ! Молодец ! безусловно + 🙂
Я одни такой тупой((( Как это открыть???
(9) — ответ на твой вопрос в (24)
гм, при открытии в пофигураторе — общая файловая ошибка к обработке
(26)
Не сдавайся ! Подумай и все получится 🙂
Открой в режиме предприятия — видишь работает, так что думай )))
Ты же ПРОГРАММИСТ!
Если сдался — см. (9) 😀
+(27) Это у дяди Юры шутки такие 😉
оригинально — как програмМист програмМистов 😀 😀 😀
Спасибо Очень Классно!!!
Оригинальная идея! Спасибо за нестандартность. На счет ошибки — я, например, тоже так прикрываю ert. Жаль, что это помогает только от начинающих. Тех кто один раз понял уже не обманешь…
(32) Спасибо. Смотри за эфиром. Сегодня постараюсь выложить
три варианта «прикрытия» ert без ВК 😉
мда, долго наверно пришлось вручную вставлять МойТекст.ДобавитьСтроку(» 😉
а если поменять шрифт на 5 то даже распечатать можно на А4
(33) В ручную ❓ ❓ ❓
ШабТекст=СоздатьОбъект(«Текст»);
МойТекст=СоздатьОбъект(«Текст»);
ШабТекст.Открыть(МойШаблон);
Для Сч=1 По ШабТекст.КоличествоСтрок() Цикл
МойТекст.ДобавитьСтроку(«МойТекст.ДобавитьСтроку(«+Chr(36)+ШабТекст.ПолучитьСтроку(Сч)+Chr(36)+»)»);
КонецЦикла;
МойТескт.Записать(НужноеМесто);
насчет шрифта ты прав у всех поразному отображается
лучше всего подходит шрифт Courier New 9
(27) да нестандарный подход к программированию, возьму на заметку 🙂
Дорогие женщины!
Не забываем поздравить своих Мужчин! 😀
С радостью бы поздравила своих мужчин, работающих в 1С, но в конф-ра и в Предприятии (8.1) открывается какая-то дребедень, что с ней делать я не знаю. Специально скачивать прогу, которая будет открывать *.ert, мне не интересно. Искала для 1С. А можно без головоломок и шарад? Это все-таки форум, а не частная переписка.
Мужчина! Ты записался защитить алигархическую собственность?
(37) Поздравляю! :{}
Юра, спасибо Вам от полковника Советско-Украинской армии! Ребята, поздравляю Вас всех с Праздником, счастья и здоровья Вам, Вашим семьям и успехов в нашем труде.
Анек: на диване лежит мужик смотрит телик, а жена метается по квартира : дети, уборка-готовка….
Заходит соседка и спрашивает у мужика:»Иван, чего лежишь, ничего по дому не делаешь?».
Мужик с дивана: «А вдруг война, а я устамши».
(41) Честь имею !
Отличная разработка , Спасибо !
С ПРАЗДНИКОМ МУЖИКИ !!!!
Ррребята с наступающим, не болеть, от денег не отказываться.
Ааааа, черт, не могу скачать:( Пришлите, пожалуйста, на bezhanova_w@mail.ru
С Праздником, Мужики!!!
(Модераторам) Это я не баллов ради, просто так, ради праздника:)
Поздравляю Всех Мужчин-Защитников с праздником !!! Урра!!
Защитник Отечества должен быть сыт,
Обут и одет, и доволен!
Он лыком не шит, гладко «Шиком» побрит,
Могучий внушительный воин!
Защитник Отечества должен быть трезв,
С открытой и честной харизмой!
Дай Бог вам, защитники, денежных средств
Крепить оборону Отчизны!
Есть день прекрасный в феврале,
Когда мужчин мы поздравляем.
Нет «Дня мужчины» на земле,
Но мы ошибку исправляем.
Сегодня Вам свою любовь
Несем мы полными горстями.
Мужчины, жизнь без Вас пуста,
Тому есть грустные примеры.
Для Вас вся наша красота,
В любовь мы не теряем веры.
Для Вас помада на губах,
Мы волосы завивкой губим.
И на высоких каблукам
Спешим мы к тем, кого мы любим.
Как здорово, что вы на свете есть!
И, силою слепя, готовы защищать!
В день всех Мужчин не допускаю лесть,
Я искренне хочу успеха пожелать!
Пусть светит солнце в мирном небе
И не зовет труба в поход.
Чтоб только на ученьях солдат
В атаку шел вперед.
Пусть вместо взрывов гром весенний
Природу будит ото сна,
А наши дети спят спокойно
Сегодня, завтра и всегда!
Здоровья крепкого и счастья
Всем тем, кто мир наш отстоял.
И кто его сегодня охраняет
И кто сполна долг Родине отдал
Мы не клянем судьбу свою превратную
И поднимаем пламенный бокал
За тех, кто нынче правит службу ратную
И кто ее когда-то «отпахал»!
Так пусть в бокале булькает и плещется,
Когда надежно обеспечен тыл!
Успехов Вам, защитники Отечества,
В сей славный День Вооруженных Сил!
С праздником Вас Мужчины !
Спасибо Очень Классно!!!
классно! а если дальше продолжить)
Спасибо. Прикольно.
Творчеству нет предела, благо что 1с вдохновляет!