B
Bob Vance
I am wanting to enter tblOwnerInfo.LastName,"," TblOwnerInfo.FirstName with
the tblOwnerInfo.Email (Address) to Sent Items to box?
Is this Possible
strMail = Nz(DLookup("Email", "tblOwnerInfo", "OwnerID = " & lngID), "")
Public Function OwnerEmailAddress(idOwner As Long) As Variant
If IsOwnerWithEmail(idOwner) Then
OwnerEmailAddress = DLookup("", "tblOwnerInfo", "[OwnerID]="
& idOwner)
Else
OwnerEmailAddress = Null
End If
End Function
the tblOwnerInfo.Email (Address) to Sent Items to box?
Is this Possible
strMail = Nz(DLookup("Email", "tblOwnerInfo", "OwnerID = " & lngID), "")
Public Function OwnerEmailAddress(idOwner As Long) As Variant
If IsOwnerWithEmail(idOwner) Then
OwnerEmailAddress = DLookup("", "tblOwnerInfo", "[OwnerID]="
& idOwner)
Else
OwnerEmailAddress = Null
End If
End Function