Manuel du langage de script Desktop Management › Fonctions › Fonctions du système de fichiers › GetLongFileName – Convertir un nom de fichier court en un nom de fichier long

GetLongFileName – Convertir un nom de fichier court en un nom de fichier long

(Applicable à Windows)

La fonction GetLongFileName convertit le nom de fichier court en nom de fichier long.

Format de la fonction :

GetLongFileName(shortFileName as string, longFileName as string) as Boolean

shortFileName

Paramètre d'entrée. Il s'agit du nom de fichier MS DOS 8.3 à développer au format de nom de fichier long.

longFileName

Paramètre de sortie qui reçoit le nom de fichier long étendu.

En cas de réussite, la fonction renvoie True, sinon elle renvoie False. Pour pouvoir convertir un nom de fichier, le fichier associé doit exister sur le système. Dans le cas contraire, la fonction échoue.

Exemple :

Cet exemple convertit un nom de fichier long en un nom court, et inversement.

Dim lName, oName, sName As String
ClrScr()

oName ="c:\temp\a bb ccc dddd\abcdefghijklmnopqrstuvwxyz.txt"
If Not(GetShortFileName(oName, sName)) Then
	MessageBox("Impossible de convertir au format court", "DMS", MB_OK + MB_ICONEXCLAMATION)
	SetStatus(1)
	quitter
End If
Print( oName + " - " + sName)
If Not(GetLongFileName(sName, lName)) Then
	MessageBox("Impossible de convertir au format long", "DMS", MB_OK + MB_ICONEXCLAMATION)
	SetStatus(2)
	quitter
End If
Print( sName + " - " + lName)