Экспорт в DBF

[ksandr]

Товарищи добрый день, просьба сильно не пинать за вопрос который уже поднимался. Облазил кучу форумов, нарыл кучу инфу по экспорту, пытаюсь сделать так же, но вываливается сообщение об ошибке. Пишет "Недостаточно параметров, требуется 1" .

Использую

'Microsoft ActiveX Data Objects 2.6 Library'.Connection
'Microsoft ActiveX Data Objects 2.6 Library'.Recordset

сам код таков

DBFBase.Open('MMB_DBF1');
DBFFile.Open('tabl.DBF', DBFBase);

VarTXT:='Testmessage';
SqlStr:='insert into "tabl.DBF"(test1) values('+VarTxt+')';
DBFBase.Execute (SqlStr);

Если вместо VarTxt подставить число то всё ок, Народ помогите, подскажите в чём дело.
СПАСИБО.

[yd_]

1. Скорее всего к делу не относится - попробуйте "tabl.DBF" без кавычек.
2. Я не понял насчет "Если вместо VarTxt подставить число то всё ок" - у Вас VarTXT имеет тип Text. Какой тип у поля test1?

[ksandr]

1. Пробовал без кавычек название таблицы - не прокатывает, та же ошибка.
2. Когда говорил что с числом прокатывает, то имел ввиду, что если вместо VarTxt подставить Format(VarDec) то запись в dbf прокатывает, соотвественно VarDec имеет формат Decimal. Поле test1 имеет тип Character(10).

Народ помогите, уже второй день бьюсь, ничего не выходит. Может быть у гкого то есть готовый объект по экспорту в DBF для Nav3.60 ? Спасибо.

[zm]

Попробуйте что-то вроде:
'INSERT INTO "' + CurrentDirectory + '\' + 'konfig.dbf' + '" VALUES (' + .... + ')';

[ksandr]

Цитата:

Сообщение от zma

Попробуйте что-то вроде:
'INSERT INTO "' + CurrentDirectory + '\' + 'konfig.dbf' + '" VALUES (' + .... + ')';

Маленький вопрос, а что за тройные кавычки перед values ?

[yd_]

Кстати, насчет кавычки это мысль - когда Вы явно указываете в тексте команды значение строкового типа, то оно должно быть в кавычках. CurrentDirectory, мне кажется, ни к чему - она должны быть прописана в строке соединения - а вот в команде должно быть 'insert into tabl.DBF(test1) values('+InvComma+VarTxt+InvComma+')', где InvComma это текстовая константа, значением которой является единственный символ - "'". Я так писал запросы на select.

[ksandr]

Цитата:

Сообщение от yd_

Кстати, насчет кавычки это мысль - когда Вы явно указываете в тексте команды значение строкового типа, то оно должно быть в кавычках. CurrentDirectory, мне кажется, ни к чему - она должны быть прописана в строке соединения - а вот в команде должно быть 'insert into tabl.DBF(test1) values('+InvComma+VarTxt+InvComma+')', где InvComma это текстовая константа, значением которой является единственный символ - "'". Я так писал запросы на select.

Уважаемый yd, подскажите пожалуйста, что то я совсем запутался. Написал в коде следующую строчку

DBFBase.Execute ('insert into tabl.DBF(test1) values('+InvComma+VarTXT+InvComma+')')

В text Consatnts прописал InvComma "'" где я так понимаю прописывается верхняя одиночная запятая - ' . Navision выдаёт теперь что то совершенно невообразимое: "Ошибка синтаксиса (пропущен оператор) в выржении запроса '[']Test[']' "
Test- значение переменной VarChar

[yd_]

Попробую словами: одинарные кавычки (по-англицки inverted comma, т.е. перевернутая запятая) используются в языке SQL для выделения начала и окончания текстовой строки. Когда Вы пишите 'INSERT t.dbf(int_f) VALUES (' + FORMAT (IntVar) + ')', где поле int_f имеет тип int(4), например, то значение, которое будет в скобках после values, может быть и без одинарных кавычек, т.к. это число. А вот когда переменная типа VarChar, то должны быть кавычки, т.е. 'INSERT t.dbf (char_f) VALUES ('mama')'. Теперь представим, что у нас в Navision есть переменная CharVar типа Text (4). Мы ей присваиваем
CharVar := 'mama';
и пишем
QueryText := 'INSERT t.dbf (char_f) VALUES (' + CharVar + ')';
в результате значение переменной QueryText будет
'INSERT t.dbf (char_f) VALUES (mama)', т.е. mama БЕЗ КАВЫЧЕК.
Чтобы "вставляемое" значение типа VarChar имело правильный формат, нужно написать
QueryText := 'INSERT t.dbf (char_f) VALUES (' + InvComma + CharVar + InvComma + ')';
где InvComma это TextConstant, ЗНАЧЕНИЕМ КОТОРОЙ БУДЕТ ВСЕГО ОДИН СИМВОЛ - ОДИНАРНАЯ КАВЫЧКА.

[ksandr]

уважаемый yd спасиб за помощь, всё получилось уже после вашего первого поста, загвоздка была именно в текстовой константе. Ещё раз спасибо. С sql языком знаком, т.к. программлю на VB, но вот особенности Navision пока не все освоил