(Visual FoxPro) Create Symbolic Link

Demonstrates how to create a symbolic (soft) link.

Note: This example requires Chilkat v9.5.0.77 or greater.

Chilkat ActiveX Downloads ActiveX for 32-bit and 64-bit Windows

LOCAL loFac
LOCAL lcTarget
LOCAL lcSymlink
LOCAL lnSuccess

* Chilkat supports symbolic links on both Windows and non-Windows operating systems.
* Note: On Windows, symbolic links and Windows shortcuts are two different things.
* On the Windows operating system, a process requires a special privilege to create
* a symbolic link (unless running as administrator).  

* For versions of Chilkat < 10.0.0, use CreateObject('Chilkat_9_5_0.FileAccess')
loFac = CreateObject('Chilkat.FileAccess')

* Here we create a symbolic link to point to qa_data/hamlet.xml
* 
lcTarget = "qa_data/hamlet.xml"
lcSymlink = "qa_output/symlink_hamlet.xml"
lnSuccess = loFac.SymlinkCreate(lcTarget,lcSymlink)
IF (lnSuccess <> 1) THEN
    ? loFac.LastErrorText
    RELEASE loFac
    CANCEL
ENDIF

* Here we create a directory symbolic link.  The target is a directory (not a regular file)
lcTarget = "qa_data/xml/"
lcSymlink = "qa_output/xml_dir"
lnSuccess = loFac.SymlinkCreate(lcTarget,lcSymlink)
IF (lnSuccess <> 1) THEN
    ? loFac.LastErrorText
    RELEASE loFac
    CANCEL
ENDIF

? "Success."

RELEASE loFac