Discussion :

[Stephane_br]

Bonjour,

Dans le cadre de l'utilisation d'un webservice, un client me demande de luis envoyer des données dans une chaine de caractères, en séparent les données par

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

$FE

.
De mon côté, je suis en vb.net, j'ai essayé de lui envoyer chr(254), ou Hex(254)... mais sans résultat.

Voyez-vous autre chose qui pourrait être utilisé en vb.net pour envoyer l'équivalent de $FE en hexadécimal ?

Merci de toutes les pistes que vous pourrez me donner.

[Stephane_br]

Juste pour avoir votre avis sur ma méthode de conversion de $FE en hexadécimal en vb.net.
La méthode habituelle pour moi est celle-ci :

Hex(254).ToString() ou Hex(ChrW(254))

Pour faire simple, je dois envoyer sur un webservice des données dans une chaîne de caractères et les séparer par $FE en hexadécimal (à la demande du client), mais bien qu'il reçoit correctement mes données, il ne détecte pas le séparateur $FE
J'ai testé avec lui plusieurs façons différentes de lui fournir ce séparateur mais rien ne fonctionne, comme par exemple chr(254), ChrW(254), "\xFE", "$FE", "FE", ...

Pour info, j'utilise HttpWebRequest (qui fonctionne parfaitement) et le client reçoit bien mes données :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

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
Dim post_datas as string = "var1" & Hex(254).ToString()
post_datas &= "var2" & Hex(254).ToString()
post_datas &= "var3" & Hex(254).ToString()
post_datas &= "var4" & Hex(254).ToString()



Dim hwrequest As Net.HttpWebRequest
hwrequest = Net.WebRequest.Create(url)
hwrequest.AllowWriteStreamBuffering = True
hwrequest.Method = "POST"
...
.. etc
...
// données ------------------------------------------------------
Dim byteArray As Byte() = Encoding.UTF8.GetBytes(post_datas)
hwrequest.ContentLength = byteArray.Length
Dim dataStream As Stream = hwrequest.GetRequestStream()
dataStream.Write(byteArray, 0, byteArray.Length)
dataStream.Close()
// .données -----------------------------------------------------
...
..
...
hwresponse = hwrequest.GetResponse()
If hwresponse.StatusCode = Net.HttpStatusCode.OK Then
 ...
 .. etc
 ...
End If

Merci pour vos avis et retours....