Asp / Jmail Loop Need Help

Hello
Iam some what new to asp and programing. I have put together this code, so I can send out a mailing list to some users. The code looks and seams to run fine. But I dont receive any test messages during when I execute it. it's like the SMTP sever is not sending the emails.

Any help would be great. Cheers.

Creepy

------------------------------------------------------------------

Response.Write ("Newsletters are being created")
Response.Write ("<p>")

Dim strRecipient
Dim strFrom
Dim strSubject
Dim strBody
Dim Jmail


'loop through entries
While not rsEmailAddress.EOF
'get the results from the newsletter form
strFrom = Session("svFrom")
strSubject = Session("svSubject")
strBody = Session("svMessage")

strRecipient = rsEmailAddress.Fields.Item("EmailAddress").Value

'create an instance of the Jmail object
Set Jmail = Server.CreateObject("JMail.SMTPMail")
'set Jmail various properties
JMail.ServerAddress = "smtp.domainname.com"
JMail.ContentType = "text/html"
JMail.AddRecipientBCC strRecipient
JMail.Sender = strFrom
JMail.Subject = strSubject
JMail.Body = strBody
JMail.addHeader "Originating-IP", Request.ServerVariables("REMOTE_ADDR")
Jmail.Execute
'print message for every entry
Response.Write ("message sent to " & strRecipient & "<br>")
'move to next entry in database
rsEmailAddress.MoveNext
Wend
'message to admin saying creation has completed
Response.Write ("<p>")
Response.Write ("newsletter creation completed