Function | Mkm_Add(ByVal strTable As String, ByVal strLinkDsn As String, ByVal strMkmDSNCommaList As String) As Boolean |
---|---|
strTable: Tabellenname der Haupttabelle strLinkDsn: Datensatznummer der Haupttabelle z.B. AD, Obj ... strMkmDSNCommaList: Die Datensatznummer (DSN) des Merkmals bzw. durch Komma getrennte Liste von mehreren Merkmal-Dsn's Rückgabewert: = True, wenn das Merkmal hinzugefügt werden konnte Public Function Mkm_Add(ByVal strTable As String, ByVal strLinkDsn As String, ByVal strMkmDSNCommaList As String) As Boolean Dim strItem As String While strMkmDSNCommaList <> "" strItem = m_oTools.StrList_DeleteFirst(strMkmDSNCommaList, ",") Mkm_Switch strTable, strLinkDsn, "", strItem Wend End Function |