VB6 vers VB2005, postdata dans un webbrowser

Version imprimable

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

Code:

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

20/12/2007, 12h43
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...
20/12/2007, 12h55
morgan47

b en fait la ou ca bug c cette ligne:

Code:

StrConv(PostData, vbFromUnicode)

car aparament vbFormUnicode n'existe plus en .net
20/12/2007, 13h00
Bluedeep

.Net travaille en Unicode, par ailleurs tu as la classe UnicodeEncoding.
20/12/2007, 18h02
morgan47

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

Code:

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