|
|
|
|
|
Dicas
|
|
Visual Basic (Arquivos/Diretórios)
|
|
|
Título da Dica: Capturar o caminho DOS de um arquivo
|
|
|
|
Postada em 8/9/2000 por Webmaster
webmaster@vbweb.com.br
Public Declare Function GetShortPathName Lib _ "kernel32" Alias "GetShortPathNameA" _ (ByVal lpszLongPath As String, ByVal _ lpszShortPath As String, ByVal cchBuffer _ As Long) As Long
Public Const MAX_PATH As Long = 260
Dim sDirLong As String Dim sDirDOS As String
Call GetShortPathname(sDirLong, sDirDOS, MAX_PATH)
|
|
|
|
|