Le thread a été abandonné.Résolu

Question

Bonjour à tous!

J'ai un petit problème d'exception.

Voilà le problème:

Dans mon site ASP-VB.NET framework2, j'utilise le code-behind de plusieurs pages pour faire un traitement de données (enregistrement de données dans un base access) similaire.

Après avoir validé le traitement dans chacune des pages (procédures onclick), je me suis dit que je pouvais simplifier! J'ai donc créé une classe contenant une procédure réalisant le traitement sus-mentionné!

Et le problème est apparu : Le thread a été abandonné.

Pourtant, le traitement des données est bien réalisé! Voici mon code (code-behind d'une page) :

Protected Sub YOUPI_Button_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles YOUPI_Button.Click
   Try
      Dim TOTO As New MACLASS
      MACLASS.MaFonction(TEXT.Text)
      Response.Redirect("page2.aspx")
   Catch ex As Exception
      MsgBox(ex.Message.ToString)
      Response.Redirect("error.aspx")
   End Try
End Sub

Après étude de mon code et grace à des MsgBox bien placés, j'ai pu détecter que le message d'erreur est déclenché par les "Response.Redirect".
Or, ils fonctionnaient correctement avant la mise en classe du traitement de données.

QQ1 aurait-il la réponse à mon problème SVP? Ou tout du moins l'explication du problème?!

Merci d'avance!

jesusonline · Accepted Answer

Bonsoir, pour différente raison il vaut mieux éviter de mettre les response.redirect dans un bloc try catch. rajouter un Boolean error à l'exterieur de ton bloc try catch et suivant l'etat de la variable tu fais ton response.redirect vers tel ou tel page. 

Rapidement voici les raisons pour lesquels il faut éviter le response.redirect dans un bloc try catch, un response.redirect va écrire dans la response une redirection 302 vers ta nouvelle page puis il va quitter le thread de l'execution de la page comme un malpropre ce qui resulte a une exception de type ThreadAbortException or comme tu es dans un bloc try catch tu peux éventuellement avoir un bloc finally qui est toujours executé ... 
Si tu n'as pas le choix d'utiliser un response.redirect (ce qui n'est pas ton cas) tu pe ux utiliser response.redirect("lapage", true) ce qui ne quittera pas le thread en cours mais cela va continuer l'execution de la page meme aprés le response.redirect (sans pour autant l'afficher à l'écran).

<hr />Cyril - MVS - MCP

v.massip · Answer

Effectivement, je comprends mieux le problème!  Merci!

La solution est donc le code suivant :
Protected Sub YOUPI_Button_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles YOUPI_Button.Click
   Try
      Dim TOTO As New MACLASS
      MACLASS.MaFonction(TEXT.Text)
      Response.Redirect("page2.aspx", False)
   Catch ex As Exception
      MsgBox(ex.Message.ToString)
      Response.Redirect("error.aspx")
   End Try
End Sub

La fonction Response.Redirect est définie comme suit :
Response.Redirect(url As String, [endResponse As Boolean] = True)
endResponse : Indique si l'exécution de la page en cours doît s'arrêter.

Ceci évite l'erreur ThreadAbortException car le thread est quitté proprement cette fois-ci.

Sinon, et si la fin du code de la page doit s'exécuter quand même après la redirection, il faut mettre endResponse a True.

Voilà! Merci encore!

jesusonline · Answer

Non ce n'estpas ce que j'ai dit ! 

"Si tu n'as pas le choix d'utiliser un response.redirect (ce qui n'est pas ton cas)" 

Dans ton cas tu n'as pas besoin d'avoir un response.redirect à l'interieur de ton bloc try catch !!! 

Dim error as Boolean = false 

try
truc()
catch 
error = true
end try 

if error then 
response.redirec("error.aspx") 
else 
response.redirec("page2.aspx")
end if 

avec ce que tu as fait tu va continuer l'execution de ta page meme aprés le redirect ce qui est complétement inutile et "gourmand" niveau perf. 

<hr />Cyril - MVS - MCP

mezaourou · Answer

Réponse acceptée !


Effectivement, je comprends mieux le problème!  Merci!

La solution est donc le Protected Sub YOcode suivant :

   Try
      Dim TOTO As New MACLASS
      MACLASS.MaFonction(TEXT.Text)
      Response.Redirect("page2.aspx", False)      '   ------------------>False
   Catch ex As Exception
      MsgBox(ex.Message.ToString)
      Response.Redirect("error.aspx")
   End Try

mezaourou

Le thread a été abandonné.

4 réponses

Votre réponse

Discussions similaires