salut tout le monde.
je développe sous visual basic.net 2005.
mon souci c'est que j'arrive pas à lire ou écrire dans un fichier texte sachant qu'il est bien créé. je pense que sa doit étre un problème avec le chemin d'accès au fichier mais j'ai pas d'erreurs et je trouve cela très bizarre.
voici le code que j'ai essayé au début:
[code]
Dim SW As IO.StreamWriter = File.CreateText("C:\user\U256265\Visual Studio 2005\MonFichier.txt")
PublicSub create_file()
SW.WriteLine("Bonjour.........")
SW.WriteLine("Monsieur")
writeToFile("Bonjour")
'SW.Close()
EndSub
PrivateSub writeToFile(ByVal str AsString)
Try
SW.WriteLine(str)
Catch ex As Exception
MsgBox("Error writing " & str)
EndTry
EndSub
autre code :
Sub ecritureFichier(ByVal fichier AsString)
Try
'Instanciation du StreamWriter avec passage du nom du fichier
Dim monStreamWriter As StreamWriter = New StreamWriter("c:\user\U256265\Visual Studio 2005\MonFichier.txt")
'Ecriture du texte dans votre fichier
monStreamWriter.WriteLine("Ma toute première ligne...")
monStreamWriter.WriteLine("Ma seconde ligne...")
monStreamWriter.WriteLine("Ma troisième ligne...")
'Fermeture du StreamWriter (Trés important)
monStreamWriter.Close()
Catch ex As Exception
'Code exécuté en cas d'exception
Console.WriteLine(ex.Message)
EndTry
EndSub
Sub lectureFichier(ByVal fichier AsString)
Try
' Création d'une instance de StreamReader pour permettre la lecture de notre fichier
Dim monStreamReader As StreamReader = New StreamReader("c:\user\U256265\Visual Studio 2005\MonFichier.txt")
Dim ligne AsString
'Lecture de toutes les lignes et affichage de chacune sur la page
Do
ligne = monStreamReader.ReadLine()
MsgBox(ligne)
MsgBox("</BR>")
LoopUntil ligne IsNothing
'Fermeture du StreamReader (attention très important)
monStreamReader.Close()
Catch ex As Exception
'Code exécuté en cas d'exception
MsgBox("Une erreur est survenue au cours de la lecture !")
MsgBox("</BR>")
MsgBox(ex.Message)
EndTry
EndSub
j'attend votre aide svp !
merci d'avance !
Partager