' $System.Access Admin
' If $System.IsPost
' If $Add
' $System.Redirect $Server?page=OfficeUserAdd&gid=$GID
' Elif ! $ID
' $System.Redirect $Server?page=OfficeUserBrowse&gid=$GID
' Elif $Remove
' $System.Redirect $Server?page=OfficeUserDelete&id=$ID&gid=$GID
' Elif $Modify
' $System.Redirect $Server?page=OfficeUserModify&id=$ID&gid=$GID
' Else
' If $GID and $Up
' $Groups.$GID.Users.OrderUp $ID
' Elif $GID and $Down
' $Groups.$GID.Users.OrderDown $ID
' Elif $Up
' $Users.OrderUp $ID
' Elif $Down
' $Users.OrderDown $ID
' EndIf
' $System.Redirect $Server?page=OfficeUserBrowse&id=$ID&gid=$GID
' EndIf
' Exit
' EndIf
$Office.Name - User Settings
' If $GID
' Set $g = $Groups.$GID.Users
' Else
' Set $g = $Users
' EndIf