Что нужно включить в инсталл., чтобы работало ADO Jet 4.0? - VB
Формулировка задачи:
Насколько капризен ADO, если приложение на VB его использует? Нужно ли что-то включать в инсталяционный пакет? Или этот драйвер Jet 4.0 имеется на каждом компьютере?
Решение задачи: «Что нужно включить в инсталл., чтобы работало ADO Jet 4.0?»
textual
Листинг программы
Dim AdoConnection As ADODB.Connection
Dim ConnectionString As String
Dim mdb_file_Z As String
Set AdoConnection = CreateObject("ADODB.Connection")
ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & mdb_file_Z & _
";Mode=Share Deny None;Persist Security Info=False"
AdoConnection.Open ConnectionString