File Path VisualBasic Script

Sub curDirDemo1()
    CurDir ("C:\")
End Sub