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