Uso a seguinte função abaixo p/ obter o diretorio windows system , mas no Win 2000 esta retornando um string em branco.
Allguem tem alguma solução para o problema ?

Agradeço antecipadamente.

Peter

function sysdir

local x
local retlen
local winsysdir

* This gets the windows system directory
string= replicate(chr(0), 144)
x = RegFn("GetSystemDirectory", "@CI", "I")
retlen = CallFn(x, @string, 144)
winsysdir=LEFT(string, retlen)
Return(winsysdir)