САРМ (попытка создать простое АРМ Следователя)

[AndrewA]

Вводная часть

Здравствуйте, уважаемые участники форума. Мы попытались создать комплекс простых программ, направленных на автоматизацию процесса расследования. Программы еще совсем сырые, тестировались мало, мы так же, как и большинство - самоучки. На форуме уже присутствуют ряд программ, в связи с чем от еще пары авторов много вреда не будет. Возможно, приведет к взаимному сотрудничеству.

Описательная часть

"АРМ Следствие" включает в себя комплекс программ:
1. Непосредственно АРМ Следствие
2. Конвертер показаний 3 in 1

3. Прототип программы для приостановления УД (заполнение постановления и стат. карточек - готов прототип со старыми карточками, но в силу отсутствия новых - пока разработка приостановлена. Здесь же есть идея создания программы для ВУД (постановление, карточки, план).
4. Иные программы, при наличии идей - можем попробовать реализовать

Системные требования

- для запуска и правильной работы приложения необходимо наличие установленного на компьютере Microsoft .NET Framework 4.5.2. Скачать его можно на официальном сайте. https://www.microsoft.com/ru-ru/down....aspx?id=42642
- также наличие MO Word 2010 и выше (с 2007 также работают, но возможны ошибки, решаемые патчами с оф. сайта; с 2003 также работают, но необходимо дополнение для работы с файлами .docx)

АРМ Следствие

АРМ Следствие v 1.3
Возможности:
- учет данных уголовного дела
- возможность добавления шаблонов самому и редактирование существующих
- создание документов по движению уголовного дела
- создание документов на участников
- встроенный справочник экспертиз и возможность их назначения, а также ознакомления участников с ее назначением и заключением
- проведение иных СД (допрос, очная ставка, получение образцов)
- встроенный конвертер показаний (v. 1.3)



Видео по работе (в данном случае - старая версия, снималось для себя, поэтому и качество соответствующее) https://youtu.be/y7DUgZNpfAo


https://www.youtube.com/watch?v=y7DU...ature=youtu.be

Скачать https://yadi.sk/d/SGUp0SEZ3J7KVs

Конвертер показаний 3 in 1

АРМ Следствие - Конвертер показаний v 1.4.1 (3 in 1)
- 3 in 1 - с 2 полями, с 1 полем, без полей для работы в word)
- 652 вариантов слов для замены;

https://youtu.be/xk_7oEAZlws

https://www.youtube.com/watch?v=xk_7...ature=youtu.be

Скачать https://yadi.sk/d/7tUbulqr3DnM4b

Заключительная часть

В силу последних событий - https://virusdesk.kaspersky.ru/. Ссылку или саму программу можете проверить на этом сайте.

Надеемся, что мы сумеем заинтересовать Вас и привлечь к доработке и тестированию. Прежде всего, для самих себя! Критика приветствуется, но с учетом того, что все сделано на скорую руку лицами, не имеющими специальных знаний в данной области!

[Citizen]

Попытка более чем интересная хоть и видео "подсмотреть" не удалось. Понравился подход от уголовного дела. Не понравилось то, что работа в программе, скорее всего, потребует от следователя "лишних телодвижений", то есть необходимости введения в БД сведений которые напрямую не относятся к расследованию. В последующем такие сведения, конечно же, могут помочь, сокращая время на заполнение документов (простейшее - автоматически вставляя сведения об участнике в готовую форму), но могут и не помочь.
И вопрос. АРМ предполагается только для следователя? Концептуально было бы целесообразным связать его с АРМ для оперативных и участковых уполномоченных. Но это уже сложная задача...

[AndrewA]

- Над видео прикрепил ссылки на ютуб, потому что так показывать почему-то не хочет)

- Согласен, необходимо вводить много данных, которые могут пригодиться в последующем, а может и нет. Поэтому их можно просто не вводить , а вводить лишь то, что необходимо оперативно.

