Adding fax to distribution list

[Gensor]

I would like to create a Distribution List of fax numbers using Visual Basic.

I used this to add email address to a DL :

Set otlRecipient = otlApp.Session.CreateRecipient(itmClient.Email1DisplayName)
 
  If otlRecipient.Resolve = True Then
    Call m_otlDistList.AddMember(otlRecipient)
      
    Call m_otlDistList.Save
  Else
    Call MsgBox("Can't find client!", vbOKOnly, "Erreur")
  End If

But I don't know how to add fax.

What should my recipient contain to add it as a fax number instead of an email address ?



I do have another question.

Each time I'm running this code, a dialog appears saying this :

A program is trying to access e-mail addresses you have stored in Outlook. Do you want to allow this ?

If this is unexpected, it may be a virus and you should choose "No".

How can I remove this dialog ??

Is there an Outlook setting for this ? Something like "Always allow ..."