OVH Cloud OVH Cloud

Faxenvoie avec Windows Server 2003

2 réponses
Avatar
Christophe BADET
Bonjour,

j'ai développé un système d'envoi de fax en utilisant la fonction faxenvoie
de windev. Ca fonctionne bien, les faxent partent, mais en prod sur mon
serveur Windows Server 2003, on ne recupere pas le resultat de l'envoi,
alors qu'il n'y a aucun pb sur un xp/pro.

quelqu'un a une idee ?

Merci.
Christophe BADET

2 réponses

Avatar
Pascal R.
Christophe BADET a écrit :
Bonjour,

j'ai développé un système d'envoi de fax en utilisant la fonction faxenvoie
de windev. Ca fonctionne bien, les faxent partent, mais en prod sur mon
serveur Windows Server 2003, on ne recupere pas le resultat de l'envoi,
alors qu'il n'y a aucun pb sur un xp/pro.

quelqu'un a une idee ?

Merci.
Christophe BADET




Si tu te sers de la Base de Registre, ca pourrait venir de la,
en effet, l'emplacement de certaines variables changes d'une
version Windows à l'autre.

A voir.

Pascal
Avatar
Christophe BADET
Non, je ne me sers pas de la base de registre, j'utilise :
IdFax =
FaxEnvoie(IdConnect,NomFax,"i:fax"+contenu,prefixecom+numero,"","EtatCourant")

et j'ai la procédure Etatcourant qui est appelée à chaque changement d'état
du fax (d'après la doc windev !)

// Syntaxe :

//EtatCourant (<psNomFax>, <pnEtat>)

//

// Paramètres :

// psNomFax : <indiquez ici le rôle de psNomFax>

// pnEtat : <indiquez ici le rôle de pnEtat>

// Valeur de retour :

// Aucune

PROCEDURE EtatCourant(psNomFax,pnEtat)

// Cette procédure est appelée à chaque changement d'état du fax envoyé

sNumFax est une chaîne

sNumFax = Remplace(psNomFax,"MonFax","")

ETATFAX = ""

SELON pnEtat

// Fax Inactif

CAS FaxEtatInactif

// on ne traite pas le cas


// le fax a bien été envoyé

CAS FaxEtatEnvoyé

// Information dans la table

ETATFAX = "OK"


// états intermédiaires

CAS FaxEtatAppel, FaxEtatInit, FaxEtatRépondu, FaxEtatEnvoi, FaxEtatSonnerie

// Information dans la table


// le fax a échoué

AUTRE CAS

// Information dans la table

ETATFAX = "KO"

FIN

f est un entier = fOuvre("c:etatfax.txt",foCréation)

fEcritLigne(f,ETATFAX)

fFerme(f)


"Pascal R." a écrit dans le message de news:
crm40v$a59$
Christophe BADET a écrit :
Bonjour,

j'ai développé un système d'envoi de fax en utilisant la fonction
faxenvoie de windev. Ca fonctionne bien, les faxent partent, mais en prod
sur mon serveur Windows Server 2003, on ne recupere pas le resultat de
l'envoi, alors qu'il n'y a aucun pb sur un xp/pro.

quelqu'un a une idee ?

Merci.
Christophe BADET


Si tu te sers de la Base de Registre, ca pourrait venir de la,
en effet, l'emplacement de certaines variables changes d'une
version Windows à l'autre.

A voir.

Pascal