fonction IF ne retourne pas une valeur pour tous les chemins de code

Hello,

J'ai un warning sur ma fonction groupTest qui me dit ceci:

Citation:

---

Avertissement 1 La fonction 'groupTest' ne retourne pas une valeur pour tous les chemins de code. Une exception de référence null peut se produire au moment de l'exécution lorsque le résultat est utilisé.

---

Cette erreur veut dire qu'il n'y a pas forcement de "réponse" pour tout les cas de figures ? Si oui je ne vois pas quoi mettre pour un if...

Pouvez-vous m'aider à corriger cette boulette ?

voici mon code:

Code:

---

1 2 3 4 5 6 7 8 9 10 11 12

Function groupTest() As Object()   If (My.User.IsInRole("RBAFCT_LIS")) Then   Server.Transfer("adminpage.aspx")   Else : Server.Transfer("userpage.aspx")   End If     End Function

---

Bonjour
Euh question bete, y'a pas de return dans ta fonction?!

essaye de faire un code comme ca

Code:

---

1 2 3 4 5 6 7

function groupTest() as object dim var as object = Server.Transfer("userpage.aspx")   If (My.User.IsInRole("RBAFCT_LIS")) Then var =Server.Transfer("adminpage.aspx")   return var End function

---

En esperant t'avoir aidé

Nasty

Citation:

---

Envoyé par sammy1988

Hello,

J'ai un warning sur ma fonction groupTest qui me dit ceci:

Citation:

---

Avertissement 1 La fonction 'groupTest' ne retourne pas une valeur pour tous les chemins de code. Une exception de référence null peut se produire au moment de l'exécution lorsque le résultat est utilisé.

Cette erreur veut dire qu'il n'y a pas forcement de "réponse" pour tout les cas de figures ? Si oui je ne vois pas quoi mettre pour un if...

Pouvez-vous m'aider à corriger cette boulette ?

---

---

Code:

Code:

---

1 2 3 4 5 6 7 8 9

Function groupTest() As Object()   If (My.User.IsInRole("RBAFCT_LIS")) Then   Server.Transfer("adminpage.aspx") return ton_valeur Else : Server.Transfer("userpage.aspx") return ton_valeur End If

---

ou si ne voulez pas de return vous devez utiliser un procedure sub

Code:

---

1 2 3 4 5 6 7 8 9

dim sub() If (My.User.IsInRole("RBAFCT_LIS")) Then   Server.Transfer("adminpage.aspx")   Else : Server.Transfer("userpage.aspx") End If   End Function

---

Merci a vous 2 par contre je suis bête mais je ne comprends pas quoi mettre après le Return comme valeur ?

Bah tu retourne la valeur que tu veux recuperer!

Le tuto VB ca peut t'etre utile

Nasty

Citation:

---

Envoyé par nasty

Bah tu retourne la valeur que tu veux recuperer!

Le tuto VB ca peut t'etre utile

Nasty

---

justement, je ne cherche pas a récupérer de valeur mais je voulais juste orienter l'utilisateur avec ce code vers telle ou telle page :roll:

Alors il ne faut pas faire une fonction. Une simple sub suffit.

Code:

---

1 2 3 4 5 6 7

Public sub groupTest If (My.User.IsInRole("RBAFCT_LIS")) Then Server.Transfer("adminpage.aspx") Else Server.Transfer("userpage.aspx") End If End Sub

---

Nasty

Citation:

---

Envoyé par nasty

Alors il ne faut pas faire une fonction. Une simple sub suffit.

Code:

---

1 2 3 4 5 6 7

Public sub groupTest If (My.User.IsInRole("RBAFCT_LIS")) Then Server.Transfer("adminpage.aspx") Else Server.Transfer("userpage.aspx") End If End Sub

---

Nasty

---

nickel ça par contre je fais comment pour l'appeler avant j'utilisais <%Response.Write(groupTest)%> dans ma page asp.net :cry:

merci



voila ce quil faut utiliser pour garder la ligne plus haut :))

Code:

---

1 2 3 4 5 6 7

Function groupTest() As Object() If (My.User.IsInRole("RBAFCT_LIS")) Then Server.Transfer("adminpage.aspx") Else : Server.Transfer("userpage.aspx") End If Return Nothing End Sub

---