好着急:如何遍历无序号的数据表(SQL)(20分)

  • 主题发起人 主题发起人 sweetychild
  • 开始时间 开始时间
S

sweetychild

Unregistered / Unconfirmed
GUEST, unregistred user!
此表有两个字段:名称和号码,号码是不连续的,均为五位长度我用的是ADOCONNECTION和ADODATASET
,ADODATASOURCE控件,看来只能用SQL语句来遍历了,怎样能做到呢?
 
先select * from ....
然后
while not eof do
begin
...
next;
end;
 
请问WHILE循环的EOF是谁的EOF 呀,我的理解如下通不过,
sqlorder:='select 字段1 from departs ';
form1.ADODataSet1.Recordset:=form1.c.Execute(sqlorder);
while not eof do
begin
st:=trim(form1.adodataset1.Fields.Asstring);
combobox1.Items.Add(st);
end;

又:我是要把字段1的所有内容取出来放在COMBOBOX上
 
用楼上的方法可以,是作循环了
不过数据量大的话,效率不高
 
一个过客,的方法可以啊!eof当然是你这个表的哦
 
说清楚点好吗?遍历数据的目的是什么?查找空缺?我倒曾经做过一个这样的。
 
遍历数据的目的就是为了把表中字段1的内容逐条取出让它能显示到COMBOBOX1上:combobox1.Items.Add(st);
EOF这个表是不是就是把WHILE语句改成while not eof(depart) do呢?好象还是不成也:(
 
sqlorder:='select 字段1 from departs ';
form1.ADODataSet1.Recordset:=form1.c.Execute(sqlorder);
while not [red]ADODataSet1.Recordset.eof[/red] do
begin
st:=trim(form1.adodataset1.Fields.Asstring);
combobox1.Items.Add(st);
[red]ADODataSet1.Recordset.next[/red]
end;

 
to 四库全书
ADODATASET1.RECORDERSET好象没有NEXT这个属性,只有NEXTRECORDSET 的属性,可是加上后
编译系统又提示说‘NOT ENOUGH ACTUAL PARAMETERS’
 
关于ADODataSet1.Recordset.next中NEXT的问题我解决了,现在是上一条的问题
st:=trim(form1.adodataset1.Fields.Asstring);编译通不过,系统提示说要指明是FIELDS
而不能直接运用FIELDS。ASSTRING可是天哪,我怎么知道是哪一个FEILDS??!!
 
sqlorder:='select 字段1 from departs ';
form1.ADODataSet1.Recordset:=form1.c.Execute(sqlorder);
while not adodataset1.eof do
begin
st:=trim(form1.adodataset1.Fields.Asstring);
combobox1.Items.Add(st);
end;

 
系统提示说要指明是要FIELDS的,通不过SHERMAN这段代码
 
你用DBLOOKUPCOMBOX不就行了!
 
DBLOOKUPCOMBOX在哪个组里啊?要下载吗
 
你总该指定个字段吧?

form1.adodataset1.FieldbyName('你的字段').Asstring

或者

form1.adodataset1.Fields[0].Asstring,如果你只select这1个字段的话
 
我指定的字段字段名就是‘字段一’啊,FieldbyName?没有这个属性啊
 
不会吧? 你的delphi是什么版本? FieldbyName是最基本的一个东东了
 
哪里有.FieldbyName啊?真的找不到,是ADODATASET的属性吗
 
那就不是没有fieldbyname,而可能是你使用的方法不对。 你把你自己写的代码贴上来看看
吧。 D6的自动提示功能是智能的, 你可能是用的不对。
 

Similar threads

S
回复
0
查看
3K
SUNSTONE的Delphi笔记
S
S
回复
0
查看
2K
SUNSTONE的Delphi笔记
S
S
回复
0
查看
1K
SUNSTONE的Delphi笔记
S
S
回复
0
查看
926
SUNSTONE的Delphi笔记
S
后退
顶部