Skip to main content

The title says it all.. I am using VBA to query the IFS database and once I get my results back, I want to close the connection. How can I do that? The obvious/usual methods (my_conn.Close / my_conn.Dispose) do not seem to work..

 

Function QueryIFS(query As String, Optional silent As Boolean = False) As FndDataTable

Dim conn_uni As FndConnection
Dim oCmd_uni As FndPLSQLSelectCommand

Set conn_uni = New FndConnection
conn_uni.ConnectionString = <redacted>
conn_uni.CatchExceptions = silent
conn_uni.Locale = "en-US"
conn_uni.setcredentials <redacted>, <redacted>

Set oCmd_uni = New FndPLSQLSelectCommand
Set oCmd_uni.connection = conn_uni

conn_uni.CommandText = query
Set QueryIFS = conn_uni.ExecuteReader()

'NOW WHAT ? HOW DO I CLOSE conn_uni ?

Set conn_uni= Nothing 'this just releases the memory

End Function

 

Be the first to reply!