' $System.Access Admin
' If $ContentType
'  If $Env.IsMSIE
'   $System.ContentType application/csv
'  Else
'   $System.ContentType application/octet-stream
'  EndIf
'  $System.CSV = 1
'  For $CID = 1 to 27
'   Set $r = $Address.Cards.$CID
'   $r.Rows = -1
'   For Each $Card in $r
"$Card.LastName","$Card.FirstName","$Card.MiddleName","$Card.Company","$Card.Mail"\\
'    For Each $Item in $Address.Items
'     $IID = $Item.ID
,"$Card.$IID"\\
'    Next
'    $GID = $Card.GID
'    If $Groups.$GID
,"$Groups.$GID.Name"\\
'    EndIf

'   Next
'  Next
' EndIf