Наглядно показать пользователю, какие числа есть в базе, а каких нет

________ · Регистрация: 07.01.2014

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

Есть таблица, в ней могут быть только от 1 до 100.

Пусть будет

num

1

5

55

Я хочу, что бы пользователь видел наглядно, какие числа есть, а каких нет.

Например:
1. Есть
2. Нет
3. Нет
4. Нет
5. Есть
6. Нет
.....
55. Есть

Где в аксессе это можно реализовать? В форме? Отчёте? или в страничках html?

Просто на php + html это бы быстро писалось....
Через цикл for от 1 до 100 + запрос select ... where num = $i
и если получаем ответ от базы, значит echo "$i. Есть"
иначе echo "$i. Нет"

Но имеем только аксесс. Подскажите, как это примерно реализовать?

Хочу именно как в моём примере, а не
Есть: 1,5,55
Нет: 2,3,4....
^^ такой вариант не устроит

@Eugene-LS · 19.03.2018, 20:35

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

Я хочу, что бы пользователь видел наглядно, какие числа есть, а каких нет.

Так и покажите ему таблицу со значениями (имеющимися).
Честно говоря не понял смысл ухищрения.
Или нужно проверять отдельный список в форме, и сверять его с другим - так и пишите.
По секрету ...

Есть функция DLoolUp()

________ · 19.03.2018, 20:45 **[ТС]**

Не совсем, нужно именно отобразить так, как в моём примере... Там как бы немного более глубокий смысл есть )))

Я бы хотел отображать именно графически, как бы я сделал в php+html

PHP
1
2
3
4
5
6
7
8
for ($i=1;$i>=100;$i++){
 
$q="select num from num where num = $i";
 
if ($q >=1){ echo "<green>$i. Есть такой номер!!!</green><br />";
}else{ echo "<red>$i. Нет такого номера!!!</red><br />"; }
 
}

Вот мне нужно именно так вывести информацию для пользователя, для моей конкретной задачи (немного более сложной) именно так будет информативные.
На пхп то это просто, а как в аксессе это сделать?

@Eugene-LS · 19.03.2018, 20:51

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

Я бы хотел отображать именно графически, как бы я сделал в php+html

А понял! Значится "графически" отображать ...

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

нужно именно отобразить так, как в моём примере...

А где пример?
Почитайте пожалуйста Правила раздела, и выполняйте их.

________ · 19.03.2018, 20:52 **[ТС]**

Сообщение от Eugene-LS

А где пример?

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

Я хочу, что бы пользователь видел наглядно, какие числа есть, а каких нет.
Например:
1. Есть
2. Нет
3. Нет
4. Нет
5. Есть
6. Нет
.....
55. Есть

Где в аксессе это можно реализовать? В форме? Отчёте? или в страничках html?

В первом сообщении указал же.

@Eugene-LS · 19.03.2018, 21:00

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

как бы я сделал в php+html

Это напишет таблицу в 100 строк (код на PHP) и сверится с таблицей "num" на предмет наличия номера в ней.
В MSA - придётся создавать временную таблицу (от 1 до 100) и маркировать в ней записи по наличию совпадений в таблице "num" .
Не сложно.

Добавлено через 1 минуту

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

Где в аксессе это можно реализовать? В форме? Отчёте? или в страничках html?

И в форме и в отчёте возможно.
Извините задачка, у вас, не тривиальная, не сразу "вкурил" что вам надо.

@Панург · 19.03.2018, 21:10

________,

@Eugene-LS · 19.03.2018, 21:27

________, аппаздал !

Ну раз уж делал - вот вам ещё один вариант:
(выбирайте на вкус)

@Eugene-LS · 19.03.2018, 22:02

________, какой у вас шикарный Ник! (аж завидно)
А вот вам ещё вариант (близко к тому что сотворил уважаемый Панург, но немного иначе):

@Eugene-LS · 19.03.2018, 22:13

________, и ещё:
Добавте "LIMIT 1" в свою строку

T-SQL
1
$q="select num from num where num = $i";

Будет пошустрее - Я так думаю

T-SQL
1
$q="select num from num where num = $i LIMIT 1";

________ · 20.03.2018, 11:28 **[ТС]**

Спасибо всем за ваши предложения, немного нового для себя узнал...

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

Вообщем сегодня вспомнил то, где это делается...

Это реализуется через страницы доступа (на скрине).

Теперь есть ещё вопрос, подскажите, кто с ними работал, какой там класс/функция выполняет запрос к БД?

т.е в редакторе сценариев, где пишем vbscript...

типа
document.writeln("test")

Дак вот, мне нужно из страницы доступа обратиться к БД с запросом, и ответ записать в переменную.

execute не подходит...

а currentproject.connection.execute(strsql ).field(0) не работает там.

@Панург · 20.03.2018, 12:33

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

Это реализуется через страницы доступа (на скрине).

Не поддерживается уже. В IE 8 и старше не работает (без бубна, да и с бубном тоже).

