|
|
Регистрация | << Правила форума >> | FAQ | Пользователи | Календарь | Поиск | Сообщения за сегодня | Все разделы прочитаны |
|
Опции темы | Поиск в этой теме | Опции просмотра |
#1
|
|||
|
|||
Помогите пожалусто
Здраствуйте и спасибо тем кто откликнулся.
Пишу курсовой проект по базам данных. При создании субд на делфи встрял с ошибкой при использовании sql запросов. Пытаюсь выполнить поиск по табличке но возникает ошибка: Invalid column name '"%тут в веденое мной фамилия в окно Edit%"' текст программы: Код:
With AdoQuery1 do begin Sql.Add('Select *'); Sql.Add('From имя таблицы'); Sql.Add('Where fam Like "%'+Edit1.text+'%"'); end; Последний раз редактировалось Volt177, 09.03.2011 в 18:34. |
#2
|
|||
|
|||
Что у вас за запрос получается, ошибка в неправильном указании названии колонки, или неправильно составленном запросе.
Код:
With AdoQuery1 do begin Sql.Add('Select *'); Sql.Add('From имя таблицы'); Sql.Add('Where fam Like '+QuotedStr('%'+Edit1.text+'%')); ShowMessage(Sql.text); end; |
#3
|
|||
|
|||
Название колонки указано верно, возможно ошибка в синтаксисе давот толь она всплывает не при запуски программ а после , когда уже непосредственно нажимаю на кнопу которая отвечает за поиск.
Попробовал изменить так как ты привел в примере, тож неробит=( |
#4
|
||||
|
||||
У вас так и написано в программе?
Sql.Add('From имя таблицы'); Жизнь такова какова она есть и больше никакова. Помогаю за спасибо. |
#5
|
|||
|
|||
Покажите что дает ShowMessage(Sql.text);
|
#6
|
||||
|
||||
Выводит на экран окошко с текстом вашего запроса.
Жизнь такова какова она есть и больше никакова. Помогаю за спасибо. |
#7
|
|||
|
|||
Страдалецъ, будь по внимательнее, ShowMessage я посоветовал использовать что бы узнать, что за запрос получается на стадии исполнения, и ему же и вопрос задал, что бы он сюда отписал, что у него выходит..
|
#8
|
|||
|
|||
Спс тем кто откликнулся проблему с ошибкой я решил.
Только проверить правельность работы немагу. Ребят подскажите пожалосто как организовать "вывод найденной информации" через окно DBGrind Код:
With AdoQuery1 do begin Close; SQL.clear; Sql.Add('Select * '+' From Klient '+' Where fam Like ''%'+Edit1.text+'%'''); open; end; lmikle: пользуемся тегами!!! Последний раз редактировалось Volt177, 10.03.2011 в 18:34. |
#9
|
|||
|
|||
Подключаешь данный запрос к DBGrid через DataSource и радуешься.
|
#10
|
|||
|
|||
А можно расписать поподромней а то мне как нубу это всервано что горох об стенку
|
#11
|
|||
|
|||
Код:
DataSource1.DataSet:=ADOQuery1; DBGrid1.DataSource:=DataSource1; |
#12
|
|||
|
|||
СПС всем !!!
|
#13
|
|||
|
|||
Я уже поблагоарил всех за помощ, но помогите еще немного
Как вывести данные в excel из субд на delphi связанной с бд в sql server 2000 и вапрос а нет никаких проблем с выводом данных из delphi в 2007 офис? Последний раз редактировалось Volt177, 13.03.2011 в 16:44. |
#14
|
||||
|
||||
Без разницы какой офис 97 или 2010 все так-же:
В эксель обычно выводят примерно так: Код:
Uses ComObj; ... Const xlContinuous = 1; xlLandscape = 2; xlEdgeLeft = 7; xlEdgeTop = 8; xlEdgeBottom = 9; xlEdgeRight = 10; xlCenter = -4108; Var Excel, WorkBook, WorkSheet: Variant; ... Excel := CreateOLEObject('Excel.Application'); Excel.Visible := True; WorkBook := Excel.WorkBooks.Add; WorkSheet := WorkBook.WorkSheets[1]; WorkSheet.Range['A1:I1'].Merge; WorkSheet.Range['A1'].Font.Bold := True; WorkSheet.Range['A1'].Font.Size := 14; WorkSheet.Range['A1'].HorizontalAlignment := xlCenter; WorkSheet.Range['A1'] := 'Журнал'; ... Жизнь такова какова она есть и больше никакова. Помогаю за спасибо. |