![]() |
FlowFact - Entwicklungstools |
![]() |
Function | VERTRAEGE_FindDSN(ByVal strWhere As String, Optional ByVal strOderBy As String = "") As String |
strWhere: Der WHERE-Teil einer SELECT-Abfrage strOderBy: Der ORDER BY-Teil einer SELECT-Abfrage Rückgabewert: Datensatznummer (DSN) oder 'LEER' Public Function VERTRAEGE_FindDSN(ByVal strWhere As String, Optional ByVal strOderBy As String = "") As String Dim rs As ADODB.Recordset Set rs = m_oBase.Sql_Find("VERTRÄGE", strWhere, strOderBy) If rs.EOF = False Then VERTRAEGE_FindDSN = rs("DSN") Else VERTRAEGE_FindDSN = "" End If End Function |