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

Вниз

Создание таблицы при помощи SQL-файла   Найти похожие ветки 

 
russko ©   (2004-04-28 08:20) [0]

Есть SQL файл:
Create table :pNew  (N  Char(5),
     Shifr    Char(50),
                   Name     Char(50),
                   Sluz     Char(10) );
В проге пишу:
DataModule2.Query1.SQL.LoadFromFile(path+"\SQL\Create_Table.sql");
DataModule2.Query1.ParamByName("pNew").AsString := edit1.text;

а он ругается на первую строку, мол Token: ?


 
ЮЮ ©   (2004-04-28 08:24) [1]

Имя таблицы не может быть параметром вообще, а в твоем случае, особенно


 
russko ©   (2004-04-28 08:32) [2]

как её можно тогда задать?


 
ЮЮ ©   (2004-04-28 08:46) [3]

DataModule2.Query1.SQL.Text :=
 "Create table " + edit1.text + "  (N  Char(5), ..."

Только, повторюсь, странный подход к проектированию БД.
1) Таблица есть набор сущностей и должна называться соответственно. Тогда уж и поля назови  F1,F2,F3. Откуда взялись эти Shifr , Name, Sluz? И где PrimaryKey?
2) Как ты далее собираешься использовать БД названия таблиц которой тебе не известны?


 
russko ©   (2004-04-28 08:50) [4]

Названия полей известны, а вот имя нет, оно задаётся


 
ЮЮ ©   (2004-04-28 09:02) [5]

>Названия полей известны, а вот имя нет, оно задаётся

Ну-ну... Или ты пишешь программу для работы с одним файлом .db наперед определенной структуры, а не с БД Paradox? Тогда уж работай c типизмрованнвм файлом. Зачем тебе Paradox?


 
DarkMan   (2004-04-28 09:18) [6]

Попробуй так DataModule2.Query1.Parameters.Refresh()


 
Aleksey V.P.   (2004-04-28 14:37) [7]

Вместо
Create table :pNew  (N  Char(5),
    Shifr    Char(50),
                  Name     Char(50),
                  Sluz     Char(10) );
Используй
Create table %s  (N  Char(5),
    Shifr    Char(50),
                  Name     Char(50),
                  Sluz     Char(10) );
Далее
DataModule2.Query1.SQL.LoadFromFile path+"\SQL\Create_Table.sql");
DataModule2.Query1.SQL.Text := Format( DataModule2.Query1.SQL.Text, [strTableName]);



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

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

Наверх




Память: 0.48 MB
Время: 0.041 c
1-1084032791
SergeyM
2004-05-08 20:13
2004.05.23
String to Char


4-1080566809
ipnet
2004-03-29 17:26
2004.05.23
Вывод через TextOut своим шрифтом


1-1083763502
denis_group
2004-05-05 17:25
2004.05.23
CheckBox ы в StringGrid .


3-1083185216
kaif
2004-04-29 00:46
2004.05.23
План запроса с IN


3-1083179959
sasa
2004-04-28 23:19
2004.05.23
Тормоза IBSERVER под Win2KServer