Planet Source Code Jumbo Resource CDs

@Argus19 · Регистрация: 24.09.2017

Студворк — интернет-сервис помощи студентам

Иностранные трудящиеся провели вот такую работу:
https://www.vbforums.com/showt... source-CDs
Вопрос: как поступим мы?

@Argus19 · 15.10.2020, 08:57 **[ТС]**

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

Зачем вы это делаете?

Для истории. Чтобы сохранить чужой труд.

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

Не понял как работает поиск по базе. Кнопка активна только при выборе конкретного названия.

К тому времени, когда кнопка активируется, загружены категории.
Вписываете слово-шаблон поиска и идёт поиск по всей базе.
Поиск по категориям пока преждевременен, т.к. некоторые заявленные категории никак не используются. Видимо, сделаны "на вырост".

@Pro_grammer · 15.10.2020, 13:21

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

идёт поиск по всей базе.

Это хорошо.
А поиск только по названию, описание не используется в поиске?

@Pro_grammer · 15.10.2020, 13:39

Сейчас сравнил с моей программой. Как то всё же неверно работает поиск у вас.

Это у меня подключено только за один 2004 год, и то больше нашла файлов!
А у вас по всей базе должно быть гораздо больше.

@Argus19 · 15.10.2020, 17:22 **[ТС]**

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

Как то всё же неверно работает поиск у вас.

Я использую простой код:

Visual Basic
1
2
3
4
FindStr = Text2.Text
'Считываю поля bD
    If InStr(rs!Title, FindStr) Then
        List1.AddItem rs!Title   'Записываем в list1 все поля Title, соответствующие шаблону поиска.

@Argus19 · 15.10.2020, 17:42 **[ТС]**

Изменил строку

Visual Basic
1
     If InStr(1, rs!Title, FindStr, 1) Then

Теперь находит 17 названий.

@Pro_grammer · 15.10.2020, 17:58

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

Я использую простой код

Понятно, у вас в поиске учитывается регистр символов.
Можно всё переводить в нижний регистр - строку для поиска и запрос.
Но это не наш метод. Вы работаете с Базой Данных! Она заточена для быстрого доступа к данным, и поиск её конёк.
Запрос на поиск в Submission по 2-м полям Description и Title делается так:
"Select * From Submission WHERE Description AND Title LIKE '%" & FindStr & "%'"

@Argus19 · 15.10.2020, 18:15 **[ТС]**

Pro_grammer, спасибо.
У меня в голове ещё не всё устаканилось.
1). информация взята с иностранного форума, то и программу сделал в иностранном виде.
2). Образ надо дополнить до полного объёма DVD. Вариантов два:
а). Соблюсти традицию и дополнять БД на английском;
б). Дополнять её на русском.
поэтому, двуязычный поиск будет мудрёно сделать.
3). В БД хватает текстов, форматированный тэгами HTML, но при открытии их в браузере по умолчанию, текст всё-равно выглядит текстом.
4). Нам никто не запрещает добавлять дополнения в формате .doc или .pdf.

@Pro_grammer · 15.10.2020, 18:26

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

поэтому, двуязычный поиск будет мудрёно сделать.

C помощью этого запроса без разницы, можно на любом языке. Единственно что, это должен быть UTF8
Вообще нужен не примитивный запрос по 1 слову, а сложный. Как в гугле или яндексе, с исключениями слов, неточным поиском и т.д. БД позволяют, нужно только изучить такие запросы.
Без хорошего поиска БД практически бесполезна. Искать на удачу среди десятков тысяч записей напрасный труд.

@Argus19 · 15.10.2020, 18:41 **[ТС]**

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

Искать на удачу среди десятков тысяч записей напрасный труд.

Тогда надо думать, как реализовать механизм, используемый поисковыми роботами. Вряд ли программисты Яндекса захотят поделиться кодом или алгоритмом.

@Pro_grammer · 15.10.2020, 19:30

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

Вряд ли программисты Яндекса захотят поделиться кодом или алгоритмом.

Зачем нам их алгоритмы? Все возможности поисковых запросов по БД известны и подробно расписаны.
Например вот

@Argus19 · 15.10.2020, 19:37 **[ТС]**

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

Зачем нам их алгоритмы?

Они неизбежно должны быть многоходовыми, т.е. искать не простое вхождение строки в строки, а и семантический поиск, т.к. у слов и фраз бывает несколько значений, плюс поиск с учётом перевода на другие языки.

