Access'den Email Gönderme

[foreigner]

Selamlar

Aşağıda verdiğim komut ile access'te oluşturduğum form üstünden seçili şahsa tekli email gönderebiliyorum.
-----------------------------
Dim stDocName As String
Dim stLinkCriteria As String
Dim Subject As String
Dim Message As String

If IsNull([E-Mail]) Or ([E-Mail]) = "" Then
MsgBox "Bu şahsa ait kayıtlı e-mail adresi yok"
Exit Sub
Else
stLinkCriteria = Me![E-Mail]
stSubject = ""
DoCmd.SendObject acSendNoObject, , , stLinkCriteria, , , stSubject
End If
------------------------
Tüm database'de kayıtlı email adreslerine çoklu mail gönderebilmek için ne eklemem gerekiyor?

Ayrıca "şehir" "iş" gibi sahalara göre filitreleme yaptırabilirmiyim?

Şimdiden teşekkürler