Заполнить таблицу в SubForm ACCESS vba - PullRequest
0 голосов
/ 21 января 2019

У меня есть приложение MS Access и у меня есть путь подключения с другого компьютера через IP. Как я могу получить весь список записей в SubForm?

Sub Load_All_User()
Dim cn As Object
Dim rst As Object
Dim strConnection As String
Dim strSql As String

Set cn = CreateObject("ADODB.Connection")
strConnection = "Provider=Microsoft.ACE.OLEDB.12.0;" & "Data Source=" & "\\172.16.25.5\ACC\" & "test_connect.mdb"
strSql = "SELECT * FROM tbUser"
cn.Open strConnection
Set rst = cn.Execute(strSql)

If rst.BOF And rst.EOF Then
MsgBox "No data found"
Exit Sub
Else
    Child7.SourceObject=??????????????
End If

rst.Close
Set rst = Nothing
cn.Close
Set cn = Nothing
End Sub
Добро пожаловать на сайт PullRequest, где вы можете задавать вопросы и получать ответы от других членов сообщества.
...