Dim obj As Object
    Set obj = CreateObject("GPSServ.Server.1", "ty")
    obj.SetPort (1)      在行此出现"拒绝访问"的提示 
原提示:
run time error "70"
permission denied

解决方案 »

  1.   

    我设置了,我添加了一个名为“guest”的角色(role)然后添加了everyone用户,然后再把该角色付给每个接口及方法.
      

  2.   

    to :Cooly(☆开心就好 ^o^ ☆) 
    是在同一个域
      

  3.   

    我也遇到了这个问题。试试我的解决方案吧:
    Win2k客户端(注意是客户端),组件服务中的我的电脑,右键属性,默认属性标签,将默认身份验证级改为无。要重启,再试试吧。
    不想重启?运行:dcomcnfg,同上。
      

  4.   

    两台电脑的Administrator密码设为一样 然后用此账号登录再试