FORUMS PROFESSIONNELS
WINDEV
,
WEBDEV
et
WINDEV Mobile
Accueil
|
Messages récents
|
Connexion
|
Déconnexion
|
Français
Accueil
→
WINDEV 2024
→
Re: [windev7.5] how can I recover the line call st
Re: [windev7.5] how can I recover the line call st
Débuté par Raimund Schuldhaus, 02 juil. 2003 16:24 - 1 réponse
Connectez-vous…
Raimund Schuldhaus
#1
Posté le 02 juillet 2003 - 16:24
Hi Michel,
here is a code snippet from my small TAPI wrapper. HTH
PROCEDURE DialNo(LOCAL sPhoneNo is string)
i is int
IF tapiDevice(:sProvider) THEN
:sPhoneNo = ""
FOR i = 1 TO Length(sPhoneNo)
IF sPhoneNo[[i]] >= "'0" AND sPhoneNo[[i]] <= "9" THEN
:sPhoneNo = :sPhoneNo + sPhoneNo[[i]]
END
END
tapiDial(:sPhoneNo, ":DialCallback")
ELSE
Info("Error")
END
PROCEDURE PRIVATE DialCallback(CallbackStat)
:SetRefCtrl(:sDialRef, Grayed)
:nCurrTAPIStat = CallbackStat
SWITCH CallbackStat
CASE tapiLineBusy :
Message("Besetzt")
:Hangup()
CASE tapiLineConnected :
Message("OK, verbunden")
:SetRefCtrl(:sHangupRef, Active)
CASE tapiLineDialing :
Message("Wähle")
CASE tapiLineDialTone :
Message("Wählton")
CASE tapiLineDisconnected :
Message("Verbindnung unterbrochen")
:SetRefCtrl(:sHangupRef, Active)
CASE tapiLineProceeding :
Message("Ermittelung der Gegenstelle")
CASE tapiLineRingBack :
Message("Ruf")
:SetRefCtrl(:sHangupRef, Active)
END
Signaler
0
0
Jean Maisonnet
#2
Posté le 22 juillet 2003 - 01:57
In french version, i didn't succed to get the caller phone number... i don't
know why...
Is it working ?
"Raimund Schuldhaus" <rschuldhaus@invitec.com> a écrit dans le message de
news:VA.0000000a.0152baa6@invitec.com...
Hi Michel,
here is a code snippet from my small TAPI wrapper. HTH
PROCEDURE DialNo(LOCAL sPhoneNo is string)
i is int
IF tapiDevice(:sProvider) THEN
:sPhoneNo = ""
FOR i = 1 TO Length(sPhoneNo)
IF sPhoneNo[[i]] >= "'0" AND sPhoneNo[[i]] <= "9" THEN
:sPhoneNo = :sPhoneNo + sPhoneNo[[i]]
END
END
tapiDial(:sPhoneNo, ":DialCallback")
ELSE
Info("Error")
END
PROCEDURE PRIVATE DialCallback(CallbackStat)
:SetRefCtrl(:sDialRef, Grayed)
:nCurrTAPIStat = CallbackStat
SWITCH CallbackStat
CASE tapiLineBusy :
Message("Besetzt")
:Hangup()
CASE tapiLineConnected :
Message("OK, verbunden")
:SetRefCtrl(:sHangupRef, Active)
CASE tapiLineDialing :
Message("Wähle")
CASE tapiLineDialTone :
Message("Wählton")
CASE tapiLineDisconnected :
Message("Verbindnung unterbrochen")
:SetRefCtrl(:sHangupRef, Active)
CASE tapiLineProceeding :
Message("Ermittelung der Gegenstelle")
CASE tapiLineRingBack :
Message("Ruf")
:SetRefCtrl(:sHangupRef, Active)
END
Signaler
0
0
→ Revenir à WINDEV 2024
WINDEV 2024
WEBDEV 2024
WINDEV Mobile 2024
WINDEV (précédentes versions)
Français
English
Español
Portuguesa
Fermer cette fenêtre
Type de recherche
Uniquement les sujets
Tous les messages
Période de recherche
Date indifférente
Moins d'une heure
Moins de 24 heures
Moins d'une semaine
Moins d'un mois
Moins d'un an
Annuler
Aperçu de votre message
Ajouter une image
Importer une image depuis une URL
Envoyer une image depuis un fichier de votre disque
Déposez ici un fichier ou cliquez sur "Parcourir..."
ou
Annuler
0%
WLangage
SQL
XML, HTML
JAVA, Javascript
Texte