Stampa dei contatti aggiuntivi di una anagrafica

Creato il: 07.09.2016
Quando si devono stampate dei dettagli di una anagrafica, l'utilizzo dei campi nativi consente la stampa solo dei rifrimenti telefonici e fax del primo contatto inserito. Se in una anagrafica sono inseriti piu' numeri di telefono o fax questi non sono stampabili in modo semplice.
La possibilita' di stampare queste informazioni comunque esiste, tramite l'utilizzo di script, come in questo esempio
Option Explicit
 
Dim Contatto
Dim output
 
output=""
For Each Contatto In Anag.Contacts
    If output<>"" Then
        output=output & vbCrLf
    End If
    output=output & Contatto.Name
    If Contatto.PhoneNumber<>"" Then
        output=output & " - Tel " & Contatto.PhoneNumber
    End If
    If Contatto.CellularNumber<>"" Then
        output=output & " - Cell." & Contatto.CellularNumber
    End If
Next
Response.Write(output)

Argomenti correlati

Login