Resumen Obtener el nombre corto

Jaime:
    Quizas te sirva esto:

Declare Function GetShortPathName Lib "kernel32" Alias "GetShortPathNameA"
(ByVal lpszLongPath As String, ByVal lpszShortPath As String, ByVal
cchBuffer As Long) As Long

Function ShortName(LongPath As String) As String
    Dim ShortPath As String
    Const MAX_PATH = 260
    Dim ret&
    ShortPath = Space$(MAX_PATH)
    ret& = GetShortPathName(LongPath, ShortPath, MAX_PATH)
    If ret& Then
        ShortName = Left$(ShortPath, ret&)
    End If
End Function

Sacado de VBPJ 101 Tech Tips

Nos Vemos
****************************
Ing. Marcos Mellibovsky
 mellibo@satlink.com
Córdoba - Argentina
****************************


----------
De: Jaime Clot Brugueras <jaime@jet.es>
A: vb-esp@ccc.uba.ar
Asunto: (VB-ESP) Nombres largos
Fecha: Miércoles 3 de Septiembre de 1997 16:25



Hola a todos

Gracias por responder Guillermo, pero mi problema es justo el contrario.
Estoy programando con VB5 y necesito darle a un programa MESEDOS una
trayectoria de la que se su nombre largo, esta trayectoria no es siempre la
misma (si no seria muy fácil). El programa ms-dos lo ejecuto con shell y lo
que pasa es que este no se entera de los dichosos nombres largos. ¿ Sabes
de alguna manera de que visual entregue el nombre corto en lugar del largo
?

De cualquier manera te agradezco mucho tu interés. Gracias

PD: Juan Carlos, ya ves que sigo con el problemilla. No me ha respondido
nadie a nivel particular. No te preocupes que si me entero de algo lo
mandare a la lista (y espero que al berres también)

Saludos.

Jaime Clot Brugueras
jaime@jet.es
http://www.jet.es/jaime



----------



Resumen Resumen

Visual Basic Página de Visual Basic

Página principal Página principal

www.jrubi.com