5,388
社区成员
发帖
与我相关
我的任务
分享如何处理传入的sql字符串参数？
函数中处理ADODataSet.commandText属性，怎样保证传入的sql字符串参数是正确的？
procedure Query(DS : TDataSet; sSql : string);
begin
with DS do
begin
if Active then close;
commandtext := sSql;
open;
end;
end;
procedure Query(DS : TDataSet; sSql : string);
begin
with DS do
begin
if Active then close;
commandtext := sSql;
open;
end;
end;
...全文
请发表友善的回复…
发表回复
Fengzh418 2002-08-13
- 打赏
- 举报
那要写一个SQL语法分析的函数了。
简单点
try
open;
except
application.messagebox(pchar(sSql),'请检查',0);
end;
简单点
try
open;
except
application.messagebox(pchar(sSql),'请检查',0);
end;
