Question

vb6.0使用ADO和datagrid连接access数据库的语句是啥

录入和调出的分别是什么？求解

Answer 1

VB6.0使用ADO和datagrid连接access数据库的语句是：

    Dim cn As New ADODB.Connection '定义数据库的连接
    Dim rs As New ADODB.Recordset
    Dim sql As String
    sql = "select * from guzhang_sj" ' where madanhao='1'"
    cn.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & App.Path & "\wd.mdb;Persist Security Info=False"
    cn.Open
    rs.CursorLocation = adUseClient
    rs.Open sql, cn, adOpenDynamic, adLockOptimistic
        Set DataGrid1.DataSource = rs