Beschreibung:
Rückgabe der Produkt-Versionsnummer der installierten Anwendung.
Typ:
Long
|
Wert |
Beschreibung |
|
HIWORD |
Hauptversion (Dividiert durch 65535) |
|
LOWORD |
Nebenversion (Modulo 0xFFFF0000) |
Beispiel VBScript:
Dim scRMProductVersion
Dim ncRMProductVersion : ncRMProductVersion = (cRM.ProductVersion Mod &HFFFF0000)
If Len(ncRMProductVersion) = 1 Then
scRMProductVersion = CStr(CInt(cRM.ProductVersion / 65535) & ".00" & CStr(ncRMProductVersion))
ElseIf Len(ncRMProductVersion) = 2 Then
scRMProductVersion = CStr(CInt(cRM.ProductVersion / 65535) & ".0" & CStr(ncRMProductVersion))
ElseIf Len(ncRMProductVersion) = 3 Then
scRMProductVersion = CStr(CInt(cRM.ProductVersion / 65535) & "." & CStr(ncRMProductVersion))
End If
Call cRM.DialogMessageBox("Aktuell installierte Version des combit CRM: " & scRMProductVersion, "cRM.ProductVersion", vbOkOnly)
Beispiel C#-Script:
long productVersion = (cRM.ProductVersion % 0xFFFF0000);
int productVersionNumberCount = productVersion.ToString().Length;
if (productVersionNumberCount == 1)
cRM.DialogMessageBox((productVersion / 65535).ToString() + ".00" + productVersion.ToString(), cRM.AppTitle, 0);
else if (productVersionNumberCount == 2)
cRM.DialogMessageBox((productVersion / 65535).ToString() + ".0" + productVersion.ToString(), cRM.AppTitle, 0);
else if (productVersionNumberCount == 3)
cRM.DialogMessageBox((productVersion / 65535).ToString() + "." + productVersion.ToString(), cRM.AppTitle, 0);
else
cRM.DialogMessageBox("Information ber Produktversion nicht verfgbar.", cRM.AppTitle, 0);