Access - Esto no me FUNCIONA

 
Vista:

Esto no me FUNCIONA

Publicado por Lulu (56 intervenciones) el 10/04/2007 09:56:07
Hola, estoy intentando enviar un afichero de Word con el objeto DoCmd.SendObject pero no tengo claro si eso se puede hacer, porque me da un buen fallo, no reconoce la ruta del fichero:

strAdjunto="c:\Envios\fichero1"
strDest="[email protected];[email protected]"
strTitulo="ASUNTO1"
strTexto="Hola que tal esto es el cuerpo del mensaje"

DoCmd.SendObject acSendReport, strAdjunto, acFormatSNP, strDest, , , strTitulo, strTexto, False, False

y me da el siguiente error:

Se ha producido el error '2103' en tiempo de ejecución:
El nombre del informe 'c:\Envios\fichero1' que introdujo en la hoja de propiedades o en la macro está mal escrito o se refiere a un informe que no existe.

Qué hago mal????? gracias por la ayuda. Un saludo.
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder

RE:Esto no me FUNCIONA

Publicado por Lulu (56 intervenciones) el 10/04/2007 16:06:39
Vale ya he descubierto que sendObject sólo puede enviar informes de la base de datos...

y lo que he hecho es lo siguiente pero no sé porqué me da el fallo que me da:

Private Sub pruebaEnvios(strDest As String)
Dim f As Integer

Dim objEmail As New Outlook.Application
Dim objMnsj As Outlook.MailItem
'Attachments = strAdjunto 'esto puede dar error

Set objMnsj = objEmail.CreateItem(olMailItem) 'creamos un nuevo email
With objMnsj
.To = strDest
.Subject = strTitulo
.Body = strTexto
.CC = strCC
'añadimos fichero adjunto
.Attachments.Add (strAdjunto)
.Send 'enviamos el mensaje
End With

Set objMnsj = Nothing
Set objEmail = Nothing


End Sub

me da error en el olMailItem, me dice que no se encuentra el proyecto o librería. Me falta algo por referenciar????? he marcado el Microsoft Outlook 9.0 Object Library, pero no sé si hace falta algo más. Gracias de nuevo
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar