| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL | | Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

	« предыдущая ветвь | форум | следующая ветвь »

DBExpress -> TSQLConnection -> DBX Error: ... [D7, IB6.x]

Страницы:   < 1 2 3 >

UE ©   (2004-04-27 14:38:00) 


Uses ... DBXpress, SqlExpr, ...;

...

procedure PostData;
var
 Connection: TSQLConnection;
 DataSet: TSQLDataSet;
begin
 Connection := TSQLConnection.Create(nil);
 with Connection do begin
   ConnectionName := 'AIDADB';
   DriverName := 'INTERBASE';
   LibraryName := 'dbexpint.dll';
   VendorLib := 'GDS32.DLL';
   GetDriverFunc := 'getSQLDriverINTERBASE';
   Params.Add('User_Name=SYSDBA');
   Params.Add('Password=masterkey');
   Params.Add('Database=localhost:C:\db0\AIDALOG.GDB');
   LoginPrompt := False;
   Open;
 end;
 DataSet := TSQLDataSet.Create(nil);
 with DataSet do begin
   SQLConnection := Connection;
   CommandText := Format('INSERT INTO Report VALUES("%s","%s","%s","%s")', ['TEST1', 'TEST2', 'TEST3', 'TEST4']);
   try
     ExecSQL;
   except
     on E: Exception do begin
       writeln(E.Message);
     end;
   end;
 end;
 Connection.Close;
 DataSet.Free;
 Connection.Free;
end;


выполняю, получаю:
E.Message = DBX Error: No Mapping for Error Code Found

что с этим делать?

---

UE   (2004-04-27 16:02:00) [41]

Johnmen смеёшся что ли?
а E.Message что по твоему?

---

Соловьев   (2004-04-27 16:01:00) [42]

> Format('INSERT INTO Report VALUES("%s","%s","%s","%s")'

а как это?

---

Johnmen   (2004-04-27 15:59:00) [43]

Убери try и посмотри, какая ошибка.

---

UE   (2004-04-27 15:54:00) [44]

Взаправду никто не вкурсах?

---

Страницы:   < 1 2 3 >

Наверх