如何向ADOquery控件中添加动态sql参数

来源：蜘蛛抓取(WebSpider) 时间：2018-08-22 23:33 标签： sqlserver新建数据库
C++Builder中的ADOQuery控件中如何实现带参数的SQL语句的使用？？
[问题点数：0分]
本版专家分：0
结帖率 100%
CSDN今日推荐
本版专家分：82
本版专家分：9768
2001年12月 C++ Builder大版内专家分月排行榜第二2001年11月 C++ Builder大版内专家分月排行榜第二
2002年1月 C++ Builder大版内专家分月排行榜第三
本版专家分：92
本版专家分：1286
本版专家分：3617
2001年12月 C++ Builder大版内专家分月排行榜第三
本版专家分：3850
本版专家分：0
本版专家分：290
本版专家分：0
本版专家分：433
匿名用户不能发表回复！
其他相关推荐09-1709-1709-1709-17
02-0201-2002-1001-22
◇本站云标签Delphi中的ADOquery 用法 - 江宇旋 - 博客园
Delphi中的ADOquery 用法
都知道Delphi在数据库操作是非常好用的,delphi把ADO一些方法属性都集成了,以下是我的一些总结:
***************************************
通过sql的存储过程来实现:
With ADOQuery1 do
SQL.Add(' Insert Into Table1(Field1,Field2)')
SQL.Add(' Values(10,20)');
With ADOQuery1 do
SQL.Add(' Update Table1 Set Field1=20,Field2=30)')
With ADOQuery1 do
SQL.Add(' Delete From Table1')
SQL.Add(' Where Field1=20 and Field2=30');
With ADOQuery1 do
SQL.Add(' Select Field1,Field2 From Table1')
SQL.Add(' Where Field1=20 and Field2=30');
***************************************************
通过Delphi自有的方法属性实现:
with ADOQuery1 do
with ADOQuery1 do
delete（选择删除的记录）; //默认删除记录指针指向的记录
with ADOQuery1 do
adotable1.A //添加
ADotable1.Fields.FieldByName('gxid1').Value:=
adotable1.P
adotable1. //删除
adotable1. //修改
ADotable1.Fields.FieldByName('gxid1').Value:=
adotable1.
WITHI adoquery do
begin//添加
adoquery.//motice set adoquery.sql
adoquery.//OR adoquery.
fieldbyname(fieldname).asstring:=trim(edit1.text);
adoquery.delete
fieldbyname(fieldname).asstring:=trim(edit1.text);
有关细节可以参看帮助OR DEMODelphi ADOQuery处理多条SQL语句 - 猪猪V - 博客园
随笔 - 24, 文章 - 2, 评论 - 0, 引用 - 0
Delphi(Pascal) code
sqlStr:= ' begin '
sqlStr:= sqlStr+ 'update table1 set col1 = ''test'' where 1=2;';
sqlStr:= sqlStr+ 'update table1 set col1 = ''test2'' where 1=2;';
sqlStr:= sqlStr+ ' end ';
adoquery1.C
adoquery1.SQL.C
adoquery1.SQL.Add(sqlStr);
adoquery1.ExecSQL;
把sql语句用begin...end包起來，再提交給DB处理,就OK了！
ADOQuery的批处理方式
比如在一个窗体里有一个&取消&和&确定&按钮,&取消&按钮批次取消所有修改,&确定&按钮批次提交：
1.设置QryDef(数据集)的LockType为ltBatchOptimistic,CursorType为ctStatic,CursorLocation为clUseClient
2.&确定&按钮的单击事件为:
if QryDef.Connection.InTransaction then
QryDef.UpdateBatch();
QryDef.Connection.CommitT
QryDef.Connection.RollbackT
3.&取消&按钮的单击事件为:
QryDef1.CancelB
4.初始插入数据:
Qry.LoadFromFile(ExtractFilePath(Application.ExeName) + 'ClassifyDefine');
{$IFDEF Test}codesite.SendMsg('3'); {$ENDIF}
while not Qry.Eof do
QryDef.FieldByName('name').AsString := Qry.FieldByName('name').AsS
if not Qry.FieldByName('Money1').IsNull then
QryDef.FieldByName('Money1').AsCurrency := Qry.FieldByName('Money1').AsC
if not Qry.FieldByName('Money2').IsNull then
QryDef.FieldByName('Money2').AsCurrency := Qry.FieldByName('Money2').AsC
QryDef.UpdateBatch();
5.批处理方式其它实例:
procedure TForm1.Button1Click(Sender: TObject);
adoconnection1.
adoquery.sql.
adoquery.sql.add(insert 语句)；
如果还有insert 语句则：
adoquery.sql.
adoquery.sql.add(insert 语句)；
adoquery.直到所有insert 语句完成.
adoconnection1.
adoconnection1.
用adoquery取指定字段所有值问题
我要在在DBComboBox里显示出来啊
adoquery1.Eof
ComboBox1.Items.Add(adoquery1.fieldbyname('id').asstring);
//id改为你要指定的字段
adoquery1.N
在DBComboBox里显示出来啊
如果是DBComboBox
TForm1.FormCreate(Sender:
adoquery1.SQL.Add('select
adoquery1.O
DBComboBox1.DataField:='id';
adoquery1.Eof
DBComboBox1.Items.Add(adoquery1.fieldbyname(DBComboBox1.DataField).AsString);
adoquery1.N
xxx.sql.text := 'insert into t_log3(name,czsj,czlog)values('''+a +''','''+ b+''','''+c+''')';
xxx.sql.text := 'insert into t_log3(name,czsj,czlog)values(:a1,:b1,:c1)';
xxx.parameters.parambyname('a1').values :=
xxx.parameters.parambyname('b1').values :=
xxx.parameters.parambyname('c1').values :=ADOQuery对SQL操作怎么样？
[问题点数：20分，结帖人fansses]
本版专家分：3045
结帖率 100%
CSDN今日推荐
本版专家分：13781
2003年3月 C++ Builder大版内专家分月排行榜第二
本版专家分：3045
本版专家分：1148
本版专家分：172
本版专家分：2974
本版专家分：174
本版专家分：1110
本版专家分：6753
本版专家分：1110
本版专家分：174
本版专家分：64
匿名用户不能发表回复！
其他相关推荐

我要回帖

更多关于 sqlserver新建数据库 的文章

 

随机推荐