Simple VB emailer

Printable View

Show 60 post(s) from this thread on one page

Aug 19th, 2005, 02:32 PM
moeur

Re: Simple VB emailer

No, this is a much more complex topic.

Re: Simple VB emailer

I wonder if this works i need it:

VB Code:

Do until send = 20
With SMTP
 .Sender = send
 .Recipient = "whomever@" & send & ".com"
 .SMTPhost = "smtp.myserver.com"
 .Subject = "SMTP test"
 .OpenMail
 If Not .Connected Then Exit Sub
 .Send "Bill,"
 .CloseMail
End With
send = send + 1
doevents
loop

will this send 20 emails to one person?

Re: Simple VB emailer

Quote:
Originally Posted by Iron Skull
I wonder if this works i need it:
VB Code:
Do until send = 20
With SMTP
 .Sender = send
 .Recipient = "whomever@" & send & ".com"
 .SMTPhost = "smtp.myserver.com"
 .Subject = "SMTP test"
 .OpenMail
 If Not .Connected Then Exit Sub
 .Send "Bill,"
 .CloseMail
End With
send = send + 1
doevents
loop
will this send 20 emails to one person?
Why would you want to send the same email to the same person 20 times?

Sep 17th, 2005, 02:30 PM
Iron Skull

Re: Simple VB emailer

Someone asked me to make a program that sends one email more often at once i dont know why
Sep 18th, 2005, 07:46 AM
Iron Skull

Re: Simple VB emailer

were can i find the Dll?
Sep 18th, 2005, 08:58 AM
manavo11

Re: Simple VB emailer

What dll? :ehh:
Sep 18th, 2005, 10:02 AM
Iron Skull

Re: Simple VB emailer

i meen OCX i already found it :)
Feb 8th, 2006, 07:04 PM
CVMichael

Re: Simple VB emailer

Hi moeur, how can I send the e-mail in html format ?

I tried something like:

Code:

.Send "<html><body>" .Send "Testing...<br>" .Send "</body></html>"

But that just sends as is, it does not convert to html on the receiving side...
Feb 8th, 2006, 08:09 PM
moeur

Re: Simple VB emailer

Quote:

how can I send the e-mail in html format ?

I don't think this is part of the Simple Mail Transfer Protocol but is instead something in the mail message that the client (like outlook) sees and knows the rest of the message is html.

I don't know what that is. If I could see the entire message sent to outlook including all the header info the I could see it.

I check around...
Feb 8th, 2006, 08:44 PM
moeur

Re: Simple VB emailer
try adding somthing like
Content-Type: html/text
I played around a little but didn't get it quite right
add a line to the classes OpenMail method after the part where it sends the subject
VB Code:
```
Winsock.SendData "Content-Type: html/text" & vbCrLf
```
I'll play some more if I get time later.
Feb 25th, 2006, 04:20 PM
moeur

Re: Simple VB emailer
I posted the final solution to this earlier, but for some reason my post was deleted.

Add this line to the OpenMail subroutine somewhere
VB Code:
```
Winsock.SendData "Content-Type: html/text; charset=ISO-8859-1" & vbCrLf
```
Apr 18th, 2006, 06:02 AM
jouster

Re: Simple VB emailer

I tried this code , but i keep getting an error in the CloseMail sub.
Gives me an error about wrong connection status? Anyone seen this?
Apr 18th, 2006, 09:48 AM
moeur

Re: Simple VB emailer

show me how you are using it.
May 7th, 2006, 09:55 PM
mellts

Re: Simple VB emailer

Hi ,

i try sending using normal address it works(eg. [email protected]) however if I use something like [email protected] I will receive an error . can you teach me how to send an email using IP address.

Thanks
Nov 11th, 2006, 01:41 PM
ajaythacker

Re: Simple VB emailer

Hi,
I am not able to send mails to multiple recipients. If i send it to single recipeint then it works fine, but it fails everytime i try sending it to more then one recipient.

i need help pls.
Mar 15th, 2012, 06:29 AM
kotinadh

Re: Simple VB emailer

Quote:

Originally Posted by moeur

It's been a long time since I used VB5. Try this prpject to see if it works. Then you can incorporate it into your project.

Hi There,

I am new to this forum, I tried ur' code but unable to sending mails. I am getting the error like "runtime error 40020" and the position is "If Not .Connected Then Exit Sub"

Best regards,
Kotinadh

Show 60 post(s) from this thread on one page

All times are GMT -5. The time now is 10:47 PM.