【搞定】读取引用失败**

gaofeng

const
     DBURL = 'DATABASE=BizUrl:\GHGLXT\GHSJK.Database';

....
procedure THYCZCT.BtnSearchClick(Sender: TObject);
var
   Query:TQuery;
begin
     {执行查询}
     Query := TQuery.Create(nil);
     try
        Query.ConnectionString := DBURL;
        Query.CommandText := 'SELECT XM,XB,CSRQ,LSDW,LSGH FROM HYB WHERE XM LIKE :S_XM';
        Query.Params.ParamByName('S_XM').AsString := XMValue.Text + '%';
        Query.Open;
        DataSetCZSJJ.Open;
        while not Query.Eof do
        begin
             DataSetCZSJJ.Append;
             TGGHSK.CopyDataSet(Query,DataSetCZSJJ);
             DataSetCZSJJ.Post;
             Query.Next;
        end;
        Query.Close;
     finally
            Query.Free;
     end;
end;


在设计器中打开的时候、执行功能的时候，都提示“读取引用"GHSJK"失败”

请问是怎么回事，该如何解决。。
我用的版本是3.0.6.2619

lisb

这样改试试
DBURL = 'DATABASEURL=Biz:\GHGLXT\GHSJK.Database';

gaofeng

抱歉，上面的代码是改过的代码，
原先使用的就是
const
     DBURL = 'DATABASEURL=BizUrl:\GHGLXT\GHSJK.Database';

报的错误。

gaofeng

问题找到了，是另一个地方的数据库连接设置错误了。谢谢！

lisb

谢谢反馈，结贴了。