Discussion :

[morgan47]

Bonjour,
sur mon application vb6 j'utilisais ce script pour poster des données dans un webbrowser:

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
         Dim Url As String
         Dim Flags As Long
         Dim TargetFrame As String
         Dim PostData() As Byte
         Dim Headers As String
 
         Url = urlsite & "login.php" ' A URL that will accept a POST
         Flags = 0
         TargetFrame = ""
 
         PostData = "pseudo=" & pseudo & "&mdp=" & mdp
 
         ' VB creates a Unicode string by default so we need to
         ' convert it back to Single byte character set.
         PostData = StrConv(PostData, vbFromUnicode)
 
         Headers = "Content-Type: application/x-www-form-urlencoded" & _
            vbCrLf
         WebBrowser1.Navigate Url, Flags, TargetFrame, PostData, Headers

J'aimerai faire la meme chose sous vb2005 mais je ne sais pas du tout comment faire, j'ai décider de passer eu vb net c'esr pour ca.

Merci beaucoup

[nico_pouchet]

alors tu as des convertisseurs en ligne et tu peux toujours tenter le copier coller direct, tu auras surement kelkes modif a faire, mais lors de mes traductions de code vb6 en vb.net j ai pas eu enormement de changement a faire, c est assez proche...

[morgan47]

b en fait la ou ca bug c cette ligne:

Code :

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

StrConv(PostData, vbFromUnicode)

car aparament vbFormUnicode n'existe plus en .net

[Bluedeep]

.Net travaille en Unicode, par ailleurs tu as la classe UnicodeEncoding.

[morgan47]

j'ai éssayé cela mais ca ne marche pas :

Code :

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

PostData = System.Text.Encoding.Unicode.GetBytes("pseudo=" & pseudo & "&mdp=" & mdp)