Bonjour a tous, voila j'ai une petit problème qui est surtout dû a mon manque d'expérience en vb et aussi a une petit manque de reflexion.

Je vous explique je veux lister un dossier dans une listview.jusqu'a la tout va bien.
a l'interieur de mon dossier j'ai des fichiers sans extention et j'ai des fichiers avec l'extention .sms et l'extention .sav.
Je voudrai qu'on me donne un petit coup de main car moi je veux lister simplement les fichiers sans extention .

je vous donne mon code :

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
Dim tablo() As String
Dim n As Integer
Dim tt() As String
s = Dir("C:\windows\Temp trinity\SAV\TEMP\", vbDirectory)
n = 0
While s <> ""
If s <> "." And s <> ".." Then
n = n + 1
ReDim Preserve tablo(n)
tablo(n) = s
Set ObjListe = Form1.ListView5.ListItems.Add(, , s)
End If
s = Dir
Wend
Je pense que le but du jeu serai d'analysé la variable "s" a chaque fois et de voir si les 4 derniers caractères sont ".sms" ou ".sav" voila je suis perdu la dessus!!!
Je compte sur votre bonne volonté pour m'aider et sur votre experience.

Merci d'avances Messieurs ou Mesdames.