Live Text and X-Phone (CTI)

[shiraz]

Hallo,

kann man Live Text mit Softphone(CTI) zum Laufen bringen?
Nummer erkennen, in Zwischenablage kopieren und das Programm starten.

[mb974]

Hallo,

wir sprechen unseren XPhone 7 Client über Livetext an.

Technisch funktioniert das so, dass eine zentrale Datenbank die als Widget zur Rufnummernsuche aktiv ist, ein Formular enthält welchem die Rufnummer übergeben wird. Im Postopen-Event wird XPhone über einen Shell-Aufruf die Nummer übergeben und schon wird gewählt.

Softphone setzen wir nicht ein, aber ich könnte mir vorstellen, dass so auch damit geht.

Code

Sub Postopen(Source As Notesuidocument)
	Dim result As Integer
	Dim xp As Variant
	
	On Error Resume Next
	
	sPath= "C:\Program Files (x86)\Common Files\C4B\AppBridge\xprun.exe "
	sNumber = source.FieldGetText("PhoneNumber")
	
		' create OLE object		
	Set xp = CreateObject("XpNotesCOMClient")
	If  (xp Is Nothing) Then 'Commander
		result = Shell(sPath + " " + sNumber)
	Else 'Connect
		retVal = xp.DialOrSearch(sNumber)	
	End If
	' destroy XPhone objects
	Set xp = Nothing	
	source.Close
End Sub

Das Formular hat nur die Felder PhoneNumber und SaveOptions(=0).