________ · 21.03.2018, 11:09 **[ТС]**

Ураа! Всё заработало )) На забугорном сайте нашёл пример скрипта.

Visual Basic
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
Dim connStr, objConn, getNames
'''''''''''''''''''''''''''''''''''''
'Define the driver and data source
'Access 2007, 2010, 2013 ACCDB:
'Provider=Microsoft.ACE.OLEDB.12.0
'Access 2000, 2002-2003 MDB:
'Provider=Microsoft.Jet.OLEDB.4.0
''''''''''''''''''''''''''''''''''''''
connStr = "Provider=Microsoft.Jet.OLEDB.4.0; Data Source=C:\Users\username\Desktop\example\example.mdb"
 
'Define object type
Set objConn = CreateObject("ADODB.Connection")
 
'Open Connection
objConn.open connStr
 
'Define recordset and SQL query
Set rs = objConn.execute("SELECT Fname FROM people")
 
'While loop, loops through all available results
DO WHILE NOT rs.EOF
'add names seperated by comma to getNames
getNames = getNames + rs.Fields(0) & ","
'move to next result before looping again
'this is important
rs.MoveNext
'continue loop
Loop
 
'Close connection and release objects
objConn.Close
Set rs = Nothing
Set objConn = Nothing
 
'Return Results via MsgBox
MsgBox getNames

т.е. переменная rs.Fields(0) будет содержать значение запроса. Если ответов будет несколько, то обращаться к ним

rs.Fields(0)
rs.Fields(1)

... в цикле фор (получив заранее количество строк), или в вайле.

Всем спасибо.

Новые блоги и статьи Все статьи Все блоги /
SDL3 для Web (WebAssembly): Обработчик клика мыши в браузере ПК и касания экрана в браузере на мобильном устройстве 8Observer8 02.02.2026 Содержание блога Для начала пошагово создадим рабочий пример для подготовки к экспериментам в браузере ПК и в браузере мобильного устройства. Потом напишем обработчик клика мыши и обработчик. . .	Философия технологии iceja 01.02.2026 На мой взгляд у человека в технических проектах остается роль генерального директора. Все остальное нейронки делают уже лучше человека. Они не могут нести предпринимательские риски, не могут. . .	SDL3 для Web (WebAssembly): Вывод текста со шрифтом TTF с помощью SDL3_ttf 8Observer8 01.02.2026 Содержание блога В этой пошаговой инструкции создадим с нуля веб-приложение, которое выводит текст в окне браузера. Запустим на Android на локальном сервере. Загрузим Release на бесплатный. . .	SDL3 для Web (WebAssembly): Сборка C/C++ проекта из консоли 8Observer8 30.01.2026 Содержание блога Если вы откроете примеры для начинающих на официальном репозитории SDL3 в папке: examples, то вы увидите, что все примеры используют следующие четыре обязательные функции, а. . .
SDL3 для Web (WebAssembly): Установка Emscripten SDK (emsdk) и CMake для сборки C и C++ приложений в Wasm 8Observer8 30.01.2026 Содержание блога Для того чтобы скачать Emscripten SDK (emsdk) необходимо сначало скачать и уставить Git: Install for Windows. Следуйте стандартной процедуре установки Git через установщик. . . .	SDL3 для Android: Подключение Box2D v3, физика и отрисовка коллайдеров 8Observer8 29.01.2026 Содержание блога Box2D - это библиотека для 2D физики для анимаций и игр. С её помощью можно определять были ли коллизии между конкретными объектами. Версия v3 была полностью переписана на Си, в. . .	Инструменты COM: Сохранение данный из VARIANT в файл и загрузка из файла в VARIANT bedvit 28.01.2026 Сохранение базовых типов COM и массивов (одномерных или двухмерных) любой вложенности (деревья) в файл, с возможностью выбора алгоритмов сжатия и шифрования. Часть библиотеки BedvitCOM Использованы. . .	SDL3 для Android: Загрузка PNG с альфа-каналом с помощью SDL_LoadPNG (без SDL3_image) 8Observer8 28.01.2026 Содержание блога SDL3 имеет собственные средства для загрузки и отображения PNG-файлов с альфа-каналом и базовой работы с ними. В этой инструкции используется функция SDL_LoadPNG(), которая. . .

________ 4 / 4 / 3 Регистрация: 07.01.2014 Сообщений: 66
	20.03.2018, 11:28 [ТС]
	Спасибо всем за ваши предложения, немного нового для себя узнал... Но в моей задаче всё же нужно делать так, как я описывал... Вообщем сегодня вспомнил то, где это делается... Это реализуется через страницы доступа (на скрине). Теперь есть ещё вопрос, подскажите, кто с ними работал, какой там класс/функция выполняет запрос к БД? т.е в редакторе сценариев, где пишем vbscript... типа document.writeln("test") Дак вот, мне нужно из страницы доступа обратиться к БД с запросом, и ответ записать в переменную. execute не подходит... а currentproject.connection.execute(strsql ).field(0) не работает там. Миниатюры 0