请教：窗体中有一个ADO DATA CONTROL 控件ADODC1，在程序中能否指定ADODC1的数据源？

Question

请教：窗体中有一个ADO DATA CONTROL 控件ADODC1，在程序中能否指定ADODC1的数据源为某一*.MDB数据库，最好使用相对路径的数据源？

Answer 1

cnn.CursorLocation = adUseClient '
                 cnn.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=D:\proCMMS\msDATA.mdb;Persist Security Info=True;Jet OLEDB:Database Password=****"                  Set rs = New ADODB.Recordset
                    With rs
                        .CursorType = adOpenDynamic
                        .CursorLocation = adUseClient
                        .LockType = adLockOptimistic
                        .Source = "select * from tblactivity "
                    Set .ActiveConnection = cnnCMMS
                        .Open
                    End With                Set ADODC1.Recordset = rs