Répétez apres moi :J'aime PBAdonf. J'aime PBAdonf. J'aime PBAdonf.

Le forum (ô combien francophone) des utilisateurs de Powerbuilder.

Recherche rapide

Annonce

Certaines rubriques, dont des cours, sont uniquement visibles par les membres du forum ^^.
Dans la rubrique Liens & Références, vous avez accès à un sommaire de téléchargement, profitez-en !
Il existe maintenant un nouveau TOPIC "Votre CV en Ligne" accessible uniquement par demande.
  • Index
  •  » Powerscripts
  •  » Envoie de mail sur powerbuilder (10.5) via un script VBS

#1 20-12-2018 14:50:06

pierrot93  
Membre
Date d'inscription: 08-12-2018
Messages: 3
Pépites: 23
Banque: 0

Envoie de mail sur powerbuilder (10.5) via un script VBS

Bonjour à tous , mon problème est le suivant :

Je souhaite envoyer un mail d'alerte via l'exécution d'un script VBS dans PowerBuilder.
Le script VB d'envoie de mail est fonctionnel seul , testé et approuvé .

Le problème est l'interface Powerbuilder et le fichier VBS :

J'ai créé une fonction "f_envoi_mail" contenant mon "appel" à mon fichier VBS comme suis :

Code: pb

   
int li_ret
OleObject wsh
integer  li_rc

CONSTANT integer MAXIMIZED = 3
CONSTANT integer MINIMIZED = 2
CONSTANT integer NORMAL = 1
CONSTANT boolean WAIT = FALSE
CONSTANT boolean NOWAIT = TRUE

wsh = CREATE OleObject
li_rc = wsh.ConnectToNewObject ("MSScriptControl.ScriptControl")

wsh.language = "vbscript"

wsh.Run(".\envoi_mail.vbs" , NORMAL, WAIT)

return 1

Mais lors de l'appel de ma fonction sur l'évènement OPEN de ma fenêtre , j'ai l'erreur suivante :

Error : Error calling external object function run at line 16 in function f_envoie_mail of object w_toto.

(w_toto étant la fenêtre dans laquelle , sur l'évènement open, je réalise mes traitements : vérification de connexion avec "connect using SQLCA" et requête SQL.)

Votre aide me serait d'un grand secoure.
Cordialement Pierrot.

Hors ligne

 

#2 20-12-2018 17:32:06

xlat  
0xc0000005
Award: bf
Lieu: Tanger (طنج)
Date d'inscription: 04-12-2010
Messages: 672
Pépites: 11,195
Banque: 100,221,387,868,884,300
Site web

Re: Envoie de mail sur powerbuilder (10.5) via un script VBS

Salut,
Essai dans un premier temps avec un chemin complet vers ton script.


https://lut.im/eJINqa9o/vAtyxD0h "Don't believe everything you read on the Internet"
    -- Abraham Lincoln

www.ngs.ma

Hors ligne

 

#3 07-01-2019 15:26:36

cposervices  
Membre completement Geek
Date d'inscription: 02-07-2008
Messages: 105
Pépites: 1,000,372
Banque: 0

Re: Envoie de mail sur powerbuilder (10.5) via un script VBS

Bonjour,

Je présuppose que tu as bien l'objet msscript.ocx de disponible?

Hors ligne

 

#4 08-01-2019 14:59:55

pierrot93  
Membre
Date d'inscription: 08-12-2018
Messages: 3
Pépites: 23
Banque: 0

Re: Envoie de mail sur powerbuilder (10.5) via un script VBS

Bonjour xlat, désolé pour la réponse tardive ...
J'ai en essayé avec un chemin complet vers mon script mais cela ne change rien (malheureusement).

Bonjour cposervices, je suis aller vérifier la présence de msscript.ocx, il est bien présent (C:\Windows\SysWOW64\msscript.ocx).
Je suis sou win-10 64 bit , cela peut il poser problème ?

Merci pour vos réponses !!!

Hors ligne

 

#5 09-01-2019 09:27:58

xlat  
0xc0000005
Award: bf
Lieu: Tanger (طنج)
Date d'inscription: 04-12-2010
Messages: 672
Pépites: 11,195
Banque: 100,221,387,868,884,300
Site web

Re: Envoie de mail sur powerbuilder (10.5) via un script VBS

En fait, il y a confusion entre MSScriptControl.ScriptControl et WScript.Shell :

Code: pb

wsh = CREATE OleObject
li_rc = wsh.ConnectToNewObject("WScript.Shell")
wsh.Run("wscript.exe .s\envoi_mail.vbs" , NORMAL, WAIT)


ou sans fichier intermédiaire :

Code: pb

wsh = CREATE OleObject
li_rc = wsh.ConnectToNewObject("MSScriptControl.ScriptControl")
wsh.language("vbscript")
wsh.ExecuteStatement('MsgBox "Test"')

https://lut.im/eJINqa9o/vAtyxD0h "Don't believe everything you read on the Internet"
    -- Abraham Lincoln

www.ngs.ma

Hors ligne

 

#6 11-01-2019 16:18:54

seki  
0x73656B69
Award: bf
Lieu: Laquenexy & Luxembourg
Date d'inscription: 20-11-2008
Messages: 1105
Pépites: 4,296,080,165
Banque: 9,223,372,036,854,776,000
Site web

Re: Envoie de mail sur powerbuilder (10.5) via un script VBS

Il me semble qu PB sait déjà envoyer des mails nativement avec MAPI (Message API) et MailSession / MailMessage, et sinon chez Roland Smith il y a le module PB EmailSMTP ou encore l'extension PBNISMTP qu'il a apparemment repris de Bruce Armstrong.

Passer par un vbs pour envoyer un mail, c'est quand même moche


The best programs are the ones written when the programmer is supposed to be working on something else. - Melinda Varian

Mes réponses PB sur StackOverflow
http://stackoverflow.com/users/flair/317266.png

Hors ligne

 
  • Index
  •  » Powerscripts
  •  » Envoie de mail sur powerbuilder (10.5) via un script VBS

Pied de page des forums

Propulsé par FluxBB 1.2.22