![]() |
FlowFact - Entwicklungstools |
![]() |
Function | EMSK_New() As ADODB.Recordset |
Rückgabewert: Recordset mit allen Feldern Public Function EMSK_New() As ADODB.Recordset Dim rsEMSK As ADODB.Recordset Set rsEMSK = m_oBase.Sql_Find("EMSK", "1=2") rsEMSK.AddNew rsEMSK("DSN").value = m_oUtil.NewGUID() rsEMSK("Aktiv").value = 1 Set EMSK_New = rsEMSK End Function |