Uploader des fichier [Résolu]

Messages postés
10
Date d'inscription
lundi 30 juillet 2007
Dernière intervention
6 avril 2009
- - Dernière réponse : cs_mayna21
Messages postés
10
Date d'inscription
lundi 30 juillet 2007
Dernière intervention
6 avril 2009
- 3 avril 2009 à 01:36
Salut,

je developpe une application sous Vb.net et je veux afficher la

fenetre 'parcourir' pour pouvoir uploader des fichier dans une

repertoire comme un objet de type FILE dans HTML


je suis vraiment besoin de votre aide.

merci d'avance
Afficher la suite 

Votre réponse

3 réponses

Meilleure réponse
Messages postés
2382
Date d'inscription
jeudi 12 juillet 2001
Dernière intervention
15 décembre 2018
3
Merci
Bonjour,
Pour afficher une boîte de dialogue Ouvrir utilise la classe OpenFileDialog. Un exemple est donné sur la msdn.
Pour uploader un fichier il y a un bout de code en exemple ici
++

Dire « Merci » 3

Quelques mots de remerciements seront grandement appréciés. Ajouter un commentaire

Codes Sources a aidé 98 internautes ce mois-ci

Commenter la réponse de cs_Willi
Messages postés
10
Date d'inscription
lundi 30 juillet 2007
Dernière intervention
6 avril 2009
0
Merci
@Willi : sa marche bien mais sa reste un petit problem c'est que My.Computer.Network.UploadFile("<localpath>", "<hostpath>")
<localpath> ??????


Private Sub Button1_Click_1(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Dim myStream As IO.Stream
Dim openFileDialog1 As New OpenFileDialog()

openFileDialog1.InitialDirectory = "c:"
openFileDialog1.Filter = "txt files (*.txt)|*.txt|All files (*.*)|*.*"
openFileDialog1.FilterIndex = 2
openFileDialog1.RestoreDirectory = True

If openFileDialog1.ShowDialog() = Windows.Forms.DialogResult.OK Then
myStream = openFileDialog1.OpenFile()
If Not (myStream Is Nothing) Then
' Insert code to read the stream here.
My.Computer.Network.UploadFile("?????", "ftp://ftp.abc.com/", "aaa", "bbbb")
myStream.Close()
MessageBox.Show("File downloaded")
End If
End If
End Sub</localpath></hostpath></localpath>
Commenter la réponse de cs_mayna21
Messages postés
10
Date d'inscription
lundi 30 juillet 2007
Dernière intervention
6 avril 2009
0
Merci
@Willi : sa marche bien mais sa reste un petit problem c'est que My.Computer.Network.UploadFile("<LocalPath>", "<HostPath>")
<LocalPath> ????
Private Sub Button1_Click_1(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Dim myStream As IO.Stream
Dim openFileDialog1 As New OpenFileDialog()

openFileDialog1.InitialDirectory = "c:"
openFileDialog1.Filter = "txt files (*.txt)|*.txt|All files (*.*)|*.*"
openFileDialog1.FilterIndex = 2
openFileDialog1.RestoreDirectory = True

If openFileDialog1.ShowDialog() = Windows.Forms.DialogResult.OK Then
myStream = openFileDialog1.OpenFile()
If Not (myStream Is Nothing) Then
' Insert code to read the stream here.
My.Computer.Network.UploadFile("LocalPath?????", "ftp://ftp.abs.com/", "aaa", "bbbb")
myStream.Close()
MessageBox.Show("File downloaded")
End If
End If
End Sub
Commenter la réponse de cs_mayna21

Vous n'êtes pas encore membre ?

inscrivez-vous, c'est gratuit et ça prend moins d'une minute !

Les membres obtiennent plus de réponses que les utilisateurs anonymes.

Le fait d'être membre vous permet d'avoir un suivi détaillé de vos demandes et codes sources.

Le fait d'être membre vous permet d'avoir des options supplémentaires.