Problème chargement fichier text [Résolu]
dsigmoun
- Messages postés
- 134
- Date d'inscription
- jeudi 31 juillet 2008
- Dernière intervention
- 15 février 2011
- Messages postés
- 117
- Date d'inscription
- mardi 21 janvier 2003
- Dernière intervention
- 2 juillet 2009
A voir également:
- Me.text vb
- Charger, lire, enregistrer les informations d'une liste déroulante dans un fichier texte - Codes sources - Visual Basic / VB.NET (Fichier / Disque)
- Chargement text dans un fichier text - Codes sources - Flash (ActionScripts)
- Classe de gestion de fichier de type ini (chargement/sauvegarde de fichier texte contenant des secti - Codes sources - C / C++ / C++.NET (Fichiers / Disque)
- C# - charger un fichier texte en changeant le paramètre d'encodage - Codes sources - C# / .NET (Chaînes de caractères)
- Charger un fichier texte (windows ou unix) - Codes sources - Visual Basic / VB.NET (Texte)
6 réponses
Meilleure réponse
/0276fe2f327a4977a36bc775f44e5436/auth-avatar/279968dd0f63df3b824bfedac2e31cfd-jmenfous)
- Messages postés
- 117
- Date d'inscription
- mardi 21 janvier 2003
- Dernière intervention
- 2 juillet 2009
voici une utilisation simple (enfin je pense, à toi de voir)
Dim webResponse As System.Net.WebResponse = Nothing
Try
' Création de la request et demande de la response
webResponse = System.Net.WebRequest.Create(path) _
.GetResponse()
' Test si on a des données
If webResponse.ContentLength > 0 Then
' Lecture de la stream de réponse
Dim streamReader As New System.IO.StreamReader(webResponse.GetResponseStream())
Me.Text = streamReader.ReadToEnd()
End If
Catch ex As System.Net.WebException
' Gestion d'erreurs liées à ta requete web
Finally
' Fermeture
If (webResponse IsNot Nothing) Then
webResponse.Close()
End If
End Try
Jérémy Jeanson
MCP
Dim webResponse As System.Net.WebResponse = Nothing
Try
' Création de la request et demande de la response
webResponse = System.Net.WebRequest.Create(path) _
.GetResponse()
' Test si on a des données
If webResponse.ContentLength > 0 Then
' Lecture de la stream de réponse
Dim streamReader As New System.IO.StreamReader(webResponse.GetResponseStream())
Me.Text = streamReader.ReadToEnd()
End If
Catch ex As System.Net.WebException
' Gestion d'erreurs liées à ta requete web
Finally
' Fermeture
If (webResponse IsNot Nothing) Then
webResponse.Close()
End If
End Try
Jérémy Jeanson
MCP
Quelques mots de remerciements seront grandement appréciés. Ajouter un commentaire
120 internautes nous ont dit merci ce mois-ci
- Messages postés
- 117
- Date d'inscription
- mardi 21 janvier 2003
- Dernière intervention
- 2 juillet 2009
Bonjour disgoun,
Voici un petit bou de code qui correspond exactement à ce que tu cherches (utilisation d'une stream et d'un webrequest pour requercher le fichier) :
Dim path As String = "http://...ton fichier"
Dim s As New System.IO.StreamReader( _
System.Net.WebRequest.Create(path) _
.GetResponse() _
.GetResponseStream())
TonColtrol.Text = s.ReadToEnd()
Après si tu veux tester l'accès au fichier (ce qui est conseillé) il faut découper ce code et déclarer un webrequest intermédiaire et un webresponse pour tester si oui ou non il y a réponse.
Voici un petit bou de code qui correspond exactement à ce que tu cherches (utilisation d'une stream et d'un webrequest pour requercher le fichier) :
Dim path As String = "http://...ton fichier"
Dim s As New System.IO.StreamReader( _
System.Net.WebRequest.Create(path) _
.GetResponse() _
.GetResponseStream())
TonColtrol.Text = s.ReadToEnd()
Après si tu veux tester l'accès au fichier (ce qui est conseillé) il faut découper ce code et déclarer un webrequest intermédiaire et un webresponse pour tester si oui ou non il y a réponse.
- Messages postés
- 1
- Date d'inscription
- samedi 8 octobre 2005
- Dernière intervention
- 27 août 2010
- Messages postés
- 117
- Date d'inscription
- mardi 21 janvier 2003
- Dernière intervention
- 2 juillet 2009
De rien,
Toujours ravis d'aider sur Vb ;)
Jérémy Jeanson
MCP, MCTS
http://blogs.codes-sources.com/jeremyjeanson/
Toujours ravis d'aider sur Vb ;)
Jérémy Jeanson
MCP, MCTS
http://blogs.codes-sources.com/jeremyjeanson/
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.