How do I determine if a path is relative or absolute with VB Scripting Host

Question

Hello

How do I determine if a path is relative or absolute in Visual Basic Script.

In VBA, I'd call the Win32 Api function PathIsRelative

Private Declare Function PathIsRelative Lib "shlwapi" _
    Alias "PathIsRelativeA" _
   (ByVal pszPath As String) As Long

However, it's not possible to call into a DLL from VBS, so I cannot use the Win32 Api.

René

Answer 1

dim position
position = InStr("your-path", ":")

If position > 0 Then
  ''# absolute path
else
  ''# relative path
end if

Answer 2

set oFSO = CREATEOBJECT("Scripting.FileSystemObject")

relativePath = ""
absolutePath = "c:\test"

MsgBox UCase(relativePath) = UCase(oFSO.GetAbsolutePathName(relativePath))
MsgBox UCase(absolutePath) = UCase(oFSO.GetAbsolutePathName(absolutePath))