topic-15180

Board index FiveWin for Harbour/xHarbour My documents path

Marc Vanzegbroeck

Posts: 1195

Joined: Mon Oct 17, 2005 05:41 AM

My documents path
Posted: Tue Apr 07, 2009 08:25 PM

Hi,

How can I get the 'My documents' path?

Thanks,
Marc

anserkk

Posts: 1335

Joined: Fri Jun 13, 2008 11:04 AM

Re: My documents path
Posted: Wed Apr 08, 2009 04:54 AM

Dear Mr.Marc

Code (fw): Select all Collapse

*------------------------------------*
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

Posts: 1195

Joined: Mon Oct 17, 2005 05:41 AM

Re: My documents path
Posted: Wed Apr 08, 2009 04:57 AM

Thanks Anser,

Regards,
Marc

FiveTech Support Forums

Continue the discussion