Options

Determine Client version by code

guidorobbenguidorobben Member Posts: 157
Hi,

We have build our ouwn Info form. On the form I want to show the database version. That's simple. Just use codeunit 1. But I also want to show the client version No.

Does anybody know how to do this?

Guido

Comments

  • Options
    fbfb Member Posts: 246
    This ought to do the trick:

    objWshShell is 'Windows Script Host Object Model'.WshShell
    objFSO is 'Windows Script Host Object Model'.FileSystemObject
    txtFinExePath and txtFinExeVersion are Text[250]
    CREATE(objWshShell);
    txtFinExePath :=
      objWshShell.RegRead(
       'HKLM\SOFTWARE\Microsoft\Windows\CurrentVersion\App Paths\fin.exe\');
    CLEAR(objWshShell);
    
    CREATE(objFSO);
    txtFinExeVersion := objFSO.GetFileVersion(txtFinExePath);
    CLEAR(objFSO);
    
    MESSAGE('%1\\Version: %2',txtFinExePath,txtFinExeVersion);
    
Sign In or Register to comment.