找回密码 注册 QQ登录
开思网工业级高精度在线3D打印服务

iCAx开思网

CAD/CAM/CAE/设计/模具 高清视频【积分说明】如何快速获得积分?快速3D打印 手板模型CNC加工服务在线3D打印服务,上传模型,自动报价
查看: 17631|回复: 3
打印 上一主题 下一主题

在VB里如何让CATIA用指定的环境启动?

[复制链接]
跳转到指定楼层
1
发表于 2007-1-5 18:27:32 | 只看该作者 回帖奖励 |倒序浏览 |阅读模式

马上注册,结交更多同行朋友,交流,分享,学习。

您需要 登录 才可以下载或查看,没有帐号?注册

x
请问,我在CATIA里新建了几个环境   CAD1, CAD2,桌面上出现了快捷方式 ,我想请问,在VB里通过Set aCATIA = CreateObject("CATIA.Application")启动时,如何可以让CATIA用CAD2或CAD1环境启动?
分享到:  QQ好友和群QQ好友和群 QQ空间QQ空间 腾讯微博腾讯微博 腾讯朋友腾讯朋友
收藏收藏 分享淘帖 赞一下!赞一下!
2
发表于 2007-5-14 18:29:02 | 只看该作者
跪求老师:我用VB开发SolidWorks螺纹标准件,想在VB里打开已经存在的一个SolidWorks文件,用什么函数?可以用LoadFile2或者是OpenDoc6吗?具体的怎么写程序啊 ?比如打开C盘下面的A.SLDPRT文件,谢谢了啊。或者和我联系啊,本人不盛感激。QQ:282909507
3
发表于 2007-5-15 10:27:13 | 只看该作者
不知道怎么通过Set aCATIA = CreateObject("CATIA.Application") 带环境启动,只会通过带参数运行CNEXT的方法,

DEST_FOLDER_OSDS = RegOper.RegRead("HKEY_LOCAL_MACHINE\SOFTWARE\Dassault Systemes\B14\0\DEST_FOLDER_OSDS")
        If fso.FileExists(DEST_FOLDER_OSDS + "\EnvDir.txt") Then
            Set ts = fso.OpenTextFile(DEST_FOLDER_OSDS + "\EnvDir.txt", ForReading)
            enPath = ts.ReadLine
            ts.Close
            Shell """" + DEST_FOLDER_OSDS + "\code\bin\CATSTART.exe""  -run ""CNEXT.exe"" -env " + 环境名 + " -direnv """ +  enPath + """ -nowindow", vbHide
            Sleep (ms)
4
发表于 2007-5-15 10:28:18 | 只看该作者
Sleep (ms)
是等待一段时间让CATIA启动.
您需要登录后才可以回帖 登录 | 注册

本版积分规则

3D打印手板模型快速制作服务,在线报价下单!

QQ 咨询|手机版|联系我们|iCAx开思网  

GMT+8, 2024-12-24 22:13 , Processed in 0.023945 second(s), 13 queries , Gzip On, Redis On.

Powered by Discuz! X3.3

© 2002-2024 www.iCAx.org

快速回复 返回顶部 返回列表