- По поводу связывания - тут если честно не думали. К сожалению, со спецификой работы и наличием существующих АРМ у данных служб не знаком, но теоретически связать можно и необходим специалист по работе с БД, да и специалист по защите информации... ну и для связывания необходима локальная сеть, которая не везде есть. Ну и что-то мне подсказывает, не дадут официально на нее что-либо ставить. Хотя если это реализовать - получится просто шикарно в плане взаимодействия и обмена информацией...

теоретически можно сделать АРМ и для данных служб и если будут желающие - большую часть кода могу предоставить для создания.

[Citizen]

Посмотрел ).
И многое стало яснее. Как понял это у Вас блоки надстроенные над Офисом виндов. Уязвимо, но это не основная проблема. Офис постоянно меняется и Вам придется сопровождать продукт в зависимости от изменений которые не прогнозируемые.
И как понял нет СУБД. Предложил бы Офис использовать только для оформления, а данные хранить в MySQL. Дешево, просто, конвертируемо.

[AndrewA]

Если честно, про блоки не понял) Что касается обновлений - то здесь думаю проблем не должно быть, так как работает программа почти со всеми текущими версиями благодаря встроенным в MVS библиотекам для работы с ними...если майкрософт обновит офис, то обновятся и библиотеки для работы с ними)

про СУБД вы совершенно правы... к сожалению, ее нет, и это плохо! Если честно - не получилось настроить. В целом, сделать и подключить ее проблем не составило. Основная проблема - сохранение и вывод из нее данных. Не хватает пока знаний для этого, но будем пробовать.

Посмотрите (как совет) в сторону Sqlite (https://ru.wikipedia.org/wiki/SQLite) сильно Вам облегчит процесс. В составе один файл БД и один файл DLL.

[SveT1iy]

AndrewA,
Добрый день, посмотрел, многое понравилось, достойная задумка, пару идей утащил под свои задумки!

Далее несколько вопросов и фактически предложений:
- Почему именно Microsoft.NET Framework 4.5.2?
Почему не 4.0?
Отсекаете пользователей Windows XP, коих еще довольно много.
Если я правильно понял, то видимо из-за библиотеки System.Net.Http.dll. Если да, то можете спокойно переходить на 4.0, через Nuget добавив в проект следующие пакеты Microsoft.Net.Http 2.2.29, Microsoft.Bcl.Build 1.0.21, Microsoft.Bcl 1.1.10. По крайней мере в своих программах после такого перехода проблем в ходе тестирования на разных системах не обнаружил.
- на чем пишите?
- если не планируется сетевая версия, то вместо SQL можно использовать и базу Access, далее простейший пример на vb.net:

Код vb.net

...
‘ создаем и открываем подключение к нашей базе данных
Dim Con = New OleDb.OleDbConnection("Provider=Microsoft.Jet.OLED B.4.0;Data Source=" С:\Наша_База_Данных.mdb")

Con.Open()

‘ создаем запрос к таблице в нашей базе данных и получаем данные из нее
Dim DTMyData As New Data.DataTable
Dim DAMyData As OleDb.OleDbDataAdapter

DTMainData.Clear()
SqlCom = New OleDb.OleDbCommand("SELECT Столбец_N_1, Столбец_N_2, Столбец_N_3 FROM Наша_таблица_в_базе_данных", Con)
SqlCom.ExecuteNonQuery()
DAMyData = New OleDb.OleDbDataAdapter(SqlCom)
DAMyData.Fill(DTMyData)

...
‘ Далее с полученными данными из наше базы данных делаем все, что угодно, данные хранятся в DTMyData, к ним можно обращаться указав нумерацию строки и столбца (нумерация идет с нуля) – как то DTMyData.Rows(0)(1) – т.е. ячейка в строке с номером нуль, в столбце с номером 1.

If DTMyData.Rows(0)(0).ToString() = "True" Then

MyForm.Radio111Button.Checked = True

Else

MyForm.Radio222Button.Checked = True

End If
MyForm.MyTextBox111.Text = DTMyData.Rows(0)(1).ToString()
MyForm.MyTextBox222.Text = DTMyData.Rows(0)(2).ToString()

...
И т.д. и т.п.

- почему пользовательские документы создаются и хранятся в Program Files?
Не у всех есть возможность запускать программу от имени Администратора и соответственно вываливается ошибка при попытке создать документ.
- Как я понимаю документы создаются через Microsoft.Office.Interop.Word, стандартными методами самого Word - Find и Replace?
Раньше также делал, потом перешел на DocumentFormat.OpenXml и переделал с использованием Open XML Format SDK 2.5 и регулярных выражений, что позволило уменьшить время создания запросов на порядок (если не больше, а если еще знающему и умеющему человеку причесать код, так и вообще будет практически мгновенное делать )) ):

