启动CATIA的VBS脚本，直接用

admin

创建一个后缀是VBS的文本文件，
/ \9 M" D7 D' U+ k
/ f! O4 x9 j1 u! B, r4 `粘贴：
  b1 d* G# _- L4 V5 ~9 x0 S8 Z
Dim CATIA
On Error Resume Next
Set CATIA = GetObject(,"CATIA.Application")
4 X) |4 u$ U. H7 E4 J& g8 MIf Err.Number <> 0 Then
Set CATIA = CreateObject("CATIA.Application")
CATIA.Visible = True
! M& ?" _0 }. A0 J( O* c' |End If
+ s3 C( K( `( }! o/ z$ FOn Error GoTo 0


会自动启动Catia程序
* N& ~& c: }1 h' j2 k1 _8 t6 Q% @