VBScript

Create Symbolic Link

See more FileAccess Examples

Demonstrates how to create a symbolic (soft) link.

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

VBScript

Dim fso, outFile
Set fso = CreateObject("Scripting.FileSystemObject")
'Create a Unicode (utf-16) output text file.
Set outFile = fso.CreateTextFile("output.txt", True, True)

success = 0

' 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).  

set fac = CreateObject("Chilkat.FileAccess")

' Here we create a symbolic link to point to qa_data/hamlet.xml
' 
target = "qa_data/hamlet.xml"
symlink = "qa_output/symlink_hamlet.xml"
success = fac.SymlinkCreate(target,symlink)
If (success <> 1) Then
    outFile.WriteLine(fac.LastErrorText)
    WScript.Quit
End If

' Here we create a directory symbolic link.  The target is a directory (not a regular file)
target = "qa_data/xml/"
symlink = "qa_output/xml_dir"
success = fac.SymlinkCreate(target,symlink)
If (success <> 1) Then
    outFile.WriteLine(fac.LastErrorText)
    WScript.Quit
End If

outFile.WriteLine("Success.")

outFile.Close