Traduction VB en TD 4

Bonjour,

Je me mets au .net, et pour cela je suis un cours sur papier en VB.net.

Je travaille avec TurboDelphi4.net. J'ai ce code en VB que je n'arrive pas à traduire en TD. Je pense que ce n'est vraiment pas grand chose, mais là je plante. Voici le code :

Code:

---

1 2 3 4

If Request.QueryString("myColor") <> "" Then Label1.ForeColor = Color.FromName(Request.QueryString("myColor")) End If

---

J'ai en particuliers un problème sur le QueryString('myColor').

Merci d'avance.

Fred

Merci d'avance.

voilà, je viens enfin de trouver (en tout cas ça compile), il faut utiliser :

Code:

---

1 2 3

if Request.QueryString.ToString = 'myColor' then Label1.ForeColor := Color.FromName(Request.QueryString.ToString);

---

Si quelqu'un peut tout de même me confirmer ma solutiion, cela me permettrait de continuer avec sécurité.

Merci

Fred

Salut,
il faut préciser la classe de l'objet Request car la méthode QueryString est commune à de nombreuses classes.
Il se peut que cela soit la classe WebClient, dans ce cas, et en recherchant dans le code sources des demos, il est peut être préférable de faire

Code:

---

if Request.QueryString.Get('MyColor')<>''

---

mais cela reste des suppositions.

Citation:

---

WebClient.QueryString, propriété
Obtient ou définit une collection de paires nom/valeur de requête associées à la demande.
...
[C#]
public NameValueCollection QueryString {get; set;}

---

Merci