<?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) эээээ… Я НЕ АВТОР …!!!
Это сборник разных авторов… просто валялся, вот и выложил.
+3 цель никакую не преследовал, просто попросили тут Герои Магии и меча … 🙂
А Чебур сделал бы по-другому. Он бы выкладывал каждую игру отдельно с заголовками типа: [ЗАБЕЙ НА РАБОТУ] Клиомания. Скачивать всем не давал бы, а просил умолять его и оставлять своё мыло, а уж потом, если у него будет хорошее настроение, он отошлёт. ;)))))))))
(3) понял. А то я уж было испугался.
(6) Не, я не настолько фанат, чтоб писать игры.. 🙂
Хотя, хочешь чего-нить написать — глядишь, а всё ужо написано до нас…
🙂
офигеть..
шахматы не от нефедова..
(8) Заметь, они — сетевые 🙂
(4) ага…
Это я попросил 🙂
(7) > Не, я не настолько фанат, чтоб писать игры.. 🙂
Вообще, мне кажется, есть определенная параллель между аппаратными требования к «обычному» компьютеру и игровом и, соответственно между программированием «обычных» программ (сорри за тавтологию) и игровых.
Я, например, даже и не взялся бы игрушку писать. Не потому что мне лень или считаю это несерьезным.
Просто «хысту» не хватит.
Ведь требование к игрушке гораздо выше.. Не в техническом плане. А в «моральном» 🙂
Представьте ситуацию — долго и коряво работающий отчет и долго и коряво работающая игрушка.
Если с первым еще можно смириться (с матами-перематами), то со вторым никада!
P.S. Пока писал, вспомнил почему-то, как мы на фирме в далекие 90 играли в «Преф Клуб» на 286.
Во время мизера комп мог по часу думать над каждым ходом.
А када купили 386 — вау! — вся фирма была на ушах от радости 😀
Супер подборка ! А вообще люблю когда используют софту не по назначению. Помница ешше в веселые 90-е (году так в 1993) писал ещще на СуперКалке игрушку типа Сокобан-а. 🙂 Енто у меня такой учитель был информатики. Говорил на С++ любой дурак напишет, а написать на том, что есть под рукой… этт мастерство. А красиво написать — искусство.
О! Там есть моя игра Рулетка :)))
(5) И ЭТО ПРАВИЛЬНО!!! потому как нефиг игры играть, работать надо!!!
Здорово! Молодец что выложил!
Туда-б еще Dune II… :Р
ага…
«Засунуть» все эти игры в мой сборник?
(13) Эт уже не «ваша», а «наша» игра… Так сказать народное достояние! 🙂
(14) Игры на 1С’овской платформе — это больше, чем просто игры! Да и потом занятия «фигней» на рабочем месте развивают слух, боковое зрение и бдительность в целом :)))
(19) это точно и психические расстройства :-)))
Бухи качайте и будет вам отличное настроение.
МЛИН !!! А любимых FreeCell и Solitair -то и нету… :(((
(22) Написать недолго, например, взяв за основу —
Блин… не качаются 3786kb… и даже после 5-ой попытки…
Может стоит разбить по каким-нибудь группам или направлениям… на несколько файлов… хотя бы на 3…
во-ООО-от … а то ведь хочется но не можется…
(24) Так сойдёт ?
Спасибо Ёпрст. Большое.
К сожалению опять не получается выдаёт ошибку при скачивании «Сброшено подключение к серверу»…
Жаль… прямо ну, никак… обидно…
Вооот…
(26) могу кинуть на мыло… 3-мя письмами … 🙂
(26) Спасибо! Если можно…
Мыло: a-l-e-x-1964@yandex.ru
Вооо-о-ооот… Ёпрст… Спасибо!
Ой…
меняю (26) на (27)
воооот
(28) лови.
(30) Смешно… но видно не судьба…
Выдаёт ту же ошибку на 2/3 скачивания…. «Сброшено подключение к серверу»…
воооОооот не судьба…
П.С. Попробую с другой конторы на следующей недели…. Благодарен за беспокойство… Спасибо!
В это играть невозможно лучше бы чтото дельное сделал
(32) Это заявление всем авторам этих игрушек?
(32) во что именно?
Скажите, как игры установить?
(35) Файл — открыть — выбираешь нужный ert — ник и привет. Наслаждаешься положительными эмоциями.
дароф! МОЛОДЕЦ ЧТО ВЫЛОЖИЛ!!!!!!!!!!!!!! ИНОГДА И ВО ВРЕМЯ РАБОТЫ РАСЛАБИТСЯ НАДО
Супер!!
Ну добил, ффсе:)
Я хоть и последний опоздавший, но всё равно — очень признателен 😉
Позитив! Спасибо и респект Автору!
О! Lost & Found GameZZZ !!! Спасибо еще раз !!!
Спасибо Автору!
Вау, коллекция игр для 1с! «Тяжелое детство — самописные игрушки… «с НеПомнюКто
О использовании 1С не по предназначению, так первые игры были написаны на осциллографе для примера использования всех ресурсов, если я не ошибаюсь.