SolidWorks two times Development -09--add Coordination Reference

Refer to the following code to select the two sides of the part, and then add a matching reference for this part, first select the face for the reference of the first reference surface. and is the same direction, coincide with. The second one is reverse, coincident with.
Need to see the Part.FeatureManager.InsertMateReference function. The first parameter is the name that fits the reference, and the following three defines a reference for a group. The first is the entity of the selected entity, followed by the matching type (integer index), positive and negative (integer index).

Dim Swapp as Sldworks.sldworks
Dim part as Sldworks.modeldoc2
Dim Selmgr as Sldworks.selectionmgr
Dim Feature as Sldworks.feature
Dim Facefst as Sldworks.face2
Dim facesed as Sldworks.face2
Dim Facefstent as Sldworks.entity
Dim Facesedent as Sldworks.entity
Dim Tempfeat as Object


Sub Addcleatmateref ()
Set Swapp = Application.sldworks
Set part = Swapp.activedoc
Set selmgr = Part.selectionmanager

Set tempfeat = selmgr. GETSELECTEDOBJECT5 (1)
If Tempfeat. GetType = 2 Then
Set facefst = tempfeat
Set facefstent = facefst
Else
MsgBox "Please select Plane"
End If
Set tempfeat = selmgr. GETSELECTEDOBJECT5 (2)
If Tempfeat. GetType = 2 Then
Set facesed = tempfeat
Set facesedent = facesed
Else
MsgBox "Please select Plane"
End If
Set Feature = Part.FeatureManager.InsertMateReference ("Fit reference 1", Facefstent, 2, 1, Facesedent, 2, 2, nothing, 0, 0)
End Sub