Rückgabewert: Recordset mit dem aktuellen Datensatz der Tabelle 'Ben'


Public Function FF_CurrentUserRS() As ADODB.Recordset
    Select Case m_oApplication.FlowFact_InitType
        Case INITTYPE_APPLICATION
            Set FF_CurrentUserRS = m_oApplication.FlowFact_Application.CurrentUserRS()
        Case INITTYPE_CONNECTOR
            Set FF_CurrentUserRS = m_oApplication.FlowFact_Connector.CurrentUserRS()
        Case Else
            RaiseError_NotInit
    End Select
End Function