翼峰之巅手指滑板图片:新编度系统怎么连接数据库＜＞VB6.0＋ACCESS

来源：百度文库编辑：杭州交通信息网时间：2024/04/29 12:10:23

请详细点！

给你个用ADO实现数据库连接并将数据显示在DataGrid1中的例子
希望对你有帮助～

工程->引用->Microsoft Activex Data Objects 2.0 Library 后面为版本号

Dim Conn As ADODB.Connection
Dim Rs As ADODB.Recordset
Private Sub Form_Load()
Set Conn = New ADODB.Connection
Set Rs = New ADODB.Recordset
Conn.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=数据库路径;Persist Security Info=False"
Conn.Open
Conn.CursorLocation = adUseClient
Rs.Open "select * from tablename", Conn, adOpenKeyset, adLockOptimistic
Set Me.DataGrid1.DataSource = Rs
End Sub

新编度系统怎么连接数据库＜＞VB6.0＋ACCESS vb6.0连接数据库语句 VB6.0中ADO连接网络数据库应该怎么设置怎样才能在VB6.0 中连接Access 2003数据库怎样才能在VB6.0 中连接Access 2003数据库局域网中有vb6.0连接vf数据库谁有关于vb6连接数据库书籍 vb6.0 编程数据库访问谢谢帮帮我VB6.0连接数据库问题实时错误3709 在VB6.0中用AOD连接ACCESS数据库如何实现多项高级查找