我是用VB自带的ACCESS数据库的~~用data控件连接数据库~~
Data1.Refresh
Do While Data1.Recordset.EOF = False
If Data1.Recordset("类型")=text1.text Then
..........................
End If
Data1.Recordset.MoveNext
Loop
但是这样读取数据库的话~~当数据库记录成几千过万条记录时就肯定会变得好慢~~如何提高Access数据库读取速度?????请高手指点(不要告诉我用SQL等,我不会)
请贴上代码(最好详细一点,有说明)
经测试有效的马上结贴给分~~分数对我也说是没用的~~我要的是技术~我绝对不会吝惜分数~~大家绝不会白答的~~ ^_^
Data1.Refresh
Do While Data1.Recordset.EOF = False
If Data1.Recordset("类型")=text1.text Then
..........................
End If
Data1.Recordset.MoveNext
Loop
但是这样读取数据库的话~~当数据库记录成几千过万条记录时就肯定会变得好慢~~如何提高Access数据库读取速度?????请高手指点(不要告诉我用SQL等,我不会)
请贴上代码(最好详细一点,有说明)
经测试有效的马上结贴给分~~分数对我也说是没用的~~我要的是技术~我绝对不会吝惜分数~~大家绝不会白答的~~ ^_^
strsql=" select * from tablename where 类型='"& trim(text1.text) &"'"
Data1.Refresh
If Data1.RecordSet.Eof Then
......
End If
Data1.Refresh
Do While Data1.Recordset.EOF = False
.......................... Data1.Recordset.MoveNext
Loop
刚才少了一个“&”
学sql入门容易学精就要一段时间了,不过依你现在刚初学应该可以应付的了你目前的工作。
Do While Data1.Recordset.EOF = False
Data1.Recodeset.Index="类型"
If Data1.Recodeset.Seek "=",text1.text Then
..........................
End If
Data1.Recordset.MoveNext
Loop
请教大家几个问题~~
1.VB如何连接SQL数据库
2.怎样添加.修改.删除.查询SQL数据库~~
请大虾们贴出详细代码~~最好带说明~~谢谢~~
答者有分~~