- Код: Выделить всё
rst.close
conn.close
Или надо как-то по другому делать? В проекте множество рекордсетов и коннектов, проблема в том, что иногда Акцесс не выгружается из памяти.
rst.close
conn.close
Set appWord = GetObject(, "Word.application")
If Err = 429 Then
Set appWord = New Word.Application
Err = 0
End If
Set appWord = Nothing
Сейчас этот форум просматривают: AhrefsBot, Google-бот и гости: 30