Skip to content

Instantly share code, notes, and snippets.

@freshcutdevelopment
Created May 9, 2015 09:22
Show Gist options
  • Select an option

  • Save freshcutdevelopment/51e7fbba929937e49e6a to your computer and use it in GitHub Desktop.

Select an option

Save freshcutdevelopment/51e7fbba929937e49e6a to your computer and use it in GitHub Desktop.
Get file path root (excluding file name) with Vbscript
Function GetFilePath(FullPath)
Dim filePath, pathArray
pathArray = Split(FullPath, "\")
pathArray(UBound(pathArray)) = ""
filePath = Join(pathArray, "\")
GetFilePath = filePath
End Function
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment