Bonjour à tous,
Dans un premier temps je m'excuse si j'ai mal placé ce sujet.
Ensuite je tiens à préciser que je cherche depuis plusieurs jours sur les forums anglais et français et mon problème semble ne pas avoir encore été rencontré.
Je développe une petite application winform sur visual studio 2010 : une textbox multiligne et un bouton.
Lors du clic sur le bouton, le texte contenu dans la textbox est envoyé vers un fichier texte.
Lors du déploiement de mon application celle-ci marche parfaitement.
Seulement lorsque je la place sur un autre ordinateur (avec la même version de windows : Windows 7 Professionnel; et le même type du système : 64 bits), au moment de rentrer le premier caractère dans la textbox un message d'erreur apparaît :
WindowsApplication1 a cessé de fonctionner
Puis l'application se ferme. Ce qui est étrange c'est que cette erreur ne se produit que sur un seul ordinateur.
Voici les erreurs renvoyées par windows :
C:\Users\***\AppData\Local\Temp\WER6C81.tmp.WERInternalMetadata.xml
C:\Users\***\AppData\Local\Temp\WER8446.tmp.appcompat.txt
C:\Users\***\AppData\Local\Temp\WER8456.tmp.mdmp
Après de multiples recherches, il semble que l'application soit en conflit avec un autre programme, mais impossible de définir lequel.
Pour précision : Une textbox avec la propriété multiligne à false fonctionne parfaitement.
Code utilisé :
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41
| Imports System
Imports System.IO
Public Class Form1
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Dim path As String = Application.StartupPath & "\Test.txt"
Dim sw As StreamWriter
Try
If File.Exists(path) = False Then
sw = File.CreateText(path)
sw.WriteLine(TextBox1.Text)
sw.Flush()
sw.Close()
End If
sw = File.AppendText(path)
sw.WriteLine(TextBox1.Text)
sw.Flush()
sw.Close()
Dim sr As StreamReader = File.OpenText(path)
Dim s As String
Do While sr.Peek() >= 0
s = sr.ReadLine()
Console.WriteLine(s)
Loop
sr.Close()
Catch ex As Exception
End Try
End Sub
End Class |
Je sollicite votre aide pour ce problème en espérant que quelqu'un ait la solution.
Merci
Florient
Partager