Envio correo electrónico con outlook dede VB .NET 2003 con windows

[confiar en un ensamblado]

Tengo una aplicación en la que necesito enviar un correo cuando se ejecuta el
evento que anula un registro a varios usuario, he encontrado un modulo que
funciona bien pero al enviar el correo con send me da un mensaje de seguridad.

Un programa está intentando enviar automáticamente correo electrónico en su
nombre .........

he buscado por internet veo que el problema es bastante común pero no
encuentro la solución, he visto algo sobre outlook security manager, pero no
se si es de pago, si es lo que necesito, donde lo puedo encontrar y si con
ello puedo activar y desactivar esa opción.

Si alguien conoce otra forma mas sencilla para enviar correos?. Los correos
se envian a usuarios de la red y usuarios externos. MUCAS GRACIAS

[Alberto Poblacion]

"confiar en un ensamblado" <confiarenu...@discussions.microsoft.com>
wrote in message news:1C7A6D15-E60F-4676...@microsoft.com...

¿Necesitas a la fuerza que el correo pase a través de Outlook? Si no es
asi, puedes usar la Clase System.Web.Mail para enviar los correos (si
utilizaras VS 2005 en lugar de 2003 te recomendaría el System.Net.Mail, que
es mejor que el System.Web.Mail, pero en la versión 2003 no está).

No te preocupes porque el espacio de nombres sea "System.Web". La clase
también funciona en aplicaciones WinForm si le añades al proyecto una
Referencia al System.Web.DLL.
Esta clase utiliza a través de COM el CDO (Collaboration Data Objects),
que presumiblemente tendrás ya instalado en el ordenador, para conectarse
directamente al servidor SMTP y enviar el correo sin pasar por Outloook y
sin dar ningún mensaje de aviso.

[confiar en un ensamblado]

"Alberto Poblacion" wrote:

----------------------------------------------------------------------------------
> muchas gracias, una de las formas de envio que utilizo es la que me dices, te envio el código:

Imports System.Web.Mail
Private Sub enviarmensaje1()
Try
'''---------------------------------------------
Dim ObjetoMail
''' Creamos el CDO
ObjetoMail = CreateObject("CDO.Message")
''' Configuramos el email
ObjetoMail.To = "usua...@sitio.es;usua...@sitio.com"
ObjetoMail.From = "usua...@sitio.es"
ObjetoMail.Subject = "Cambio realizado en REGISTRO"
ObjetoMail.HTMLBody = mensaje1 & " <BR> <b> " & mensaje2 &
"</b>" & " <BR> " & mensaje3
ObjetoMail.Send()
ObjetoMail = Nothing
Catch ex As Exception
MsgBox(ex.ToString)
End Try
End Sub

Me funciona correctamente en mi propia red, pero cuando utilizo el programa
desde el exterior con (CITRIX no se si lo conoces) me da el siguiente mensaje
de error.
Error de transporte en la conexion del servidor.

> otra forma que utilizo es :

Private Sub enviarmensaje2()
Try
'- Crear una aplicación Outlook.
Dim oApp As Outlook._Application
oApp = New Outlook.Application
'- Crear un nuevo elemento de correo.
Dim oMsg As Outlook._MailItem
oMsg = oApp.CreateItem(Outlook.OlItemType.olMailItem)
oMsg.Subject = "Cambio realizado en REGISTRO"
oMsg.HTMLBody = mensaje1 & " <BR> <b> " & mensaje2 & "</b>" & "
<BR> " & mensaje3
oMsg.To = "usua...@sitio.es;usua...@sitio.com"
'------------------------
Dim sBodyLen As String = oMsg.Body.Length
Dim oAttachs As Outlook.Attachments = oMsg.Attachments
Dim oAttach As Outlook.Attachment
'------------------------
oMsg.Send()
'----------------------
oApp = Nothing
oMsg = Nothing
oAttach = Nothing
oAttachs = Nothing
Catch ex As Exception
MsgBox(ex.ToString)
End Try
End Sub

EN ESTE CASO ME PIDE CONFIRMACIÓN DE ENVIO "Un programa está intentando
enviar automáticamente correo electrónico en su nombre. ¿Desea Permitirlo?.

esto no puedo permitirlo porque el usuario puede decir que no y el mensaje
no se envia.

GRACIAS DE NUEVO.

[Geovanny Quirós C.]

Yo he solucionado ese problema con esta pequeña aplicación que funciona muy
bien y ademas es gratis.

http://www.contextmagic.com/express-clickyes/

"confiar en un ensamblado" <confiarenu...@discussions.microsoft.com>

escribió en el mensaje
news:1C7A6D15-E60F-4676...@microsoft.com...

[confiar en un ensamblado]

"Geovanny Quirós C." wrote:

> MUCHAS GRACIAS
> Este programa el "ClickYes Pro" es similar al funcionamiento del Outlook Security Setting, tambien puedes desactivar las advertencias de seguridad, el problema es q lo tienes que configurar en cada PC, si utiliza la aplicación en CITRIX, que es mi caso, por lo que queda desprotegido para cualquier virus. Me gustaría encontrar algo que se pueda activar y desactivar dentro de la aplicación, me parece por lo que he leido, puede hacerse con Outlook Security Manager(este programa no lo tengo). Si encuentro algo lo describire aquí. UN SALUDO