为什么我执行清理数据库一些表中的数据后,再读取数据库中别的表的数据时读不出来
我执行清理数据库一些表中的数据后,也就是系统初始化
再读取数据库中没被初始化的表的数据时,
规格类型表没被清理,但将规格类型表中的数据加到Combo3中,数据没有,可没被清理之前很正常
Adodc1.RecordSource = "select * from 规格类型表 "
Adodc1.Refresh
If Adodc1.Recordset.RecordCount = 0 Then Exit Sub
For i = 0 To Adodc1.Recordset.RecordCount - 1
Combo3.AddItem Adodc1.Recordset.Fields(0).Value
Adodc1.Recordset.MoveNext
Next
On Error Resume Next
[解决办法]
补充一下是SQL数据库
[解决办法]
'读取数据库之前先将控件中的数据删除
Combo3.clear '<----加上这句
Adodc1.RecordSource = "select * from 规格类型表 "
Adodc1.Refresh
If Adodc1.Recordset.RecordCount = 0 Then Exit Sub
For i = 0 To Adodc1.Recordset.RecordCount - 1
Combo3.AddItem Adodc1.Recordset.Fields(0).Value
Adodc1.Recordset.MoveNext
Next
On Error Resume Next
