I have an application that among others will generate a new contact
list into a specific pst file with data coming from my db.  I need to
get rid of the security message that I get buy invoking the
Recipients.  I am not sure how to integrate Redemption to my code and
make it work.  Please show me some samples that will use this method,
I need to overcome this item to complete my application.

This is a my code with one item to add that works fine except for the
security dialog.  I use a brief method here, but my actual method will
crate many DL with many items on each.

'-----------------------------------------------------------------------
Dim LGPDistList As DistListItem
Dim myTempItem As MailItem
Dim myRecipients As Recipients
'-----------------------------------------------------------------------
'--gol is set as oulook application
'--MyItems is pointing to my contact item in my contact folder of my
pst
'-----------------------------------------------------------------------

Set LGPDistList = MyItems.Add(olDistributionListItem)
Set myTempItem = gol.CreateItem(olMailItem)
Set myRecipients = myTempItem.Recipients

LGPDistList.DLName = "Testing"  
myRecipients.Add "A valid address here"
 
LGPDistList.AddMembers myRecipients
LGPDistList.Save