FiveTech Support Forums

FiveWin / Harbour / xBase community
Board index FiveWin para Harbour/xHarbour Enviar correo con Lotus Notes
Posts: 564
Joined: Thu Oct 13, 2005 09:23 AM
Enviar correo con Lotus Notes
Posted: Thu Apr 06, 2006 10:29 AM

Hola:
Alguien tiene un ejemplo de como enviar correo a través de Lotus Notes ? Se tiene que hacer usando OLE, pero no doy con la secuencia correcta de mandatos para hacerlo.

Saludos,

Posts: 44158
Joined: Thu Oct 06, 2005 05:47 PM
Enviar correo con Lotus Notes
Posted: Thu Apr 06, 2006 10:42 AM

Jose Luis,

Existe un software cliente de Lotus Notes que se pueda instalar libremente ? O un demo ?

regards, saludos

Antonio Linares
www.fivetechsoft.com
Posts: 44158
Joined: Thu Oct 06, 2005 05:47 PM
Enviar correo con Lotus Notes
Posted: Thu Apr 06, 2006 10:43 AM

Jose Luis,

Sabes cual es la cadena de descripción de OLE ?

regards, saludos

Antonio Linares
www.fivetechsoft.com
Posts: 564
Joined: Thu Oct 13, 2005 09:23 AM
Enviar correo con Lotus Notes
Posted: Thu Apr 06, 2006 10:53 AM

No se si hay demo de Notes, creo que no porque va asociado al servidor Domino de IBM.

Un ejemplo con VB de lo que quiero hacer sería este:

Set session = CreateObject("Notes.NotesSession")
Set db = session.GetDatabase("", "")
Set doc = db.CreateDocument()

doc.Form = "Main Topic"
doc.Subject = Form1.Text3.Text
doc.Body = Form1.Text2.Text
Call doc.Save(True, False)

Lo que no tengo claro con OLE es cuando tengo que crear un objeto con CreateDocument y como llamar a un método del objeto. Por ejemplo, si hago esto:

oNotesSession := CreateObject( "Notes.Notessession" )
oNotesDb := oNotesSession:GetDatabase( "","" )
oNotesDb:Invoke("CreateDocument")

me pega un truene tremendo al crear el documento.

Saludos,

Posts: 44158
Joined: Thu Oct 06, 2005 05:47 PM
Enviar correo con Lotus Notes
Posted: Thu Apr 06, 2006 11:19 AM

Jose Luis,

Te refieres a un GPF, si ?

Sabes si Lotus Notes es un Activex ó un servicio OLE solamente ?

Tienes acceso al IDE de C3 ?

regards, saludos

Antonio Linares
www.fivetechsoft.com
Posts: 564
Joined: Thu Oct 13, 2005 09:23 AM
Enviar correo con Lotus Notes
Posted: Thu Apr 06, 2006 11:22 AM

El error que me da no es un GPF, es este:
...
Error description: Error Notes.Notessession:GETDATABASE/16389 E_FAIL: CREATEDOCUMENT
Args:

Stack Calls

Called from: win32ole.prg => TOLEAUTO:CREATEDOCUMENT(0)
Called from: => HB_EXECFROMARRAY(0)
Called from: win32ole.prg => TOLEAUTO:INVOKE(403)
Called from: punidade.prg => UNNOTES(656)
Called from: punidade.prg => (b)UNIDADES(154)
...

¿ Como puedo saber si es un ActiveX o un servicio OLE ? Yo creo que es un servicio OLE solamente, pero no te lo puedo asegurar.

Saludos,

Continue the discussion