How to make a macro to save a .igs

Hello,

I'm trying to make a macro to save a file as an .IGS file and put it into a specific directory.

Dim swApp As Object

Dim Part As Object
Dim boolstatus As Boolean
Dim longstatus As Long, longwarnings As Long

Sub main()

Set swApp = _
Application.SldWorks

Set Part = swApp.ActiveDoc
longstatus = Part.SaveAs3("\\172.31.3.31\drawings\SolidWorks\SA_LIBRARY\IGS OUTPUT\ActiveDoc.IGS", 0, 0)
End Sub

I know the \ActiveDoc.IGS is wrong. What does it need to be to just save the SolidWorks part file.IGS?

Thanks in advance,

-Scott

SolidworksApi macros