<?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='\
однозначно плюс
правда можно также хранить двоичные данные в хранилище значений, если использовать справочники
хм.. автор хочет сказать, что вытянув «звук» из хранилища он его не преобразует в файл на диске? если это так — то зачет! если не так — фуфло! 😉
(3) Мда…
(5) Уважайте друг друга — поставил минус — объясни почему, есть лучше идея- сделай обработку — выложи — поделись идеей с другими.
(6) Минус поставлен комментарию.
>идея хранить данные в макете мало кем используется
Это просто пять!
По крайней мере я не встречал таких обработочек ))
2(7): зри в корень.. если речь идет об обработке, которая не привязана к конфигурации, тогда только через макеты…
плюс однозначно за оригинальность и простоту идеи, по крайней мере тут я такого не встречал
(4) Файл создается временный, и потом проигрывается.
(0) Под windows7 не работает, т.к. в нем нет проигрывателя mplay32. Есть wmplayer, но параметры запуска «wmplayer /play /close» отрабатываются не корректно: звук постоянно повторяется в плейере.
Виста Бизнес и типовой медиаплеер — скрипт не выполняется, нужна другая команда. Кто знает какая?
Использовал следующую
WshShell.Run("""%programfiles%\Windows Media Player\wmplayer.exe"" /play /close "+ИмяФайла,0,0);Показать полностью
Если было включено повторение — то мелодия многократно повторяется 🙂
Принцип подходит и для хранения (кодирования) изображений.
Идея стара как мир, я в обработке по КБ ( мануал по работе с самим КБ храню в макете в формате html контейнера… да и в типовых конфигурациях где-то встречал подобное… посему ни «+» ни «-» ставить не буду.
2(16): все новое это хорошо забытое старое
(13) Как-то раз хотел сделать медиаплеер на 7.7 используя код:
WshShell.Run(«»»%programfiles%Windows Media Playerwmplayer.exe»» /play /close «+ИмяФайла,0,0);
Получилось, но только я не знаю как проиграть несколько файлов один за другим, как в winamp. Интересно, есть ли выход в этой ситуации? Только без ВК!
(11) Верно
(4) Временный файл создастся и автоматически удалиться при закрытии 1С
(12) Поищи универсальный проигрыватель (а не медиаплеер), сомневаюсь, что его нет в Висте …
(18) Создай плейлист — скорми его медиаплееру …. Команду посмотри в расширении плейлиста (Проводник — Сервис — Свойства папки — Типы файлов)
То что автор впервые (видимо) для себя открыл тип макета «двоичные данные» и гордо написал в заголовке «без использования внешних файлов» (хотя это не правда) — это «минус».
За пример с параметрами командной строки медиаплеера — «плюс».
Итого 0.
Идея хранить данные в макете стара как мир, т.е. по возрасту примерно как 7.7 ;-). В т.ч. таким способом изготавливаются обработки, инсталлирующие «из себя» недостающие ВК и прочее… Учите матчасть… Тем более, что такие вещи даже на ИСе пробегали уже давно (то ли у Маляева, то ли у Душелова)
да, жаль что автор всех наколол лажовым заявлением «без внешних файлов» 😉 А на проигрывании звука в 1С медиаплеером еще Опланет в дремучие времена неплохо себе шпинга.. ээээ рейтинга нарубил.. 😉
Какое отношение это имеет к 1С?
Запуск проги с параметром?
Бред, лучше бы просто сказал что в 1с есть такая штука как Сигнал()
(23) DitriX,
В обработке реализован пример как в программе средствами 1С вызвать воспроизведение звука, отличного от сигнал и не хранящегося по конкретному жесткому пути.
(24) но для воспроизведения — таки нужен жесткий путь…
Или и саму программу засунуть во внешние? Тогда опять вопрос — почему не сделали? И пути выбора программы воспроизведения тоже нету, автоопределения операционки и подстановки соответствующего пути — нету.
Комментариев что будет на серверах — не увидел…
З.Ы. Я просто к чему — обычному пользователю 1с — это не пригодится, а если ему будет интересно все же, то он ничего не сможет сделать если только у не не ХП, стоит тот плеер и т.д. и т.п.
А вот для программистов — ничего интересного…
(25) DitriX,
Если честно — я потратил время, чтобы определить простой путь для воспроизведения звукового файла по определенному событию в 1С. А выложил сюда обработку не для поднятия рейтинга, а для того чтобы другие меньше тратили время при решении аналогичной задачи.
Тем более я удалял эту обработку с проекта еще в 2009 году. Не понимаю почему администрация сайта восстановила ее 🙂
Идея действительно очень занимательная, будет полезно для пользователя, которые всегда закрывает окна предупреждения
Все скачали? Теперь в 1С будет еще больше свистелок и перделок)))
Ставлю минус за истраченный стартмани. Автору необходимо было указать Операциооную систему (на Win 7) не работает:
{ВнешняяОбработка.Звук.МодульОбъекта(7)}: Ошибка при вызове метода контекста (Run): Произошла исключительная ситуация (0x80070002)
И что мешало дописать:
Исключение
Сообщить(ОписаниеОшибки());
а то получается:Не воспроизвело, догадайтесь почему.
(29) Atal,
ну да, собственно можно было статьей написать и код выложить, три строки…
(8) Если не использовал- то не надо и писать-в макетах можно хранить любые (в том числе и в двоичном формате данные), а вытаскиваются они 2 строчками кода.
1. Хранить звуковые файлы в макетах — Да
2. Воспроизводить звук средствами интернета