[VB6] Nomi di cartelle in DOS

[Amiba]

Ho un problema utilizzando il comando Shell: non vuole i nomi "lunghi e con spazi" stile windows ma quelli corti DOS (Ex. Progra~1 invece che Programmi).
Ho sentito dire che esiste una API in grado di convertire un nome Windows nel corrispondente nome DOS. Sapete dirmi come si può fare?

Grazie!

[oregon]

E perche' Shell non dovrebbe utilizzare i nomi lunghi?

[xegallo]

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

Public Function GetShortPath(strFileName As String) As String
    Dim lngRes As Long
    Dim strPath As String
    
    strPath = String$(255, 0)
    lngRes = GetShortPathName(strFileName, strPath, 254)
    GetShortPath = Left$(strPath, lngRes)
    
End Function

da chiamare così

veriabilestringa = GetShortPath(percorsofile)

ps: il percorso deve esistere

[oregon]

Sì xegallo, ma il problema originale non e' chiaro ... perche' usare i nomi corti?

[xegallo]

Originariamente inviato da oregon
Sì xegallo, ma il problema originale non e' chiaro ... perche' usare i nomi corti?

saranno affari suoi

perchè non riesci mai a rispondere ad una domanda senza far polemica

cmq un esempio per usare i nomi corti

è usare un comando DOS dove il percorso file contiene spazi

[oregon]

Originariamente inviato da xegallo
saranno affari suoi

perchè non riesci mai a rispondere ad una domanda senza far polemica

Ma che polemica? Che stai dicendo?

Ho fatto la precisazione per identificare precisamente il problema e risolverlo al meglio ... si chiama professionalita' ...

[Amiba]

Cmq il problema è proprio quello dei nomi lunghi che contengono spazi. Se provi anche dalla console di windows funziona solo se metti tutto il percorso tra doppi apici, cosa che però non si pò fare in Shell di VB6...

Grazie a tutti!

[oregon]

Originariamente inviato da Amiba
Cmq il problema è proprio quello dei nomi lunghi che contengono spazi. Se provi anche dalla console di windows funziona solo se metti tutto il percorso tra doppi apici, cosa che però non si pò fare in Shell di VB6...

Ecco ... immaginavo ... anche da Shell puoi mettere gli apici e hai risolto senza API ...

[Amiba]

Veramente ho provato ma non ci sono riuscito... Credo che Shell e la console di Windows (cmd) non siano proprio la stessa cosa...

Ad ogni modo con l'API funziona...

[oregon]

Mi fai vedere come hai scritto? Funziona anche la Shell ... ma fa come vuoi ...