VB6+access2003数据库连接问题
有关数据库连接问题,VB6+access2003.
在窗体上加了一个DataGrid控件。
程序代码如下:
Private Sub Form_Load()
Dim DBConn As New ADODB.Connection
Dim Rs As New ADODB.Recordset
DBConn.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & App.Path & "\rate.mdb;Persist Security Info=False"
DBConn.Open
Rs.Open "Select * from 流速范围", DBConn, adOpenStatic, adLockOptimistic
Set DataGrid1.DataSource = Rs
End Sub
错误现象:
运行后,无错误提示,但DataGrid控件是空的。
不知什么原因。请各位高手帮助诊断一下。先谢谢了!