Форум программистов, компьютерный форум, киберфорум
Наши страницы
Delphi для начинающих
Войти
Регистрация
Восстановить пароль
 
 
Рейтинг 4.67/6: Рейтинг темы: голосов - 6, средняя оценка - 4.67
FierySoul
0 / 0 / 0
Регистрация: 21.04.2015
Сообщений: 161
#1

Запрос на вывод наименований столбцов в таблице

10.04.2016, 20:43. Просмотров 1118. Ответов 40
Метки нет (Все метки)

SQL
1
SELECT * FROM Kursovaya.columns WHERE dogovor
Выдает ошибку
0
Миниатюры
Запрос на вывод наименований столбцов в таблице  
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
Similar
Эксперт
41792 / 34177 / 6122
Регистрация: 12.04.2006
Сообщений: 57,940
10.04.2016, 20:43
Ответы с готовыми решениями:

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

Как сделать запрос к таблице созданной на винте?
Я создал таблицу в базе данных, но не на сервере а на своем компе. Пытаюсь...

Цикл наименований компонентов
Как перечислить циклом наименование компонентов? Например, Label: ...

Запрос на сравнение значений 2х столбцов в одной таблице
Помогите создать запрос в MySql. Есть таблица со столбцами id1 и id2. Нужно...

Каков должен быть в MsAccess SQL-запрос, чтобы подсчитать количество столбцов (полей) в таблице?
Всем привет! Каков должен быть в MsAccess SQL-запрос, чтобы подсчитать...

40
qwertehok
2210 / 2199 / 599
Регистрация: 29.08.2013
Сообщений: 14,678
11.04.2016, 17:05 #21
а
Delphi
1
  ADOConnection1.GetFieldNames();
уже не работает?
1
FierySoul
0 / 0 / 0
Регистрация: 21.04.2015
Сообщений: 161
11.04.2016, 17:16  [ТС] #22
Цитата Сообщение от qwertehok Посмотреть сообщение
уже не работает?
я от вас об этом узнал
0
qwertehok
2210 / 2199 / 599
Регистрация: 29.08.2013
Сообщений: 14,678
11.04.2016, 17:24 #23
это похвально что вы пытаетесь что-то свое написать
но очень печально что доки никто не читает и свойства не смотрит
0
FierySoul
0 / 0 / 0
Регистрация: 21.04.2015
Сообщений: 161
11.04.2016, 17:27  [ТС] #24
qwertehok,
Delphi
1
2
3
4
5
6
7
8
9
10
11
begin
With DataModule2.ADOQuery1 do
begin
Active:=false;
SQL.Clear;
SQL.append('SELECT Arendator.ID_arendator AS [ID Арендатора], Arendator.Nazvanie AS Название , Arendator.INN AS ИНН, Arendator.OGRN AS ОГРН, Arendator.director AS Директор, Arendator.telefon AS Телефон FROM Arendator WHERE :p1 = :p2;');
parameters.parambyname('p1').value:=Integer(Combobox2.Items.Objects[Combobox2.ItemIndex]);
parameters.parambyname('p2').value:=Edit2.text;
Showmessage(DataModule2.ADOQuery1.sql.text);
Active:=true;
end;
Почему они не видит параметры?
0
Миниатюры
Запрос на вывод наименований столбцов в таблице  
FierySoul
0 / 0 / 0
Регистрация: 21.04.2015
Сообщений: 161
11.04.2016, 17:31  [ТС] #25
Цитата Сообщение от qwertehok Посмотреть сообщение
это похвально что вы пытаетесь что-то свое написать
но очень печально что доки никто не читает и свойства не смотрит
Просто нам дают задание, а как вы его сделаете и знаете как делать или нет их не волнует.
0
qwertehok
2210 / 2199 / 599
Регистрация: 29.08.2013
Сообщений: 14,678
11.04.2016, 17:35 #26
а вы не можете почитать книжку по ADO или посмотреть в подсказке имеющиеся свойства?
вам нужен готовый код?

