Create a Flattened Route Example (VB.NET)
This example shows how to create an annotation type flattened route and its
drawing.
'-----------------------------------------------------------------------------
' Preconditions:
' 1. Add SOLIDWORKS Routing as an add-in
'
(in SOLIDWORKS select Tools >
Add-Ins > SOLIDWORKS Routing).
' 2. Add SOLIDWORKS.interop.SwRoutingLib.dll as a reference
'
(in the IDE
right-click the project,
'
select Add Reference, and browse
install_dir\api\redist).
' 3. In Tools > Options > System Options > Routing > Routing File
Locations,
'
add locations of your SOLIDWORKS Routing files.
' 4. Open public_documents\samples\tutorial\api\5connector.sldasm.
' 5. Ensure that the specified templates exist.
'
' Postconditions:
' 1. FeatureManager design tree shows AnnotateFlattenedRoute1 and hides
Route1.
' 2. Sheet1 of 5connector.SLDDRW has the a2 - landscape format and
contains:
' * drawing view
' * five electrical connector tables
' * circuit-summary table
' * electrical BOM table.
'
' NOTE: Because this assembly is used elsewhere,
'
do not
save any changes to it.
'--------------------------------------------------------------------------
Imports
SolidWorks.Interop.sldworks
Imports
SolidWorks.Interop.swconst
Imports
SolidWorks.Interop.SWRoutingLib
Imports
System
Partial
Class
SolidWorksMacro
Dim
Part As
AssemblyDoc
Dim
boolstatus As
Boolean
Dim
longstatus As
Long
Sub
main()
Part = swApp.ActiveDoc
boolstatus = Part.Extension.SelectByID2("5connector.SLDASM",
"COMPONENT",
0, 0, 0, False,
0, Nothing,
0)
Dim
RouteMgr As
RouteManager
RouteMgr = Part.GetRouteManager
longstatus = RouteMgr.CreateFlattenRoute(1, 1, 0.0#, 0.0#, 1,
True,
"install_dir\lang\english\sheetformat\a2
- landscape.slddrt",
"install_dir\lang\english\bom-standard.sldbomtbt",
"install_dir\lang\english\bom-circuit-summary.sldbomtbt",
"install_dir\lang\english\connector-table.sldtbt",
True)
End
Sub
Public
swApp As
SldWorks
End
Class