Форум на Исходниках.RU https://forum.sources.ru Форум на Исходниках.RU Форум на Исходниках.RU https://forum.sources.ru/index.php?showtopic=372197&view=findpost&p=3272493 Mon, 11 Feb 2013 11:42:33 +0000 Создание полей (столбцов) в Access https://forum.sources.ru/index.php?showtopic=372197&view=findpost&p=3272493 Цитата VB.NET.User @
...
ADOQuery.SQL.Add('ALTER TABLE Таблица ADD '+CurDate+' STRING NOT NULL UNIQUE');
...
Выскакивает ошибка: ошибка синтаксиса при определении поля. Что делать?

похоже UNIQUE тут лишнее
Access этой штуки не знает:
http://office.microsoft.com/ru-ru/access-h...A001231431.aspx]]> neut ral Delphi: Сетевое программирование https://forum.sources.ru/index.php?showtopic=372197&view=findpost&p=3271613 Sat, 09 Feb 2013 08:08:41 +0000 Создание полей (столбцов) в Access https://forum.sources.ru/index.php?showtopic=372197&view=findpost&p=3271613 Gonarh, спасибо за ответ, но ошибка осталась. 2Moderator, Ой, извините, не заметил, что создал тему не в том разделе, на сонную голову.]]> VB.NET.User Delphi: Сетевое программирование https://forum.sources.ru/index.php?showtopic=372197&view=findpost&p=3271595 Sat, 09 Feb 2013 04:51:32 +0000 Создание полей (столбцов) в Access https://forum.sources.ru/index.php?showtopic=372197&view=findpost&p=3271595
    'ALTER TABLE Таблица ADD '+CurDate+' VARCHAR(50) NOT NULL UNIQUE');

А это что за херня?
Цитата
CurDate:=DateToStr(Now);
for i := 1 to Length(CurDate) do
if CurDate[i]='.' then
CurDate[i]:='-';

Попробуй так
    CurDate:=FormatDateTime('dd-mm-yyyy', now)
]]> Gonarh Delphi: Сетевое программирование https://forum.sources.ru/index.php?showtopic=372197&view=findpost&p=3271580 Fri, 08 Feb 2013 23:32:03 +0000 Создание полей (столбцов) в Access https://forum.sources.ru/index.php?showtopic=372197&view=findpost&p=3271580 Использую Access через ADO. Создаю новое поле (столбец) в бд:
    CurDate:=DateToStr(Now);
    for i := 1 to Length(CurDate) do
      if CurDate[i]='.' then
        CurDate[i]:='-';
    ADOQuery.Close;
    ADOQuery.SQL.Clear;
    ADOQuery.SQL.Add('ALTER TABLE Таблица ADD '+CurDate+' STRING NOT NULL UNIQUE');
    ADOQuery.ExecSQL;

Выскакивает ошибка: ошибка синтаксиса при определении поля. Что делать?]]> VB.NET.User Delphi: Сетевое программирование