а на работе придет начальник и скажет мне нужен отчет вот такой-то. я вот его уже написал, откомпилируй и сдай как свой. я тебе за это заплачу.
0
FierySoul
0 / 0 / 0
Регистрация: 21.04.2015
Сообщений: 161
11.04.2016, 17:48  [ТС] #27
Цитата Сообщение от qwertehok Посмотреть сообщение
а вы не можете почитать книжку по ADO или посмотреть в подсказке имеющиеся свойства?
вам нужен готовый код?
Нет, код не нужен. Просто не могу понять где ошибся. В интернете нашел конструкцию запроса, но тут уже данные известны, но мне нужно взять параметры из комбобокса и эдита
0
qwertehok
2210 / 2199 / 599
Регистрация: 29.08.2013
Сообщений: 14,678
11.04.2016, 17:50 #28
в чем у вас сейчас проблема?
0
FierySoul
0 / 0 / 0
Регистрация: 21.04.2015
Сообщений: 161
11.04.2016, 17:55  [ТС] #29
Цитата Сообщение от qwertehok Посмотреть сообщение
в чем у вас сейчас проблема?
Видимо в коде допустил ошибку скорее всего после WHERE, т.к. результатом запроса является пустая таблица, но данные вводил в поиск с помощью ctrl+c and ctrl+v и при
Delphi
1
Showmessage(DataModule2.ADOQuery1.sql.text);
он показывает 1 = 2, а не данные из комбобокса и эдита.
Delphi
1
2
3
4
5
6
7
8
9
10
11
begin
With DataModule2.ADOQuery1 do
begin
Active:=false;
SQL.Clear;
SQL.append('SELECT Arendator.ID_arendator AS [ID Арендатора], Arendator.Nazvanie AS Название , Arendator.INN AS ИНН, Arendator.OGRN AS ОГРН, Arendator.director AS Директор, Arendator.telefon AS Телефон FROM Arendator WHERE :p1 = :p2;');
parameters.parambyname('p1').value:=Integer(Combobox2.Items.Objects[Combobox2.ItemIndex]);
parameters.parambyname('p2').value:=Edit2.text;
Showmessage(DataModule2.ADOQuery1.sql.text);
Active:=true;
end;
0
Миниатюры
Запрос на вывод наименований столбцов в таблице  
qwertehok
2210 / 2199 / 599
Регистрация: 29.08.2013
Сообщений: 14,678
11.04.2016, 17:57 #30
Цитата Сообщение от FierySoul Посмотреть сообщение
FROM Arendator WHERE 1 = 2;
так делать нельзя
параметром может быть только значение

на Showmessage() значения параметров не отображаются
1
FierySoul
0 / 0 / 0
Регистрация: 21.04.2015
Сообщений: 161
11.04.2016, 18:03  [ТС] #31
Цитата Сообщение от qwertehok Посмотреть сообщение
так делать нельзя
параметром может быть только значение
Подскажите, пожалуйста, как сделать, а то моих знаний не хватает.
0
qwertehok
2210 / 2199 / 599
Регистрация: 29.08.2013
Сообщений: 14,678
11.04.2016, 20:26 #32
Цитата Сообщение от FierySoul Посмотреть сообщение
Подскажите, пожалуйста, как сделать, а то моих знаний не хватает.
Delphi
1
2
SQL.append('SELECT Arendator.ID_arendator AS [ID Арендатора], Arendator.Nazvanie AS Название , Arendator.INN AS ИНН, Arendator.OGRN AS ОГРН, Arendator.director AS Директор, Arendator.telefon AS Телефон FROM Arendator WHERE '+Edit2.text+' = :p2;');
parameters.parambyname('p1').value:=Integer(Combobox2.Items.Objects[Combobox2.ItemIndex]);
как то так
0
FierySoul
0 / 0 / 0
Регистрация: 21.04.2015
Сообщений: 161
12.04.2016, 04:12  [ТС] #33
Цитата Сообщение от qwertehok Посмотреть сообщение
как то так
Вроде же сначала поле в котором искать, а потом значение?
Delphi
1
WHERE :p1 = '+Edit2.text+'
Поиск проходит без ошибок, но результат поиска остается пустым.
Хоть и значение копировал и вставлял
0
krapotkin
3397 / 3009 / 1042
Регистрация: 14.04.2014
Сообщений: 14,585
Записей в блоге: 15
12.04.2016, 07:33 #34
просто сделайте уже запрос без параметров, иначе у вас никогда это не закончится
при этом имейте в виду, что строковые значения должны заключаться в апострофы, а численные - нет

