在VB6上，怎么实时接收服务器通过Webserver返回的数据

如题：如何实时接收服务器通过Webserver返回的数据？

Visual Basic code?

Dim oSoapClient As New MSSOAPLib30.SoapClient30

Dim bReturn() As Byte

oSoapClient.ClientProperty("ServerHTTPRequest") = True

oSoapClient.MSSoapInit WebServer

Dim bBuffer(0 To 9) As Byte

For i = 0 To 9

bBuffer(i) = DBBuffer(i)

Next i

bReturn = oSoapClient.sendPager(bBuffer)

'请在此等待返回并把数据存入DEBuffer (9)

For i = 0 To 9

DEBuffer(i) = bReturn(i)

Next i

Set oSoapClient = Nothing

Dim oSoapClient As New MSSOAPLib30.SoapClient30

Dim bReturn() As Byte

oSoapClient.ClientProperty("ServerHTTPRequest") = True

oSoapClient.MSSoapInit WebServer

Dim bBuffer(0 To 9) As Byte

For i = 0 To 9

bBuffer(i) = DBBuffer(i)

Next i

bReturn = oSoapClient.sendPager(bBuffer)

'请在此等待返回并把数据存入DEBuffer (9)

For i = 0 To 9

DEBuffer(i) = bReturn(i)

Next i

Set oSoapClient = Nothing

以上代码是VB主动发，然后收取服务器的返回。

我现在想，VB不发，然后被动地收取服务器发送给VB的数据？要求实时

首先，FTP是文件传输协议，FTP服务器是用来上传或下载文件的，跟数据库连接没有一毛钱的关系，VB6可以通过INET控件把数据库下载到本地再使用，但这样就失去任何意义了。

其次，ACCESS数据库属于单机文件型数据库，不能用在网络多用户环境。在局域网中，ACCESS数据库可以放到一个共享文件夹中供其他电脑使用，但这仍然属于单机使用范畴，不是网络应用。如果实在要在广域网中用，可以把ACCESS数据库放到WEB服务器，然后用ASP搞个数据接口程序，VB6程序用xmlhttp+XML技术通过这个ASP程序间接实现对数据库的读写。不过这样做的效率与安全性是惨不忍睹的。

---