Код vb.net

...
wordDoc = WordprocessingDocument.Open("С:\Наш_шаблон.docx", True)
...
Using (wordDoc)

Dim docText As String = Nothing
Dim sr As StreamReader = New StreamReader(wordDoc.MainDocumentPart.GetStream)

Using (sr)

docText = sr.ReadToEnd

End Using

Dim regexText As Regex = New Regex("ТЕКСТ_КОТОРЫЙ_НАДО_ЗАМЕНИТЬ")

docText = regexText.Replace(docText, MyForm.MyTextBox_с_текстом_на_который_надо_заменит ь.Text.ToString)

...

Dim sw As StreamWriter = New StreamWriter(wordDoc.MainDocumentPart.GetStream(Fi leMode.Create))

Using (sw)

sw.Write(docText)

End Using

End Using

[AndrewA]

Здравствуйте!
VetroNet, спасибо, посмотрим!

SveT1iy,
- думали, что их уже почти не осталось...но как показала практика, пользователей xp много... в принципе фреймворк в студии меняется без проблем;
- c# ... но честно, подумываем переделать все под vb, потому что не получилось найти аналогичный вашему код на с#, да и есть схожая программа-образец для гражданской фирмы с БД, авторизацией и т.д.;
- доки создаются в папке с программой... мой косяк - забыл упомянуть, что необходимо ставить не в PF;
- да, вы правы, через него)

Спасибо за советы !!! При наличии свободного времени постараемся исправить и внести новое!

[katherina351]

Очень интересно, но скачать программы не смогла. Вы можете их заархивировать и прислать мне на почту?
a976845@yandex.ru

[AndrewA]

katherina351, прислал)

