主题：HTTPRequest接收BUG

回复楼上，这个不是bug。我用下面的代码测试，xml数据可以接收。

是不是你发送过来的数据本身就是有问题的？

Select Case e.Path
    Case "input.htm"
        Dim sb As New StringBuilder
        sb.AppendLine("<form action='accept.htm' enctype='multipart/form-data' method='post' id='form1' name='form1'>")
        sb.AppendLine("产品: <input name='cp' id='cp'><br/><br/>")
        sb.AppendLine("客户: <input name='kh' id='kh'><br/><br/>")
        sb.AppendLine("单价: <input type='number' name='dj' id='dj'><br/><br/>")
        sb.AppendLine("数量: <input type='number' name='sl' id='sl'><br/><br/>")
        sb.AppendLine("日期: <input type='date' name='rq' id='rq'><br/><br/>")
        sb.AppendLine("密码: <input type='password' name='mm' id='mm'><br/><br/>")
        sb.AppendLine("支付方式: <br/>")
        sb.AppendLine("<input type='radio' name='fs' id='fs1' value = '支付宝' checked>支付宝") '注意同一组的radio，name属性相同，id属性不同
        sb.AppendLine("<input type='radio' name='fs' id='fs2' value = '微信'>微信")
        sb.AppendLine("<input type='radio' name='fs' id='fs3' value = '微信'>网银<br/><br/>")
        sb.AppendLine("会员: <input type='checkbox' name='hy' id='hy'><br/><br/>")
        sb.AppendLine("<input type='submit' name='sumbit' id='sumbit' value='提交'>")
        sb.AppendLine("<input type='reset' name='reset' id='reset' value='重置'>")
        sb.AppendLine("<input type='button' name='foxtble' id='foxtable' value='Foxtable主页' >")
        sb.AppendLine("</form>")
        e.WriteString(sb.ToString)
    Case "accept.htm"
        Dim sb As New StringBuilder
        sb.AppendLine("接收到的数据有:<br/><br/>")
        For Each key As String In e.Values.Keys
            msgbox(e.Values(key))
        Next
        e.WriteString(sb.ToString)
End Select