VBA: Prototype Class than connects to oracle and checks if connection is up. Plus VBA singleton pattern

Here some prototyping code of a class that is able to connect to Oracle through OleDB and to check if the connection is up before doing some application logic. Class name is TUploadHelper. Private m_conn As ObjectPrivate Function GetConn_() As Object If m_conn Is Nothing Then Set m_conn = CreateObject(“ADODB.Connection”) End If Set GetConn_ = […]