请教三层!

frankie_24 2007-03-31 09:22:03
请教一个问题,我在服务端写了函数,作用是取得表中的编号字段的最大值
代码:
function TDateLInk.Get_GetMax(const TableName, IDName: WideString): Int64;
var
Str :String;
MaxID :Integer;
begin
Str :='Select ISNULL(Max(' + IDName + '),0) From ' + TableName;
With ADOSet do //ADOSet是ADOQuery
begin
Close;
SQL.Clear;
SQL.Add(Str);
Open;
end;
MaxID :=ADoset.DataSource.DataSet.Fields[0].AsInteger;
Result := MaxID;
end;

TableName 是表的名字 IDName是表中编号的字段
我在客户端调用
代码:
Edit1.Text:=Frm_Data.Socket.AppServer.GetMax('DutyInfo','DutyID');

运行后提示"找不到成员"
这个是什么意思啊?
不可以这样做吗?

服务端用ADO,ADOQuery,DataSetProvider

客户端用Socket,ClientDataset

谢谢了,没有多少分..见谅!


对了,还有,要是我直接把表名和字段都写进去,不通过客户端传参数,这样返回就可以用
不知道是为什么!
...全文
258 5 打赏 收藏 转发到动态 举报
写回复
用AI写文章
5 条回复
切换为时间正序
请发表友善的回复…
发表回复
Sunniness 2007-03-31
  • 打赏
  • 举报
回复
是不是没有注册啊
Sunniness 2007-03-31
  • 打赏
  • 举报
回复
你在服务端设段点试一下,看问题出在那里!

我写这个写得比较多,但好久没用了!
frankie_24 2007-03-31
  • 打赏
  • 举报
回复
就没有人进来说句话啊...
frankie_24 2007-03-31
  • 打赏
  • 举报
回复
CsdN是怎么了?
总是没有人回答我的问题的.
我的问题很难吗?
WangZWang 2007-03-31
  • 打赏
  • 举报
回复
//没有定义列的别名,加入一个列名
Str :='Select ISNULL(Max(' + IDName + '),0) as ColName From ' + TableName;

2,497

社区成员

发帖
与我相关
我的任务
社区描述
Delphi 数据库相关
社区管理员
  • 数据库相关社区
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

试试用AI创作助手写篇文章吧