373294296 发表于 2019-2-20 22:28:29

在win7 32系统下能获取vl 对象，但是换个win10 64位的就获取不了 vl 了？

If Left(cadApp.Version, 2) = "15" Then
      Set vl = cadApp.GetInterfaceObject("VL.Application.1")
    Else
      Set vl = cadApp.GetInterfaceObject("VL.Application.16")
    End If
请教高手解决？谢谢了

373294296 发表于 2019-2-20 22:39:00

    If Left(cadApp.Version, 2) = "15" Then
      Set vl = cadApp.GetInterfaceObject("VL.Application.1")
    Else
      Set vl = cadApp.GetInterfaceObject("VL.Application.16")
    End If
老师们，我的win10 64位的怎么获取不了vl对象呢？

1005100717 发表于 2019-2-21 08:35:13

win10考虑下权限问题，还有就是 64位使用32位com是不能通过进程内方法的，必须经过进程外中转。32位程序使用64位com同理

woaishuijia 发表于 2019-2-21 14:39:36

本帖最后由 woaishuijia 于 2019-2-21 14:40 编辑


运行没问题，但是网站不让上传代码:@

373294296 发表于 2019-2-22 23:02:18

为什么我的一运行到Set vl = .GetInterfaceObject("vl.application.16")，就没了？

373294296 发表于 2019-2-22 23:03:13

求高手解决？？？为什么我的获取不了库类型呢

lee50310 发表于 2019-7-13 13:02:48

本帖最后由 lee50310 于 2019-7-16 09:56 编辑

既然可測得使用者cad版本,那直接將兩者結合,試試看


页: [1]
查看完整版本: 在win7 32系统下能获取vl 对象，但是换个win10 64位的就获取不了 vl 了？