Подключение к базе данных Microsoft SQL через VBA (ADODB) с наименьшим риском нанести вред базе данных
В настоящее время я ищу способ подключения к базе данных Microsoft SQL Server через VBA (ADODB) с акцентом на минимальный риск нанесения вреда, блокирования и изменения структуры базы данных. Для этого доступ только для чтения.
Моя попытка заключается в следующем:
Set DBConn = New ADODB.Connection
Set TmpRecset = New Recordset
DBConn.ConnectionString = pConnStr
DBConn.Open
On Error GoTo TermConnection
With TmpRecset
.ActiveConnection = DBConn
.Source = pQuery
.LockType = adLockReadOnly
.CursorType = adOpenForwardOnly
.CursorLocation = adUseClient
.Open
End With
On Error GoTo TermRecordset
//Doing something useful with TmpRecset
On Error GoTo 0
TermRecordset:
TmpRecset.Close
Set TmpRecset.ActiveConnection = Nothing
TermConnection:
DBConn.Close
Set DBConn = Nothing
End Sub
И я использую следующую строку подключения:
"Provider=SQLOLEDB;Data Source=IP\Database;Initial Catalog=Databasename;Trusted_connection=yes;"
Я использовал ручную обработку ошибок, чтобы гарантировать, что набор записей и база данных закрыты, что бы ни случилось. С помощью параметров набора записей я определяю доступ только для чтения.
Существуют ли другие механизмы, обеспечивающие целостность базы данных?
С наилучшими пожеланиями