|
|
|
![](images/pasta_topo.gif)
|
![](images/folha.gif)
|
Dicas
|
![](images/folha_fim.gif)
|
Visual Basic (Arquivos/Diretórios)
|
|
![](images/box01esqsup.gif) |
Título da Dica: Capturar o caminho DOS de um arquivo
|
![](images/box01dirsup.gif) |
|
|
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)
|
|
|
|
![](images/hosted.gif)
|