VBA－ACCDB生成Visual FoxPro DBF问题

Sub accToVFP()
'环境：win7_32bit + OFFICE 2010（32bit)
'驱动：VFPODBC.msi VFPOLEDBSetup.msi（已经安装）
'目的：ACCDB表直接导出生成 VFP类型的 .DBF 文件
    Dim iRec As Long
    
    With Cn1
        .Provider = "Microsoft.ACE.OLEDB.12.0"        '.Provider = "Microsoft.Jet.OLEDB.4.0"
        .Properties("Data Source") = ThisWorkbook.Path & "\db1.accdb"
        .CursorLocation = 3     '3=adUseClient
        .Open
    End With
    
    'Debug.Print Cn1.ConnectionString
    'Cn1.Execute "SELECT * INTO [OLEDB;Provider=vfpoledb;Data Source=" & ThisWorkbook.Path & "].[DBF90.DBF] FROM [表1]", iRec
    '//运行错误：无效参数
    'Cn1.Execute "SELECT * INTO [ODBC;Driver={Microsoft Visual FoxPro Driver};SourceType=DBF;SourceDB=" & ThisWorkbook.Path & "].[DBF90.DBF] FROM [表1]", iRec
    '//运行错误：未指定的错误
    Cn1.Execute "SELECT * INTO [ODBC;Driver={Microsoft Visual FoxPro Driver};SOURCETYPE='Free Table directory';Exclusive=No;Collate=Machine;NULL=NO;DELETED=NO;BACKGROUNDFETCH=NO;SourceDB=d:\test\].[DBF90.DBF] FROM [表1]", iRec
    '//跳提示框
    Cn1.Close
    Debug.Print iRec
    
End Sub 

一直搞不懂，代码已经指定：SOURCETYPE='Free Table directory'  自由表目录，但仍然跳提示框，需要选择，而且也无法生成DBF文件，求高人指定，谢谢！