Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2004.12.12;
Скачать: CL | DM;

Вниз

Как получить список запросов из базы MS Access   Найти похожие ветки 

 
lav ©   (2004-11-14 07:49) [0]

Здравствуй ALL как из базы MS Access (Test.mdb) получить список запросов, и их SQL выражение?
Заранее благодарен.


 
Ученик   (2004-11-14 10:43) [1]


procedure TForm1.Button1Click(Sender: TObject);
var
 NameField, DefinitionField: TField;
 DataSet: TADODataSet;
begin
 ADOConnection1.Open;
 DataSet := TADODataSet.Create(nil);
 try
   ADOConnection1.OpenSchema(siProcedures, EmptyParam, EmptyParam, DataSet);
   NameField := DataSet.FieldByName("PROCEDURE_NAME"); { do not localize }
   DefinitionField := DataSet.FieldByName("PROCEDURE_DEFINITION"); { do not localize }
   while not DataSet.EOF do
   begin
     ListBox1.Items.Add(NameField.AsString + ": " + DefinitionField.AsString);
     DataSet.Next;
   end;
 finally
   DataSet.Free;
 end;
end;



 
sniknik ©   (2004-11-14 11:56) [2]

в вопросе запросы...

поменяй siProcedures на siViews
PROCEDURE_NAME на TABLE_NAME
PROCEDURE_DEFINITION на VIEW_DEFINITION


 
Ученик   (2004-11-14 11:57) [3]

>sniknik ©   (14.11.04 11:56) [2]
MS Access


 
sniknik ©   (2004-11-14 12:06) [4]

> MS Access
в чем глубинный смысл в разрезе данного вопроса?


 
Ученик   (2004-11-14 12:13) [5]

>sniknik ©   (14.11.04 12:06) [4]
В результате :-)
Но что автору вопроса нужно, знает только автор


 
sniknik ©   (2004-11-14 13:10) [6]

вполне понятный вопрос (на удивление) по моему
> получить список запросов, и их SQL выражение?
т.е. нужны именно запросы.



Страницы: 1 вся ветка

Текущий архив: 2004.12.12;
Скачать: CL | DM;

Наверх




Память: 0.48 MB
Время: 0.027 c
1-1101447353
Рафик
2004-11-26 08:35
2004.12.12
Вопрос по TreeView


14-1101033590
ms
2004-11-21 13:39
2004.12.12
Как в VB6 вызвать функцию из библиотеки C++


14-1101004505
Думкин
2004-11-21 05:35
2004.12.12
С днем рождения! 21 ноября


4-1099165516
S@shka
2004-10-30 23:45
2004.12.12
Создание и завершение потока


1-1101850668
mr. Bill
2004-12-01 00:37
2004.12.12
Помогите с установкой!