Заодно столкнулся с тем, что стандартный защитник виндоус может блокировать файл, указывая на наличие вируса. Проверил повторно файл касперским - все нормально (https://virusdesk.kaspersky.ru/). Как вариант решения - разрешить действие в нем или пользоваться нормальным антивирусом без него.

Обновил ссылки:
АРМ Следствие скачать https://yadi.sk/d/l8vkne_c3JFXkd
Конвертер показаний 3 in 1 скачать https://yadi.sk/d/7tUbulqr3DnM4b

Архив https://yadi.sk/d/TbBe1Fl03DMRGN

[SveT1iy]

Сообщение от AndrewA

- c# ... но честно, подумываем переделать все под vb, потому что не получилось найти аналогичный вашему код на с#, да и есть схожая программа-образец для гражданской фирмы с БД, авторизацией и т.д.;

C# "знаю" ооочень издалека (ну если к знаниям можно отнести пару удачных экспериментов с Arduino, там конечно же не C#, но можно сказать, что близко )) ), но все равно я уверен на все 146%, что аналогичный код есть и под C#. Там самое "сложное" - создание подключения, а загрузка/выгрузка/изменение данные через "SQL-запросы" (в Access иногда отличаются).
А переписывать все с C# на VB... Тяжело... Я б не стал. )))

[katherina351]

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

[SveT1iy]

AndrewA, если еще не передумали переделывать все под Vb.NET, то вот нашел решение для быстрого конвертирования кода C# в Vb.NET - SharpDevelop 4.4.
Открываете Ваш проект, далее правой кнопкой мыши на файле решения - Преобразовать - Из C# в Vb.NET.
Использовать именно версию SharpDevelop 4.4, в версии 5.0 уже нет такой функции.

[Trainer]

Интересно, попробую.

[AndrewA]

Сообщение от SveT1iy

AndrewA, если еще не передумали переделывать все под Vb.NET, то вот нашел решение для быстрого конвертирования кода C# в Vb.NET - SharpDevelop 4.4.
Открываете Ваш проект, далее правой кнопкой мыши на файле решения - Преобразовать - Из C# в Vb.NET.
Использовать именно версию SharpDevelop 4.4, в версии 5.0 уже нет такой функции.

Cпасибо!!! Попробую таким способом! Как раз сейчас время будет - займусь БД

[UUMprimor]

Сообщение от AndrewA

По поводу связывания - тут если честно не думали. К сожалению, со спецификой работы и наличием существующих АРМ у данных служб не знаком, но теоретически связать можно и необходим специалист по работе с БД, да и специалист по защите информации... ну и для связывания необходима локальная сеть, которая не везде есть. Ну и что-то мне подсказывает, не дадут официально на нее что-либо ставить. Хотя если это реализовать - получится просто шикарно в плане взаимодействия и обмена информацией...

Не думали, да и не напрягайтесь. Судя по "скорости" развития полиции из милиции, шикарная реализация - дело не близкого, похоже, будущего. Ведь практически для этого в каждом УМВД, нет даже каждом ОМВД должны быть должности сисадминов, в т.ч. способных обслуживать БД и по вопросам ее оптимизации и по вопросам информационной безопасности.

Вопрос взаимодействия служб и подразделений не так прост как кажется. Известно по личному опыту. Делал БД для следователя, электронный паспорт участка для УУП, БД по подучетному элементу для службы УУП, БД для ОУР по угнанному транспорту - у всех свои нюансы по поводу широты распространения накапливаемой информации. А вот общие сведения или аналитику каждый готов предоставить по запросу в виде той или иной формы отчета.

Поэтому пока лучше, ИМХО, сначала произвести хорошее изделие для одной службы. Тем более, что действительно лучше получается, когда делаешь БД для той службы, в которой работаешь.

[AndrewA]

АРМ Следствие 1.4.1 + конвертер показаний 1.4.2

Уважаемые пользователи! В программе присутствуют ошибки, так как почти не тестировалась. Просьба - активнее с пожеланиями и найденными ошибками!
Помимо этого, необходима помощь в создании шаблонов. Ситуация складывается таким образом, что функции есть, а шаблонов нет. Инструкция по их созданию ( https://vk.com/topic-136092865_34765592 )

- Напоминаем, для запуска необходимо установить Microsoft .NET Framework 4.5.2.
- Установка: желательно: удалить старую, предварительно сохранив папку систем и уголовные дела...если в папке шаблоны вы добавляли новые шаблоны или редактировали их, то и папку с шаблонами также необходимо сохранить и затем добавить их заново.

Изменения в АРМ Следствие:
- возможность работы с многоэпизодными делами;
- добавлена возможность просмотра краткой информации о деле и конкретных эпизодах;
- добавлены дополнительные вкладки со списками дел;
- добавлены вкладки для движения дел, созданы отдельные списки шаблонов для них;
- добавлена папка с подробными кодами для создания шаблонов;
- добавлена возможность ввода пароля (первая попытка усиления безопасности, в дальнейшем - субд);
- местами обновлен интерфейс;

Изменения в Конвертере показаний:
- обновленный интерфейс и пкм;
- добавлены слова для замены;

Cкачать - https://yadi.sk/d/4n63SDNH3LiaG9

Изображения

[Sandal]

как по мне, так все эти АРМы - полная ..ня. Хочу такой АРМ, в который загрузил, как в ксерокс, документы, а тебе на выходе уголовное дело подшитое с описью и анализом доказательств вылазит, да еще и с комментариями по квалификации деяния))

[LVZ032]

И нах тогда ты нужОн, а? Подпись сейчас и мафЫнка мож поставить.

[Sandal]

Мне бумагу не дают, дрель не дают.. компьютеры и принтеры не ремонтируют.. нах тогда эта система снабжения и обеспечения и прочее, а? и нах мне этот АРМ тогда?
А вообще грусть-печаль.. но мы еще поборемся