FlowFact - Entwicklungstools

zurück

Function - STD_GetField
Feldinhalt aus Standarddaten abfragen

  Function STD_GetField(ByVal strFieldName As String) As String  
 


strFieldName: Name des Feldes
Rückgabewert: Feldinhalt aus der Tabelle STD. Hinweis: Es ist immer nur ein Datensatz vorhanden!


Public Function STD_GetField(ByVal strFieldName As String) As String
    Dim rs As ADODB.Recordset
    Dim strSQL As String

    strSQL = "SELECT " & strFieldName & " FROM Std"
    Set rs = m_oBase.FF_GetRecordset(strSQL)
    If Not rs.EOF Then
        STD_GetField = m_oUtil.k(rs(strFieldName))
    Else
        STD_GetField = ""
    End If
End Function