Openfiledialog .NET ouvrir plusieurs fichiers

Résolu
Signaler
Messages postés
100
Date d'inscription
samedi 26 octobre 2002
Statut
Membre
Dernière intervention
24 mai 2013
-
Messages postés
2
Date d'inscription
lundi 3 mai 2004
Statut
Membre
Dernière intervention
26 octobre 2005
-
Boujour,

Je souhaite ouvrir une série de fichiers avec la classe openfiledialog.

Comment dois-je faire ?
Comment puis-je récupérer la liste de fichiers ?

Merci

3 réponses

Messages postés
1878
Date d'inscription
jeudi 16 octobre 2003
Statut
Membre
Dernière intervention
16 mars 2011
1
Bj


avec cette ref, et la réponse précédente, j'ai réussi à m'en sortir
http://www.startvbdotnet.com/controls/dialog.aspx



ça ne marchait pas directement

mon but était simplement de sélectionner un fichier:
la soluce donnée plus haut causait une erreur.

soluce :
--------



Private
Sub TestBed_Load(
ByVal sender
As
Object,
ByVal e
As System.EventArgs)
Handles
MyBase.Load



Dim strConnection
As
String = "User ID=#censored#;Password=#censored#;Initial Catalog=db_#censored#;Data Source=FR#censored#;"



' Define local variables



Dim strErrMsg
As
String



Me.Cursor = Cursors.WaitCursor



Dim objDataFile
As DataFile



Try


objDataFile =
New DataFile


'B0 : objDataFile.FilePath "c:/deltmp/report.csv" ' B modif ! objDataFile.FilePath "report.csv"



'B1 : inutbox objDataFile.FilePath = InputBox("Fichier à traiter", "Choix Fic 0", "c:/deltmp/report.csv")



'B2 : sélection de fichier net !


Dim OpenFileDialog1
As System.Windows.Forms.OpenFileDialog


OpenFileDialog1 =
New System.Windows.Forms.OpenFileDialog


OpenFileDialog1.Filter = "datas !!! | *.csv"
' filtre pour les fichiers


OpenFileDialog1.Multiselect =
False
' possibilité d'en seléct plusieurs a la fois


OpenFileDialog1.ShowDialog()


objDataFile.FilePath = OpenFileDialog1.FileNames(0)
' pour recup un seul fichier



If objDataFile.Import(strConnection, strErrMsg)
Then



If
Not objDataFile.Archive(strErrMsg)
Then


MessageBox.Show(strErrMsg, "Archive File Error", MessageBoxButtons.OK, MessageBoxIcon.Error)



End
If



Else


MessageBox.Show(strErrMsg, "Import File Error", MessageBoxButtons.OK, MessageBoxIcon.Error)



End
If



Catch Ex
As Exception



' Unable to read the input file


MessageBox.Show(Ex.Message & " Occurred " & Ex.StackTrace(), "Import File Error", MessageBoxButtons.OK, MessageBoxIcon.Error)



Finally



Me.Cursor = Cursors.Default


objDataFile =
Nothing



End
Try



End
Sub



Nota:
OpenFileDialog1 a peut etre été instancié 2 *

je ne sais pas trop, mais ça ne voulait pas sans et alors vu que le VB et moi, c'est pas comme le VC et win32 que je trouve plus évident...
une bonne ame corrigera peut etre....
___________________________________________________________
Magicalement
Nono
0
Messages postés
2
Date d'inscription
lundi 3 mai 2004
Statut
Membre
Dernière intervention
26 octobre 2005

slt,



je souhaiterais sélectionner plusieurs fichier dans mon openfiledialog
et pouvoir afficher la sélection dans un listbox? quelqu'un pourrais
m'aider svp?
0
Messages postés
28
Date d'inscription
mercredi 31 mars 2010
Statut
Membre
Dernière intervention
3 décembre 2010

ceci est installé automatiquement --->>
Me.OpenFileDialog1 =
New System.Windows.Forms.OpenFileDialog()

<<----

dim fichier() as string
dim fichier1 as string

OpenFileDialog1.Filter = "musique | *.mp3;*.wav" ' filtre pour les fichiers
OpenFileDialog1.Multiselect = True ' possibilité d'en seléct plusieurs a la fois
OpenFileDialog1.ShowDialog()

fichier = OpenFileDialog1.FileNames ' pour recup. plusieurs fichiers

fichier1 = OpenFileDialog1.FileNames ' pour recup un seul fichier

par contre je ne sais pas comment augmenter le nombre de fichiers à charger, du genre "CommonDialog1.MaxFileSize" en VB6

vv
-2