Asignar valor a una propiedad

[lfortuny]

Se más o menos como invocar un método COM de un server object. Lo que no se es como proceder con un COM property.
Tengo que pasar un valor a una propiedad, he intentado lo siguiente:

INVOKE COM "Create-Object" USING mail_driver RETURNING mail_server
INVOKE mail_server "LicenseCode" USING BY REFERENCE licencia

Y siempre me devuelve:
ERROR OCCURRED IN THE 'LICENSECODE' METHOD OF THE SPECIAL CLASS "*COM/*OLE". SCODE=0x80020003

Si intento con:

MOVE LicenseCode"       TO  METHOD-NAME
INVOKE mail_server METHOD-NAME USING BY REFERENCE licencia

Me devuelve un error type = 1.

1 : The COM system detected the error. To reference error details, execute
the GET-SCODE and GET-SCODE-TEXT methods. If another method
is executed, a null or 0 is returned.

He probado con el GET-SCODE y me devuelve un número pero el GET-SCODE-TEXT me devuelve un NULL y no me sirve de mucho.


¿Alguien me puede ayudar?

Gracias a tod@s y FELICES FIESTAS.

[Kuk]

@lfortuny, lee las normas del foro, que has infringido unas cuantas. El título del tema no describe nada, hay que meter código fuente en TAG-s correspondientes... Ya lo he corregido todo, intenta a partir de ahora hacerlo todo bien para que esto se mantenga en condiciones

En cuanto a tu pregunta, sería:

     INVOKE mail_server "SET-LicenseCode" USING licencia

Para obtener una propiedad, en lugar de SET sería GET (evidentemente).