Retorna uma string que contém o nome base do último componente, menos qualquer extensão de arquivo, em um caminho.
Sintaxe
object.GetBaseName(path)
Argumentos:
FileSystemObject.Comentários
O método GetBaseName retornará uma string de tamanho zero (" ") se nenhum componente corresponder ao argumento path.
Nota:
O método GetBaseName só funciona na string de caminho fornecida com a extensão de arquivo. Ele não tenta resolver o caminho nem verifica a existência do caminho especificado.
O exemplo a seguir ilustra o uso do método GetBaseName.
Exemplo 1:
Function GetTheBase(filespec)
Dim fso
Set fso = CreateObject("Scripting.FileSystemObject")
GetTheBase = fso.GetBaseName(filespec)
End Function
' Usage
Dim baseName
baseName = GetTheBase("C:\testfile.txt")
' Output: testfile
Exemplo 2:
Function GetTheBase(filespec)
Dim fso
Set fso = CreateObject("Scripting.FileSystemObject")
GetTheBase = fso.GetBaseName(filespec)
End Function
' Usage
Dim emptyPath
emptyPath = GetTheBase("")
' Output: ""