请教高手：在PB8中使用LISTEN（）的问题

[winnet]

部分程序如下：
//全局变量：transport g_transport

g_transport = create transport
g_transport.driver = "WinSock"
g_transport.application = ProfileString("chat.ini", "dpb", "application", "")

li_rc = g_Transport.Listen()
if li_rc <> 0 then
Choose case li_rc
case 50
MessageBox("服务器", "分布式服务器错误!")
case 52
MessageBox("服务器", "分布式通讯错误")
case 55
MessageBox("服务器", "请求非法终止")
case 56
MessageBox("服务器", "没有相应请求")
case -999
MessageBox("服务器", "终止，服务器监听对象不支持此通信协议")
case else
MessageBox("服务器", "未知错误 - " + String(li_rc))
end choose
halt close
end if

点解在PB在提示LISTEN（）是已经过时、废除的对象，到底在PB8中用什么来代替。(提示文字为：obsolete object reference)

[hzhxxx]

建议使用 easerver,我也正在为这事情换!

他吗的 sybase ,对下这么不见用!

transport 已经毁弃!(PB>=8.0)

[winnet]

可是我的程序在PB65下编，现在要转到PB8中开发，救命啊，我还没有时间是学Easerver,唉，看来SYBASE中产品对低版本的不给予照顾。

[qianjia]

PB8不适合用了，转换为EASERVER