@Pro_grammer · 16.10.2020, 06:16

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

т.е. искать не простое вхождение строки в строки, а и семантический поиск, т.к. у слов и фраз бывает несколько значений, плюс поиск с учётом перевода на другие языки.

Не залезая в дебри лингвистики и естественно на языке оригинала,- не вижу смысла поиска по-русски, если база на английском.
Сейчас мы имеем поиск по точному вхождению цитаты.
А хотелось бы хотя бы элементарный язык запросов.
Например:

Пробел – это оператор «И», вхождение указанных слов в любом порядке;

()— запрос в кавычках, это поиск по точному вхождению цитаты, что есть сейчас;

| — оператор «или», разделяет два слова для поиска хотя бы одного из них;

- — минус исключает слово из поиска;

@Argus19 · 16.10.2020, 06:25 **[ТС]**

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

А хотелось бы хотя бы элементарный язык запросов.

Сейчас сделано просто, "как утюг":

Visual Basic
1
2
3
4
5
6
7
8
9
10
11
12
Private Sub Command4_Click()           'Search
FindStr = Text2.Text
    List1.Clear
        Set rs = conn.Execute("SELECT [Title] FROM Submission")
    Do While Not rs.EOF
     If InStr(1, rs!Title, FindStr, 1) Then
        List1.AddItem rs!Title   'Записываем в list1 все поля Title, соответствующие шаблону поиска.
        End If
           rs.MoveNext
    Loop
    MsgBox "Done"
End Sub

1). Что предлагаете?
2). В посте №16 я дал ссылку на извлечённые VB коды из утечки от Майкрософта. Я не настолько силён в понимании чужих кодов, тем более системных, чтобы сделать вывод, стоит ли их разместить в предполагаемом диске.

@Argus19 · 18.10.2020, 14:57 **[ТС]**

Дополнил поиск по полям "Title" и "Description", удалил из БД имена отсутствующих скриншотов, добавил текстовой информации.
Кнопка "Поиск" всегда активна.
https://drive.google.com/file/... sp=sharing

@UBUNTU · 19.10.2020, 19:20

Argus19,

1. Нажал на ZIP и ошибка на скрине приложил.
2. Сожмите базу данных, минус 10 мегабайт получите. Там прям в аксесе.
3. А почему все поля MEMO?

@Argus19 · 19.10.2020, 19:28 **[ТС]**

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

1. Нажал на ZIP и ошибка на скрине приложил

Как это называется и в какой категории находится? Чтобы со крина не набивать.

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

2. Сожмите базу данных, минус 10 мегабайт получите. Там прям в аксесе.

Работа ещё не закончена.

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

3. А почему все поля MEMO?

Потому, что в поля с текстовым форматом нельзя записать информацию длиннее 255 байт.

@UBUNTU · 19.10.2020, 19:35

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

нельзя записать информацию длиннее 255 байт

я думал вы весь сайт выкачали и себе сделали зеркало )

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

Как это называется и в какой категории находится? Чтобы со крина не набивать.

да на любом из примеров где активный ZIP горит нажимаю я так понимаю должен пример скачаться, но нет. или я не так понял.

@Argus19 · 19.10.2020, 19:41 **[ТС]**

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

или я не так понял.

В посте №34 только дополнения. Ими надо заменить соответствующие папки в .iso из Поста №18.
И это уже не совсем актуально, т.к. работа продолжается.

@Argus19 · 25.10.2020, 09:05 **[ТС]**

Дополнил .iso. Выглядит так:
https://drive.google.com/file/... sp=sharing

@Argus19 · 17.11.2020, 07:23 **[ТС]**

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

Сейчас мы имеем поиск по точному вхождению цитаты.

У вас не появились идеи более удобной реализации поиска?

