Справочник функций

Ваш аккаунт

Войти через: 
Забыли пароль?
Регистрация
Информацию о новых материалах можно получать и без регистрации:

Почтовая рассылка

Подписчиков: -1
Последний выпуск: 19.06.2015

Create Table не работает

514
11 декабря 2006 года
swordholder99
165 / / 11.12.2006
Здравствуйте друзья
Создал таблицы почти на всех типах (Paradox, dbase,access,excell и тд.)
Но ни в одном из них не смог создать новую таблицу в существуюущей базе.
Помогите пожалуйста
Query->SQL->Clear();

Query->SQL->Add("CREATE TABLE `TestTable` (
`ID` INT NOT NULL AUTO_INCREMENT PRIMARY KEY,
`Number` INT NOT NULL,
`Name` VARCHAR(20) NOT NULL,
`Age` SHORT NOT NULL,
)");

Query->ExecSQL();
92
11 декабря 2006 года
Тень Пса
2.2K / / 19.10.2006
а на данный момент с каким сервером БД работаешь?
и есть ли права у пользователя (если MySQL например) на создание таблиц?
514
12 декабря 2006 года
swordholder99
165 / / 11.12.2006
Работаю с BDE права у пользователя есть.
Сработало только с Аксесс но и там команда Drop Table не пашет.
Кто нибуть пережил эти проблемы. Может какой нибудь фокус есть?
92
12 декабря 2006 года
Тень Пса
2.2K / / 19.10.2006
копался в старых доках... нашел вот, может пригодится:

Код:
// Создать
void __fastcall TForm1::Button1Click(TObject *Sender)
{
// Отключим компонент
Table1->Active = false;

// Название, тип, местонахождение
Table1->DatabaseName = "c:\\temp";
Table1->TableType = ttDBase;
Table1->TableName = "Table";

// Список полей
Table1->FieldDefs->Clear();
Table1->FieldDefs->Add("Field1", ftInteger, 0, True);
Table1->FieldDefs->Add("Field2", ftString, 30, False);

// Индексы
Table1->IndexDefs->Clear();
Table1->IndexDefs->Add("Fld2Index","Field2", TIndexOptions() << ixUnique );
Table1->IndexName = "Fld2Index";

// Вуаля!
Table1->CreateTable();

// Включим компонент
Table1->Active = true;
}
23K
13 декабря 2006 года
dey
2 / / 11.12.2006
Цитата: swordholder99
Здравствуйте друзья
Создал таблицы почти на всех типах (Paradox, dbase,access,excell и тд.)
Но ни в одном из них не смог создать новую таблицу в существуюущей базе.
Помогите пожалуйста
Query->SQL->Clear();

Query->SQL->Add("CREATE TABLE `TestTable` (
`ID` INT NOT NULL AUTO_INCREMENT PRIMARY KEY,
`Number` INT NOT NULL,
`Name` VARCHAR(20) NOT NULL,
`Age` SHORT NOT NULL,
)");

Query->ExecSQL();




А текст сообщения об ошибке какой ?

514
13 декабря 2006 года
swordholder99
165 / / 11.12.2006
Спасибо тень пса
92
13 декабря 2006 года
Тень Пса
2.2K / / 19.10.2006
помогло? ну и ладненько )

не за что ;)
Реклама на сайте | Обмен ссылками | Ссылки | Экспорт (RSS) | Контакты
Добавить статью | Добавить исходник | Добавить хостинг-провайдера | Добавить сайт в каталог