SendMessageTo (TdbfMessageBox)

De Wiki1000

<source lang='delphi'>procedure SendMessageTo(const iToBoxNames,iSubject,iBody:string; lsa:TdbfAttachementDescriptorList);</source>

Cette procédure envoi un message à une ou plusieurs boîtes destinataires.

iToBoxNames Nom de la boîte destinataire

Ce paramètre peut contenir plusieurs noms de boîte séparés par un point-virgule.

iSubject Sujet du message
iBody Contenu du message
lsa Liste des attachements

Les pré-conditions sont :

  • Le type d'utilisation de la boîte permet d'envoyer des messages.
  • L'utilisateur à les droits d'écriture sur la boîte.
Tip : Si la boîte destinataire n'existe pas celle-ci est automatiquement créée.

Exemple <source lang='delphi'> //Procedure doSomethingWithABox; var box:TdbfMessageBox; begin

 box := TdbfMessageBox.FindBox('mybox');
 if Assigned(box) then
   begin
     box.SendMessageTo('box1;box2','Message send by script','Message content',nil);
   end;

end; </source>

Voir aussi :

{{#if:TdbfMessageBox (bam)|

{{#if:TdbfMessageBox (bam)|— TdbfMessageBox (bam) |}} — Développement DSM

|

{{#if:|— [[{{{1}}}]] |}} — Développement DSM

}}