Determine Client version by code

guidorobben

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

fb

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);