Google Groups no longer supports new Usenet posts or subscriptions. Historical content remains viewable.
Dismiss

Eliminar confirmacion envio outlook

344 views
Skip to first unread message

conde24

unread,
Mar 22, 2004, 10:56:38 AM3/22/04
to
hola. Gracias por ayudarme en lo siguiente: ¿Saben como elimino la
confirmación de envio de outlook cuando en access quiero enviar un correo a
través de cód. VBA?

Estamos conectados a un Exchange Server 5.5 Segun entiendo, el Exchange me
podria ayudar con esta notificacion...

Gracias a todos

PABLO


José Mª Fueyo (Desde el curro)

unread,
Mar 22, 2004, 1:32:26 PM3/22/04
to
Hola Pablo.
Esto se respondió hace tiempo. Léete éste artículo
OL2000: Administrator Information About the Outlook E-mail Security Update
http://support.microsoft.com/default.aspx?scid=kb;en-us;263297

Salu2
--
José Mª Fueyo
[MS MVP Access]


conde24

unread,
Mar 22, 2004, 1:49:10 PM3/22/04
to
Hola
Miguel me pregunto como se ha de manejar mails por Access. Esto se puede
hacer a través de Macros, o en el mejor de los casos, VBA. Adjunto codigo de
VBA para que se vea mejor:

' Declaraciones necesarias para abrir una instancia de Exchange. Es
interesante trabajar con estas declaraciones, ya que en caso de necesitar
los comprobantes de LEIDO (previamente configurados en Outlook) este código
lo requiere.

Dim myOlApp As Outlook.Application
Dim myNameSpace As Outlook.NameSpace
Dim myfolder, myitem As Object

Set myOlApp = CreateObject("Outlook.Application") ' para marco de
trabajo
Set myNameSpace = myOlApp.GetNamespace("MAPI") ' para marco de trabajo
Set myfolder = myNameSpace.GetDefaultFolder(olFolderInbox) ' para marco
de trabajo. Hay varias constantes que definen el tipo de carpeta
predeterminada con la cual vamos a trabajar: olTaskFolder (para agregar una
tarea en outlook por ejemplo. olMeetFolder (agregar una cita), olFolderInbox
(un correo electronico), etc... puedes ver todas las constantes escribiendo
una en el VBA y presionando F1.
Set myitem = myfolder.Items.Add ' AÑADIENDO UN NUEVO ITEM A LA CARPETA
olFolderInbox declarada en la sentencia anterior (o sea un nuevo correo)
myitem.To = <CORREO ELECTRONICO AL CUAL ENVIAR CORREO>
myitem.Subject = <TEMA EN STRING DE UN CORREO ELECTRONICO (SUBJECT)>
myitem.Categories = <Este item me es util para utilizar las herramientas
de Outlook, y pueda ver la información filtrada por una categoria. Por
ejemplo, puede darse el caso que en sistemas HELPDESK todos se manejen por
un codigo. Aqui, se puede meter el codigo, y desde Outlook utilizar las
herramientas de Filtrado, ordenación, etc para ver todos los correos
electronicos gerenados por el sistema>
myitem.Body = <CUERPO DEL MENSAJE DE UN EMAIL> myitem.Display '
mostrando...
myitem.Send ' ENVIANDO AUTOMATICAMENTE. Se puede sustituir colocando
DISPLAY y en vez de enviar, muestra el correo antes de enviarlo.

Espero que te sirva Miguel

Saludos

PABLO


conde24

unread,
Mar 22, 2004, 5:00:29 PM3/22/04
to
Muchas gracias Jose por tu ayuda

PABLO

"José Mª Fueyo (Desde el curro)" <jmf...@NOSPAMya.com> wrote in message
news:uaRkAwDE...@TK2MSFTNGP11.phx.gbl...

Miguel

unread,
Mar 23, 2004, 9:17:26 AM3/23/04
to

Muchas Gracias Pablo..


>-----Mensaje original-----

>.
>

0 new messages