I having problem using this activeX in vfp I have an SDK but in visual basic.

Can anybody help, please..

Here is the code:

Private Sub cmdSave_Click()
        On Error Resume Next
        Dim blob() As Byte
        Dim bvariant As Variant
        
        If RegTemplate Is Nothing Then
                Exit Sub
        End If
                
        RegTemplate.Export bvariant  <--- when I write this line in vfp
        blob = bvariant
        Kill "c:\template.fpt"
        Open "c:\template.fpt" For Binary As #1
        Put #1, , blob
        Close #1
End Sub

Example:

Local xValue

xValue = ""
RegTemplate.Export(xValue)

When I run the code I get no error but xValue has no value.