' $System.Access Login ' If $System.IsPost ' $Command.Address.ItemView ' If $UID ' $System.Redirect $Server?page=AddressPersonal&cid=$CID&gid=$GID ' Else ' $System.Redirect $Server?page=AddressIndex&cid=$CID&gid=$GID&com=$VCom&first=$First ' EndIf ' Exit ' EndIf $Office.Name - Display Settings for Address Book ' Sub Table $ItemsName $ViewName $FirstName $MiddleName $Mail ' Set $Items = $Address.$ItemsName ' Set $View = $Login.Address.$ViewName ' For Each $Item in $Items ' Next ' $On = $View.FirstName ' $On = $View.MiddleName ' $On = $View.Mail ' For Each $Item in $Items ' $IID = $Item.ID ' $On = $View.$IID ' Next
Last NameFirst NameMiddle Name CompanyEmail$Item.Name

' EndSub ' Init $CID = 1 ' If $CID = 27 ' $En = 1 ' EndIf Display Settings

Check the box corresponding to each property to display in the Address list for each record.

(Address List for all Users and each Group) ' $Table Items View FirstName MiddleName Mail (Personal Address List) ' $Table ItemsPersonal ViewPersonal FirstNamePersonal MiddleNamePersonal MailPersonal ' $Lines = $Login.Address.Lines ' If ! $Lines ' $Lines = 20 ' EndIf Number of the Address records to display at a time
(Except for Personal Address Book)

Display Address records in order of the company's name as default.

' If $UID ' Else ' EndIf
[Personal Address List][Address List][Top Page] [Help]