＋设为首页 ＋添加到收藏夹
Dim obj As Object
Set obj = CreateObject("GPSServ.Server.1", "ty")
obj.SetPort (1) 在行此出现"拒绝访问"的提示
原提示：
run time error "70"
permission denied
权限问题,在服务器端的组件服务中添加你的组件,然后设置访问账号.
你的客户端机器是与服务器在一个域中吗?
我在交互方式下通过
你的组件服务器是域服器的话必须是域用户，如何是工作组的话必须是工作组的用户。
用户方式应该没有问题，你再试试
我也遇到了这个问题。试试我的解决方案吧：
Win2k客户端，组件服务中的我的电脑，右键属性，默认属性标签，将默认身份验证级改为无。要重启，再试试吧。
不想重启？运行：dcomcnfg，同上。
两台电脑的Administrator密码设为一样 然后用此账号登录再试
