Dim pdfinstructions As IpfcDWGSetupExportInstructions
Dim outdir As String
pdfinstructions = (New CCpfcDWGSetupExportInstructions).Create()
outdir = asyncConnection.Session.GetCurrentDirectory() + model.InstanceName.ToLower + ".dwg"
model.Export(outdir, pdfinstructions)