Ответ: Компоненты (Часть 2)
Zeos 6.6.2 rc и Delphi(5,6..) : Invalid column name ASE 12.5.3
Ошибка эта перешла из предыдущих версий Zeos, причина двойные кавычки перед именем колонки ("RET"), устраняется легко:
в модуле ZDbcDbLibSybaseMetadata.pas находим:
function TZSybaseDatabaseMetadata.GetTableTypes: IZResultSet;
... и правим
вместо этого:
with GetStatement.ExecuteQuery(
{Format('select c.colid, c.name, c.type, c.prec, c.scale, c.status'
+ ' from syscolumns c inner join sysobjects o on (o.id = c.id)'
+ ' where o.name = "%s" order by colid',
[TableNamePattern])) do}
правим так:
Format('select c.colid, c.name, c.type, c.prec, c.scale, c.status'
+ ' from syscolumns c inner join sysobjects o on (o.id = c.id)'
+ ' where o.name = %s order by colid',
[AnsiQuotedStr(TableNamePattern, '''')])) do
begin
while Next do ...
Буду рад, если кому то пригодится.
LEm (ua6ecx)
Добавлено через 1 минуту
Zeos 6.6.2 rc и Delphi(5,6..) : Invalid column name ASE 12.5.3
После исправления компилим и переустанавливаем!
Последний раз редактировалось ua6ecx; 17.04.2008 в 09:52..
Причина: Добавлено сообщение
|