G
Guest
Hi , thanks for the help in advance.
When I send to people who are stored in any address book, the SafeItem.TO property is blank.
Here is a sample pseudo code:
Public Sub ItemSend(ByVal Item As Object, Cancel As Boolean)
Dim SafeItem As Redemption.SafeMailItem
set SafeItem = createobject("Redemption.SafeMailItem")
SafeItem.Item = Item
MsgBox(SafeItem.To) <-------- this shows blank, no sec prompt
MsgBox(SafeItem.Item.To) <------ this shows the recipient (but triggers the sec prompt)
End Sub
When I send to people who are stored in any address book, the SafeItem.TO property is blank.
Here is a sample pseudo code:
Public Sub ItemSend(ByVal Item As Object, Cancel As Boolean)
Dim SafeItem As Redemption.SafeMailItem
set SafeItem = createobject("Redemption.SafeMailItem")
SafeItem.Item = Item
MsgBox(SafeItem.To) <-------- this shows blank, no sec prompt
MsgBox(SafeItem.Item.To) <------ this shows the recipient (but triggers the sec prompt)
End Sub