My documents path

[Marc Vanzegbroeck]

Hi,

How can I get the 'My documents' path?

Thanks,
Marc

[anserkk]

Dear Mr.Marc

Code: Select all  Expand view

*------------------------------------*
Function GetMyDocPath()
*------------------------------------*
#define HKEY_CURRENT_USER  2147483649
Local oReg,cPath
oReg := TReg32():New( HKEY_CURRENT_USER,;
             "Software\Microsoft\Windows\CurrentVersion\Explorer\Shell Folders",;
                 .f. )
cPath := oReg:Get( "Personal" )
oReg:Close()
Return cPath

Regards
Anser

[Marc Vanzegbroeck]

Thanks Anser,

Regards,
Marc