ek-soft FAQ
Warum hängt der Notes Client wenn man auf Wählen drückt?
Bei manchen Note Clients gibt es generelle Probleme oder Hänger mit der Ausführung von DDE innerhalb von Notesformeln. Dafür gibt es keinen uns bekannten Workaround.
Deshalb können an Stelle DDE Formeln auch Lotus Script und Automation anwenden.
Bitte Vorsicht bei Copy & Paste des Codes. Notes ist hier sehr empfindlich…Am besten über den Umweg eines Text Files gehen.
Wählen in der Maske:
Sub Click(Source As Button)
Dim ws As New notesuiworkspace
Dim uidoc As notesuidocument
Dim session As New NotesSession
Dim db As NotesDatabase
Dim doc As NotesDocument
Dim odialer As Variant
Set db = session.CurrentDatabase
Set uidoc = ws.Currentdocument
Set doc = uidoc.Document
Set odialer = createobject(„dialit.cdialer“)
odialer.dialnumber = doc.GetItemValue(„OfficePhoneNumber“)(0)
odialer.dialname = doc.GetItemValue(„LastName“)(0)
odialer.makecall
End Sub
Wählen in einer Ansicht:
Sub Click(Source As Button)
Dim doc As NotesDocument
Dim col As notesdocumentcollection
Dim session As New NotesSession
Dim db As NotesDatabase
Set db=session.currentdatabase
Set col=db.unprocesseddocuments
Set doc=col.getfirstdocument
Dim odialer As Variant
Set odialer = createobject(„dialit.cdialer“)
odialer.dialnumber = doc.GetItemValue(„OfficePhoneNumber“)(0)
odialer.dialname = doc.GetItemValue(„LastName“)(0)
odialer.makecall
End Sub
Auflegen in Masken oder Ansichten:
Sub Click(Source As Button)
Dim odialer As Variant
Set odialer = createobject(„dialit.cdialer“)
odialer.disconnect
End Sub
Alle anderen Comserver Methoden von DIALit werden natürlich auch unterstützt.
Wichtig bei Lotus Script: dialit32.exe muss vorher gestartet sein und als Comserver registriert sein (hkey_classes_root\dialit.cdialer…)
DIALit registriert sich selbst wenn es einmal mit Administratorrechten gestartet wurde, Alternativ mit „dialit32.exe /regserver“ Dies geschieht normalerweise automatisch beim Setup.
Letzte Änderung am: 07.05.2015, 16:42 Uhr
← zurück zum Suchergebnis"