lcBuffer = SPACE(255) >>>>DECLARE INTEGER GetSystemDirectory IN WIN32API STRING, INTEGER >>>>lnNameLength = GetSystemDirectory(@lcBuffer, 255) >>>>lcSystemDir = LEFT(lcBuffer, lnNameLength-1) >>>>* Should be >>>>DECLARE INTEGER GetSystemDirectory IN WIN32API STRING @, INTEGER >>>>lcbuffer = SPACE(260) && Current size of MAX_PATH >>>>lnNameLength = GetSystemDirectory(@lcBuffer, 260) >>>>lcSystemDir = LEFT(lcBuffer, lnNameLength)The value returned does not include the terminating null character.
>>>oReg=createobject('Scripting.FileSystemObject') >>>? oReg.GetSpecialFolder(0) >>>>>>
oFolder = oReg.GetSpecialFolder(1) >>? oFolder.Path && The complete path (ie C:\WINDOWS\SYSTEM) >>? oFolder.Name && The folder name (SYSTEM)>