mdsk.net
当前位置:首页 >> DElphi ADOQuEry1 怎么更新数据 >>

DElphi ADOQuEry1 怎么更新数据

ADOQuery1.SQL.Clear; showmessage(File_Feature); sql:= 'select * from MediaInfo where 特征="'+File_Feature+'"'; ADOQuery1.SQL.Add(sql); ADOQuery1.Open; if ADOQuery1.recordCount>0 then begin while not ADOQuery1.eof do begin ADOQu...

最少三个控件: 1.dbgrid 。 2.datasource 在data access里面 3.adoquery。 设置 adoquery的connection。可以写语句 也可以放置 adoconnection。。。在ado里面 设置adoconnection的connectstring 设置 datasource的dataset为adoquery1 设置 dbgr...

你要把这个问题的分类改到 软件编程去 ADOQuery1.Close; ADOQuery1.SQL.Clear; ADOQuery1.SQL.Add('update ProductInfo set Stock = Stock + ‘ + Edit2.Text + ’ where ProNo = ‘ + Edit1.Text); ADOQuery1.ExecSQL;

如果仅仅是插入一条数据,不要写得这么复杂 直接用 sql :='insert into 管理信息表admtable (ID,loginn,username1,password1,quanxian14,quanxian2,remark)values ('+trim(Edit1.Text); +','+...(后面你自己补) ADOQuery1.SQL.Text := sql; ADOQ...

可以用聚集查询语句: Select Max(Age) AS AgeMAX FROM student 然后就可以在程序中 ADOQuery1.fieldbyname('AgeMAX') 进行访问了。

xxx:= edit1. text是绝对不对的,因为左边是个parameter对象,右边是个string,类型是不匹配的,无法进行赋值。 还是得用xx.value:=edit1. text,这是variant和string间的赋值操作,是允许的。 你用的ADO,我猜你在.valur赋值时遇到的错误可能...

这样试试: for i := 0 to adoquery1.RecordCount -1 do begin Combobox1.items.add(ADOQuery1.fieldbyname('xx').asstring); adoquery1.Next; end; 不过看你代码没有太大问题,如果以上代码也不行,建议看看相关上下文代码! wish you Luck!

手动写代码吧。遍历adoquery1,把里面的数据挨条插入到adoquery2。

qry1.First;//取第一条数据 edit.Text := qry1.FieldByName(字段名).AsString; 这样就可以啦! 想获取什么值都可以用query.fieldbyname(字段名).asstring获得字符串或者query.fieldbyname(字段名).asinteger获得整数值!

ADOQUERY1.SQL.Add('update 表1 set 字段1='+edit1.text+' where 字段1='+edit2.text); edit1.text:='9'; 时 文本类型 'update 表1 set 字段1=‘’'+edit1.text+'‘’ where 字段1='''+edit2.text+'''' 结果就是 'update 表1 set 字段1=‘’9‘’ where ...

网站首页 | 网站地图
All rights reserved Powered by www.mdsk.net
copyright ©right 2010-2021。
内容来自网络,如有侵犯请联系客服。zhit325@qq.com