Форум программистов, компьютерный форум, киберфорум
Visual Basic
Войти
Регистрация
Восстановить пароль
Блоги Сообщество Поиск Заказать работу  
 
Рейтинг 4.55/11: Рейтинг темы: голосов - 11, средняя оценка - 4.55
0 / 0 / 1
Регистрация: 14.12.2011
Сообщений: 23

Запись данных в столбец, созданный SQL-запросом

11.03.2012, 12:21. Показов 2364. Ответов 7
Метки нет (Все метки)

Студворк — интернет-сервис помощи студентам
Вот такая задача в Visual Basic
Нужно по запросу вывести некоторые Поля данных (с чем проблем само собой нет) и создать новый столбец, который в самой БД не нужен.
Программа будет записывать в Новый столбец исходя из других данных в строке

Я пробовал сделать например так

SQL
1
2
3
SELECT 0 AS Name, ...
FROM [Таблица] 
WHERE ...
Столбец без проблем создается. Сам запрос отображается в объекте DBGrid (хотя можно взять другой вид, если необходимо)
Но как организовать запись в ячейки поля Name? Или сделать другим способом?
0
Programming
Эксперт
39485 / 9562 / 3019
Регистрация: 12.04.2006
Сообщений: 41,671
Блог
11.03.2012, 12:21
Ответы с готовыми решениями:

Как SQL запросом запустить на выполнение заранее созданный Local Package DTS?
Это вообще возможно?

Запись в базу SQL с запросом Inser into.select.where
Доброго времени суток! Возник вопрос по добавлении данный в базу с вложенным запросом select * Есть две таблице в базе 1- Таблица -...

Запись файла в BLOB поле SQL запросом
Имеется код для записи файла в BLOB поле с помощью ADOTable ADOTable2->Active=true; ADOTable2->Append(); TMemoryStream *M = new...

7
 Аватар для coderxx
469 / 183 / 16
Регистрация: 25.02.2012
Сообщений: 418
Записей в блоге: 2
11.03.2012, 22:24
Цитата Сообщение от Леонард Посмотреть сообщение
Но как организовать запись в ячейки поля Name? Или сделать другим способом?
Почему нужен запись? В добавленных полях (например, твой Name) можно отобразить любые выражение (например, Field1 & ' ' & Field2 As Name).
0
0 / 0 / 1
Регистрация: 14.12.2011
Сообщений: 23
12.03.2012, 11:59  [ТС]
Цитата Сообщение от coderxx Посмотреть сообщение
например, Field1 & ' ' & Field2 As Name
Если я правильно понял такая запись вобьет во все строки одно и тоже.
Здесь вся суть чтобы программа ввела в каждую строку созданного поля свое значение, исходя из значений в других полях, а также от введенных значений пользователя.
0
 Аватар для Alex77755
11525 / 3812 / 683
Регистрация: 13.02.2009
Сообщений: 11,229
12.03.2012, 13:38
Сам запрос отображается в объекте DBGrid
Можно не отображать запрос в гриде, а обрабатывать и записывать результаты в грид
Типа:

Visual Basic
1
2
3
4
 For R= 1 to Recordset.RecordCount
' A тут обрабатываешь данные из строки запроса с учётом других данных и записываешь в грид 
 Recordset.MoveNext
 next R
0
0 / 0 / 1
Регистрация: 14.12.2011
Сообщений: 23
12.03.2012, 17:28  [ТС]
Цитата Сообщение от Alex77755 Посмотреть сообщение
Можно не отображать запрос в гриде, а обрабатывать и записывать результаты в грид
Почему то заполнить одну ячейку получается в Grid. Но на остальные нет реакции

Visual Basic
1
DBGrid1.Colums("Имя_Столбца").Value = "Значение"
Сразу оговорюсь, что я не создавал всю таблицу заново в Grid, а генерировал ее SQL запросом.
Попробую разобраться в MSFlexGrid, она вроде к этому более расположена (а может и нет особой разницы)
0
 Аватар для coderxx
469 / 183 / 16
Регистрация: 25.02.2012
Сообщений: 418
Записей в блоге: 2
12.03.2012, 20:35
Цитата Сообщение от Леонард Посмотреть сообщение
Если я правильно понял такая запись вобьет во все строки одно и тоже.
Здесь вся суть чтобы программа ввела в каждую строку созданного поля свое значение, исходя из значений в других полях
Нет, значение выражение для каждой записи (строки) по разному же, в моем примере запрос можеть вытаскивать, например, так: Иванов Иван, Павлов Павел и др. (Если Field1 это фамилия, а Field2 это имя)
Цитата Сообщение от Леонард Посмотреть сообщение
а также от введенных значений пользователя
Данные пользователя можно включать в запрос.
Добавлено через 19 минут
Цитата Сообщение от Леонард Посмотреть сообщение
Почему то заполнить одну ячейку получается в Grid. Но на остальные нет реакции
Visual Basic
1
DBGrid1.Colums("Имя_Столбца").Value = "Значение"
Тут неправильно устанавливается значение.
Для установки текста нужно сделать так:
Visual Basic
1
2
3
DBGrid1.Row = 5
DBGrid1.Col = 3
DBGrid1.Text = "My text"
0
 Аватар для Alex77755
