Comment changer l'extension d'une image ??

Résolu/Fermé
yaorens Messages postés 205 Date d'inscription dimanche 5 avril 2009 Statut Membre Dernière intervention 30 mai 2013 - 14 déc. 2012 à 10:47
yaorens Messages postés 205 Date d'inscription dimanche 5 avril 2009 Statut Membre Dernière intervention 30 mai 2013 - 15 déc. 2012 à 00:17
Bonjour,

J'aimerais changer l'extension d'une image avec vb , comment dois je m'y prendre car quand je fais par exemple , si je changer mon fichier 1.txt en fichier2.doc , comment dois je m'y prendre ???
merci de votre attention


2 réponses

Heliotte Messages postés 1491 Date d'inscription vendredi 26 octobre 2012 Statut Membre Dernière intervention 28 janvier 2013 92
Modifié par Heliotte le 14/12/2012 à 11:39
Bonjour,

Private Function ExtensionFichier(NomFichier As String) As Variant 
    Dim PosPoint As Integer 
    ' 
    If InStr(1, NomFichier, ".") = 0 Then 
  ' le nom du fichier ne comporte pas d'extension 
        ExtensionFichier = False 
    Else 
        While Left(Right(NomFichier, PosPoint), 1) <> "." 
            PosPoint = PosPoint + 1 
        Wend 
       ExtensionFichier = Right(NomFichier, PosPoint - 1) 
    End If 
End Function

Edit:
En cherchant un peu sur ce forum, tu l'aurais trouver: https://forums.commentcamarche.net/forum/affich-13366349-vb-connaitre-extension-d-un-fichier
0
yaorens Messages postés 205 Date d'inscription dimanche 5 avril 2009 Statut Membre Dernière intervention 30 mai 2013 7
15 déc. 2012 à 00:17
Merci infiniment
0