求教!在线等!!!(20分)

  • 主题发起人 主题发起人 沈浪
  • 开始时间 开始时间

沈浪

Unregistered / Unconfirmed
GUEST, unregistred user!
我这样写,错在那里。为什么能够执行,确没有结果出来!query1与Dbgrid1关联
var
sqlstr,s2:string;
begin
s2:=trim(chatxt.Text);
sqlstr:='select * from guanli.khxx where 联系人=:p2';
with query1 do
begin
close;
sql.Clear;
SQL.Add(sqlstr);Parambyname('p2').AsString:=s2;
prepare;
ExecSQL;
end;

end;
 
将ExecSQL改成open试试 [:)]
 
execsql只是执行语句没有返回结果,open是有返回结果
 
用open才能返回结果集啦
 
后退
顶部