关于MSHTML保持长连接的问题（关于请求http页面的问题续）

首先感谢上个帖子bdzwj的帮助，希望再来帮忙看看上个帖子：
关于请求http页面的问题
http://topic.csdn.net/u/20100527/15/b6eb6945-f7e6-4a3d-90a3-918ce5904838.html?585393614目前已实现MSHTML链接服务器，并能执行onload事件中指定的script。但似乎链接保持不住，当服务器试图往这个链接推送数据时，抛出ClientAbortException的异常，不知这个问题如何解决？webbrowser应该也是基于mshtml的吧，用webbrowser就能正常收到服务器推送的数据，不知链接是如何保持的。mshtml相关代码如下（httpTest.cls）：Dim objDoc3         As MSHTML.IHTMLDocument3
Dim objSubmit       As MSHTML.IHTMLInputButtonElement
Dim objText         As MSHTML.IHTMLInputElement
Dim objMSHTML       As New MSHTML.HTMLDocument
Dim WithEvents objDoc          As MSHTML.HTMLDocument
Public Sub Navigate(strUrl As String)
On Error GoTo err_handle    Set objDoc = objMSHTML.createDocumentFromUrl(strUrl, vbNullString)
    
    Exit Sub
err_handle:
    MsgBox Err.Description
End SubPrivate Sub objDoc_onreadystatechange()
On Error GoTo err_handle
    If objDoc.ReadyState = "complete" Then
        Debug.Print objDoc.body.innerHTML
    End If
    
    Exit Sub
err_handle:
    MsgBox Err.Description
End Sub