Delphi
1
2
3
4
5
6
7
var par1,par2:string;
 
par1:= ansiQuotedStr(Edit1.text , '''');
par2:= edit2.text;
 
query.sql.text:='select f1,f2,f3 from table1 where f1='+par1+' and f2='+ par2;
query.open;
0
FierySoul
0 / 0 / 0
Регистрация: 21.04.2015
Сообщений: 161
12.04.2016, 08:35  [ТС] #35
Цитата Сообщение от krapotkin Посмотреть сообщение
просто сделайте уже запрос без параметров, иначе у вас никогда это не закончится
при этом имейте в виду, что строковые значения должны заключаться в апострофы, а численные - нет
Спасибо, но все же мне нужно с параметром.
0
qwertehok
2210 / 2199 / 599
Регистрация: 29.08.2013
Сообщений: 14,678
12.04.2016, 08:55 #36
Цитата Сообщение от FierySoul Посмотреть сообщение
Поиск проходит без ошибок, но результат поиска остается пустым.
колонка не может быть параметром!
параметром может быть только значение этой колонки

так нельзя
SQL
1
* WHERE :p1 = '123'
только так
SQL
1
* WHERE POLE1 = :p1
0
FierySoul
0 / 0 / 0
Регистрация: 21.04.2015
Сообщений: 161
12.04.2016, 09:25  [ТС] #37
Цитата Сообщение от qwertehok Посмотреть сообщение
колонка не может быть параметром!
параметром может быть только значение этой колонки
Жаль, а есть методы поиска при которых можно выбирать колонку и значение?
0
qwertehok
2210 / 2199 / 599
Регистрация: 29.08.2013
Сообщений: 14,678
12.04.2016, 10:01 #38
я же вам написал уже

Delphi
1
query.sql.text:=' * FROM Arendator WHERE '+Edit2.text+' = :p2;');
0
FierySoul
0 / 0 / 0
Регистрация: 21.04.2015
Сообщений: 161
12.04.2016, 10:34  [ТС] #39
Цитата Сообщение от qwertehok Посмотреть сообщение
я же вам написал уже
DelphiВыделить код
1
query.sql.text:=' * FROM Arendator WHERE '+Edit2.text+' = 2;');
Извините, но я что-то не до понимаю. Как я понял, вы написали, что колонка из эдита берется , а значение из параметра, но мне нужно наоборот. Я попробовал поменять местами, но результата не дало.
0
qwertehok
2210 / 2199 / 599
Регистрация: 29.08.2013
Сообщений: 14,678
12.04.2016, 12:08 #40
вы вообще не понимаете что происходит?
2 вас две ПЕРЕМЕННЫЕ и значения в них устанавливаете вы

так берите и устанавливайте
0
12.04.2016, 12:08
MoreAnswers
Эксперт
37091 / 29110 / 5898
Регистрация: 17.06.2006
Сообщений: 43,301
12.04.2016, 12:08

Запрос, поиск в таблице, вывод в форму
Требуется сделать запрос, поиск по фамилии в таблице Сотрудники, но чтобы...

Запрос: вывод количества записей в таблице
как вывести количество записей в таблице.. Есть делфи, бд "db.mdb", вывел...

php+mySQL запрос на вывод имён столбцов таблицы
Народ, подскажите Как в этом запросе исключить вывод ,например, столбца id....


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

Или воспользуйтесь поиском по форуму:
40
Ответ Создать тему
Опции темы

КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin® Version 3.8.9
Copyright ©2000 - 2018, vBulletin Solutions, Inc.
Рейтинг@Mail.ru