DLL代码:Option Explicit
Public x, y As Integer
Public Function myAdd() As Integer
myAdd = x + y
End Function客户机代码:
Dim ox as object
set ox=createobject("Com_Test.ClsAdd","win2000 server 的IP地址")
ox.x=12
ox.y=13
text1.text=ox.myAdd()
以上代码在局域网调试通过,但把COM组件安装在服务器上,把IP改为服务器IP,想通过互联网来连
接COM组件,则连接不上,为什么?可以这样做的吗?
解决方案 »
免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货