11525 / 3812 / 683
Регистрация: 13.02.2009
Сообщений: 11,229
12.03.2012, 21:05
В в MSFlexGrid это будет выглядеть так:
Visual Basic
1
MSFlexGrid.TextMatrix(строка,столбец)=Recordset.Field(столбец)' если в запросе не один столбец
Предварительно(хотя можно и в цикле добавлять по строке к гриду) установить количество строк равным количестве записей Recordset
0
0 / 0 / 1
Регистрация: 14.12.2011
Сообщений: 23
13.03.2012, 10:36  [ТС]
Всем спасибо за советы.
Заработало
0
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
inter-admin
Эксперт
29715 / 6470 / 2152
Регистрация: 06.03.2009
Сообщений: 28,500
Блог
13.03.2012, 10:36
Помогаю со студенческими работами здесь

Нужно SQL-запросом вернуть самую последнюю добавленную запись
Нужно SQL-запросом вернуть самую последнюю добавленную запись. Такой вариант нормальный? SELECT `message`, `reply` FROM `chat` WHERE `id`...

Запись данных консоли в созданный ранее файл
Как записать все ,что вывела консоль в текстовый файл ,например на диске D?

Вставка в объединённые ячейки данных запросом SQL
в объединённую ячейку запросом SQL вставляю данные. В результате снимаеться объединение и слетают форматы. Что делать? В качестве адреса...

Проверить sql-запросом на существование колонки в базе данных
Подскажите как можно проверить sql запросом на сущевствование колонки в базе данных.

Создание формы для получения данных запросом SQL
Если правильно сформулировать задание, то, нужно создать форму, в которой есть поле для ввода SQL кода (SELECT ...), чтобы: 1. получить...


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
8
Ответ Создать тему
Новые блоги и статьи
Контроль заполнения и очистка дат в зависимости от значения перечислений
Maks 12.04.2026
Алгоритм из решения ниже реализован на примере нетипового документа "ПланированиеПерсонала", разработанного в конфигурации КА2. Задача: реализовать контроль корректности заполнения дат назначения. . .
Архитектура слоя интернета для сервера-слоя.
Hrethgir 11.04.2026
В продолжение https:/ / www. cyberforum. ru/ blogs/ 223907/ 10860. html Знаешь что я подумал? Раз мы все источники пишем в голове ветки, то ничего не мешает добавить в голову такой источник, который сам. . .
Подстановка значения реквизита справочника в табличную часть документа
Maks 10.04.2026
Алгоритм из решения ниже реализован на примере нетипового документа "ПланированиеПерсонала", разработанного в конфигурации КА2. Задача: при выборе сотрудника (справочник Сотрудники) в ТЧ документа. . .
Очистка реквизитов документа при копировании
Maks 09.04.2026
Алгоритм из решения ниже применим как для типовых, так и для нетиповых документов на самых различных конфигурациях. Задача: при копировании документа очищать определенные реквизиты и табличную. . .
модель ЗдравоСохранения 8. Подготовка к разному выполнению заданий
anaschu 08.04.2026
https:/ / github. com/ shumilovas/ med2. git main ветка * содержимое блока дэлэй из старой модели теперь внутри зайца новой модели 8ATzM_2aurI
Блокировка документа от изменений, если он открыт у другого пользователя
Maks 08.04.2026
Алгоритм из решения ниже реализован на примере нетипового документа, разработанного в конфигурации КА2. Задача: запретить редактирование документа, если он открыт у другого пользователя. / / . . .
Система безопасности+живучести для сервера-слоя интернета (сети). Двойная привязка.
Hrethgir 08.04.2026
Далее были размышления о системе безопасности. Сообщения с наклонным текстом - мои. А как нам будет можно проверить, что ссылка наша, а не подделана хулиганами, которая выбросит на другую ветку и. . .
Модель ЗдрввоСохранения 7: больше работников, больше ресурсов.
anaschu 08.04.2026
работников и заданий может быть сколько угодно, но настроено всё так, что используется пока что только 20% kYBz3eJf3jQ
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2026, CyberForum.ru