ASP Email Type Mismatch Error

[flashnv]

I am using Persits to send email newsletters to all ids in a database.

The main code is:

While Not rs.EOF
Set sub_email = rs("email")
Set Mail = Server.CreateObject("Persits.MailSender")
Mail.Host = "mysite.com" ' Required
Mail.Port = 25 ' Optional.
Mail.FromName = "Newsletter from mysite.com"
Mail.From = "[e-mail]"
Mail.AddAddress sub_email
Mail.UserName="[e-mail]"
Mail.Password="cards"
Mail.Subject = my_subject
Mail.Body = my_message & rs("email")
On Error Resume Next
Mail.Send

But I get the following Type Mismatch error:
Type mismatch: 'AddAddress'

What am I doing wrong here?

[defanjos]

Mail.AddAddress sub_email

should be:
Mail.AddAddress = sub_email

BTW, welcome to WebmasterWorld

[flashnv]

Hi Defanjos,

Thanks for your suggestion. I tried that but get adifferent error on using '=':
Object doesn't support this property or method: 'AddAddress'

Any other ideas? Thanks nevertheless...

[defanjos]

Sorry, my mistake.

It should not have the "=" sign.

Try this:
Mail.AddAddress sub_email, "John Smith"

John Smith, obviously, can be any name.

It might even work like:
Mail.AddAddress sub_email, ""

Addition:
I think the problem could be here:

Set sub_email = rs("email")

Why don't you do:

dim sub_email
sub_email = rs("email")

[flashnv]

Hi there!

Tried both your suggestions. It still doesn't work. Gives the same Type Mismatch error...

[defanjos]

Do you have any empty or invalid email addresses on the "email" field of the db? That could be the problem.

[flashnv]

Hi,

Thanks so much, that's what the problem was - empty email addresses. Thanks a ton! Really appreciate it...