Das Root-Objekt der combit CRM-Objekthierarchie ist das oberste Element von dem alle anderen Objekte abgeleitet werden. Es stellt den Ursprungspunkt für die gesamte Hierarchie dar und dient als zentrales Element, an dem alle anderen Objekte anknüpfen.
Bei der Nutzung von Scripts, die innerhalb des combit CRM ausgeführt werden, wird das cRM-Root-Objekt automatisch bereitgestellt. Wird ein Script dazu verwendet, um eine eigene cRM -Instanz zu erstellen bzw. um den combit CRM zu starten, muss das cRM-Objekt, welches für den weiteren Scriptablauf verwendet wird, separat initialisiert werden.
Nachfolgend finden Sie unterschiedliche Beispiele zur Nutzung bzw. Initialisierung des cRM-Objekts, der Ausgabe unterschiedlicher Objekteigenschaften sowie die Verwendung der Methoden cRM.DialogMessageBox und Project.Login:
' Zuweisen des Root-Objekts in ein eigenes Objekt
Dim ocRM : Set ocRM = cRM
' Ausgabe des Applikationspfads des combit CRM
Call ocRM.DialogMessageBox("Der combit CRM wurde in folgendes Verzeichnis installiert: " & ocRM.AppDir, "Installationspfad", vbOkOnly)
' Verwendung des Root-Objekts ohne Zuweisung eines eigenen Objekts für die Ausgabe der Titelzeile des geöffneten combit CRM
Call cRM.DialogMessageBox("Die Titelzeile enthält folgenden Inhalt: " & cRM.AppTitle, "Titelzeile", vbOkOnly)
' Starten einer neuen combit CRM-Instanz per Script, anschließendes Laden eines Projekts und Login
Dim ocRM : Set ocRM = CreateObject("cRM.Application")
Dim oProject : Set oProject = ocRM.Login(sProject, sUsername, sPassword)
' Funktion zum Prüfen, ob bereits eine combit CRM-Instanz vorhanden ist, falls nicht, neue combit CRM-Instanz erzeugen
Function CheckcRM()
On Error Resume Next
If (cRM Is Nothing) Then
Set ocRM = CreateObject("cRM.Application")
Else
Set ocRM = cRM
End If
On Error GoTo 0
End Function