怎样能识别webbrowser里的postdata数据

一、分别获取WebBrowser的Headers和PostData对象；
二、截取Headers的分割符；
三、重新编码PostData，注意其是二进制码，要按其原编码（UTF-8或ASCII等）进行逆编。
四、用分割符把PostData分割成数组1；
五、将预期接收的变量名储入数组2的0维；
六、历编数组2，将数组1中对应变量名的变量值储入数组2的1组。

附代VB代码片断：
'---------------------------------------------------------------------------------------
Dim Boundary, DataTexts As String
Boundary = "--" & Split(Headers, "boundary=")(1)
DataTexts = PostDataCode(PostData)
DataTexts = Left(DataTexts, Len(DataTexts) - 3 - Len(Boundary))
Dim Fields(2, 1) As Variant
Fields(0, 0) = "AFType" '表单类型 Dim AFType As String
Fields(1, 0) = "AID" '编号 Dim AID As Long
Fields(2, 0) = "ANumber" '代码 Dim ANumber As Long
Dim ValueArray() As String

ValueArray = Split(DataTexts, Boundary)
Dim ArrayCount, FieldCount As Integer
F