FlowFact - Entwicklungstools

zurück

Function - AD_GetPhoneList
Telefonliste einer Adresse abfragen

In der Telefonliste können Einträge hinzugefügt, gelöscht oder geändert werden. Die Änderungen werden nach 'AD_SetPhoneList' und 'AD_Update' in die Datenbank übernommen. In der Datenbank werden die Informationen im Feld 'Telefon' in der Tabelle 'AD' gespeichert. Hierbei sind die Trennzeichen 'TAB' und 'CRLF' zu beachten.
  Function AD_GetPhoneList(ByVal rsAd As ADODB.Recordset) As clsPhoneList  
 


rsAD: Recordset der von AD_New oder AD_Find_XXX zurückgegeben wurde. Auch ein 'm_oBase.FF_GetRecordset("SELECT * FROM AD ...")' ist möglich.
Rückgabewert: Telefonliste vom Typ clsPhoneList


Public Function AD_GetPhoneList(ByVal rsAd As ADODB.Recordset) As clsPhoneList
    Dim oPhoneList As clsPhoneList

    Set oPhoneList = New clsPhoneList
    oPhoneList.AsString = m_oUtil.k(rsAd("TELEFON").value)

    Set AD_GetPhoneList = oPhoneList
End Function