Новые блоги и статьи Все статьи Все блоги /
Нейросеть на алгоритме "эстафета хвоста" как перспектива. Hrethgir 06.05.2026 На десерт, когда запущу сервер. Статья тут https:/ / habr. com/ ru/ articles/ 1030914/ . Автор я сам, нейросеть только помогает в вопросах которые мне не известны - не знаю людей которые знали-бы. . .	Асинхронный приём данных из COM-порта Argus19 01.05.2026 Асинхронный приём данных из COM-порта Купил на aliexpress термопринтер QR701. Он оказался странным. Поключил к Arduino Nano. Был очень удивлён. Наотрез отказывается печатать русские буквы. Чтобы. . .	попытка написать игровой сервер на C++ pyirrlicht 29.04.2026 попытка написать игровой сервер на плюсах с открытым бесконечным миром. возможно получится прикрутить интерпретатор питон для кастомизации игровой логики. что есть на текущий момент:. . .	Контроль уникальности выбранного документа-основания при изменении реквизита Maks 28.04.2026 Алгоритм из решения ниже разработан на примере нетипового документа "ЗаявкаНаРемонтСпецтехники", разработанного в КА2. Задача: уведомлять пользователя, если указанная заявка (документ-основание). . .
Благородство как наказание Maks 24.04.2026 У хорошего человека отношения с женщинами всегда складываются трудно. А я человек хороший. Заявляю без тени смущения, потому что гордиться тут нечем. От хорошего человека ждут соответствующего. . .	Валидация и контроль данных табличной части документа перед записью Maks 22.04.2026 Алгоритм из решения ниже реализован на примере нетипового документа, разработанного в КА2. Задача: контроль и валидация данных табличной части документа перед записью с учетом регламента компании. . .	Отчёт о затраченных материалах за определенный период с макетом печатной формы Maks 21.04.2026 Отчёт из решения ниже размещён в конфигурации КА2. Задача: разработка отчёта по затраченным материалам за определённый период, с возможностью вывода печатной формы отчёта с шапкой и подвалом. В. . .	Отчёт о спецтехнике находящейся в ремонте Maks 20.04.2026 Отчёт из решения ниже размещен в конфигурации КА2. Задача: отобразить спецтехнику, которая на данный момент находится в ремонте. Есть нетиповой документ "Заявка на ремонт спецтехники" который. . .

@Argus19 1442 / 459 / 78 Регистрация: 24.09.2017 Сообщений: 2,541 Записей в блоге: 24

	Planet Source Code Jumbo Resource CDs 13.09.2020, 13:57. Показов 11741. Ответов 73 Метки нет (Все метки) Иностранные трудящиеся провели вот такую работу: https://www.vbforums.com/showt... source-CDs Вопрос: как поступим мы? 0

@Pro_grammer 6807 / 2839 / 527 Регистрация: 24.04.2011 Сообщений: 5,308 Записей в блоге: 10
	15.10.2020, 13:39
	Сейчас сравнил с моей программой. Как то всё же неверно работает поиск у вас. Это у меня подключено только за один 2004 год, и то больше нашла файлов! А у вас по всей базе должно быть гораздо больше. 0

@Argus19 1442 / 459 / 78 Регистрация: 24.09.2017 Сообщений: 2,541 Записей в блоге: 24
	15.10.2020, 18:15 [ТС]
	Pro_grammer, спасибо. У меня в голове ещё не всё устаканилось. 1). информация взята с иностранного форума, то и программу сделал в иностранном виде. 2). Образ надо дополнить до полного объёма DVD. Вариантов два: а). Соблюсти традицию и дополнять БД на английском; б). Дополнять её на русском. поэтому, двуязычный поиск будет мудрёно сделать. 3). В БД хватает текстов, форматированный тэгами HTML, но при открытии их в браузере по умолчанию, текст всё-равно выглядит текстом. 4). Нам никто не запрещает добавлять дополнения в формате .doc или .pdf. 0

@Argus19 1442 / 459 / 78 Регистрация: 24.09.2017 Сообщений: 2,541 Записей в блоге: 24
	18.10.2020, 14:57 [ТС]
	Дополнил поиск по полям "Title" и "Description", удалил из БД имена отсутствующих скриншотов, добавил текстовой информации. Кнопка "Поиск" всегда активна. https://drive.google.com/file/... sp=sharing 0

@UBUNTU 352 / 213 / 42 Регистрация: 04.02.2015 Сообщений: 1,344
	19.10.2020, 19:20
	Argus19, 1. Нажал на ZIP и ошибка на скрине приложил. 2. Сожмите базу данных, минус 10 мегабайт получите. Там прям в аксесе. 3. А почему все поля MEMO? Миниатюры 0

@Argus19 1442 / 459 / 78 Регистрация: 24.09.2017 Сообщений: 2,541 Записей в блоге: 24
	25.10.2020, 09:05 [ТС]
	Дополнил .iso. Выглядит так: https://drive.google.com/file/... sp=sharing 1