Как подключить и получить всю таблицу с сервера sql и mysql, как установить sh Соединение. Я могу подключиться к нему Ms Access и получить таблицу, но сейчас у меня трудное время, чтобы найти простое и надежное решение. Я установил соединение с г-жой. Пожалуйста, помогите в соединении с другими инструментами базы данных.
Public Function Connect_To_AccessDB(strDBPath As String) As DAO.Database
Dim objAccess As Access.Application
Dim db As DAO.Database
Set objAccess = New Access.Application
Set db = objAccess.DBEngine.OpenDatabase(strDBPath, False, False)
Set Connect_To_AccessDB = db
Функция завершения
Private Sub Connect_To_AccessDB_Example () Dim AccessDB As DAO.Database
'Example to assign a database to a variable
Set AccessDB = Connect_To_AccessDB("c:\temp\TestDB.accdb")
AccessDB.Execute ("create table tbl_test3 (num number,firstname char, lastname char)")
AccessDB.Close
Set AccessDB = Nothing
'Example to delete an external database file (.accdb)
'Kill ("c:\temp\TestDB.accdb")
'Example to close Access
'DoCmd.Quit
End Sub