求在VB中创建VFP数据库的代码!!

Question

偶,现在遇到一个问题,要用在VB的环境中动态的创建一个表(TABLE),数据库为VFP数据库,不知道如何实现  
我用"CREATE  TALBE.."不行,如果哪位知道,请您回复,偶在此感激不尽,如果分不够,还可以继续给!!

Answer 1

'创建VFP数据库
Sub C_VFP()
    Dim iDb As ADODB.Connection
    Dim iConc$, iSql$
    
    iConc = "Driver={Microsoft Visual FoxPro Driver};SourceType=DBF;SourceDb=c:\"
    
    Set iDb = New ADODB.Connection
    With iDb
        '.CursorLocation = adUseClient
        .ConnectionString = iConc
        .Open
    
        '在指定的路径上生成DBF文件
        iSql = "CREATE TABLE c:\test\test.dbf(id int,name char(10))"
        .Execute iSql
        
        .Close
    End With
    
    Set iDb = Nothing
End Sub