SaveAsSVG Method Example

The following example opens the Document TestPicture and saves it as TestPicture.svg.

Private Sub CommandButton1_Click()

Dim iDoc As CFixFileLink

Set iDoc = Application.Documents.open("C:\Program Files (x86)\GE\iFIX\pic\TestPicture.grf")

Application.Documents.SaveAsSVG "C:\Program Files (x86)\GE\iFIX\pic\TestPicture.svg", iDoc

End Sub