Email In VB 2005

[BarryM]

Hi im making a program that sends emails. The programs sends them via outlook at the moment and does work but it comes up with an enoying message each time you send email sayin that this could be a virus do you want to go ahead. How do i stop the massage poping or is their another way of sending emails.

This is the coding im using

Dim oOApp As Outlook.Application
Dim oOMail As Outlook.MailItem
oOApp = CreateObject("Outlook.Application")
oOMail = oOApp.CreateItem(Outlook.OlItemType.olMailItem)
With oOMail
.To = "email address to send to"
.Subject = "email from vb"
.Body = "this email was sent from vb"
.Send()
End With

plus does anybody know how to connect to an online database

[anuragshrivastava64]

Hi im making a program that sends emails. The programs sends them via outlook at the moment and does work but it comes up with an enoying message each time you send email sayin that this could be a virus do you want to go ahead. How do i stop the massage poping or is their another way of sending emails.

This is the coding im using

Dim oOApp As Outlook.Application
Dim oOMail As Outlook.MailItem
oOApp = CreateObject("Outlook.Application")
oOMail = oOApp.CreateItem(Outlook.OlItemType.olMailItem)
With oOMail
.To = "email address to send to"
.Subject = "email from vb"
.Body = "this email was sent from vb"
.Send()
End With

plus does anybody know how to connect to an online database

That is actually Outlook property
Anways try this
It worked for me
But doesn't work properly if there are too many e-mail address

With oOMail
.To = "email address to send to"
.Subject = "email from vb"
.Body = "this email was sent from vb"
.NoAging = True
.Display
End With

[debasisdas]

If you know PL/SQL , can send mail from Oracle directly.

[BarryM]

If you know PL/SQL , can send mail from Oracle directly.

could you please give an a example or a link to an example