FoxPro/Visual FoxPro - error de email

 
Vista:

error de email

Publicado por Ernesto Ruiz (134 intervenciones) el 12/01/2007 01:37:27
señores, eh visto este codigo que a muchos les funciona, pero a mi no me funciona
esto lo tengo dentro de un init de mi form y lo corro y me sale un error:
OLE Error code 0x80004002: Interfaz no compatible

y el codigo que tengo es el siguiente:

strProfile = "nombredeusuarioperfil"
strPassword = "passwordperfil"
strRecipient = "[email protected]"
strSubject = "Asunto"
strBody = "Este es el mensaje..."
stradjunto= "c:\datos.xls" && indicar la ruta

theApp = CreateObject("Outlook.Application")
theNameSpace = theApp.GetNameSpace("MAPI")
theNameSpace.Logon(strProfile , strPassword)
theMailItem = theApp.CreateItem(0)

theMailItem.Recipients.Add( strRecipient )
theMailItem.Subject = strSubject
theMailItem.Body = strBody
theMailItem.attachments.Add (stradjunto) && lo adjunta al mail.
theMailItem.Send
theNameSpace.Logoff


alguien me podria ayudar con esto?
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:error de email

Publicado por Plinio (7841 intervenciones) el 12/01/2007 12:58:24
Los herrores con activexs y librerias .dll son algo dificiles, pon un SET STEP ON en la primera linea del init para ver en cual linea te da el error y asi investigarlo mas facil.
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