Dim oDoc As AssemblyDocument= ThisDoc.Document 
Dim oDef As AssemblyComponentDefinition = oDoc.ComponentDefinition 
Dim oFactory As iAssemblyFactory = oDef.iAssemblyFactory
Dim oRow As iAssemblyTableRow
For Each oRow In oFactory.TableRows
	oFactory.CreateMember(oRow)
Next

iLogicVb.UpdateWhenDone = True