在msdn中有VC的例子,其中有DAO的例子,你说的几个功能都是最基本的,例子里都有!

解决方案 »

  1.   

        
        'create new database for ...
        Dim dbTemp As Database
        Set dbTemp = CreateDatabase(strFile, dbLangGeneral)
        
        Dim tbTemp As TableDef
        Set tbTemp = dbTemp.CreateTableDef(gconstrOrgBillTable)
        
        Dim fdTemp As Field
        With tbTemp
            Set fdTemp = .CreateField(gconstrCallerField, dbText, gconintCallerLen)
            fdTemp.Required = True
            .Fields.Append fdTemp
            
            Set fdTemp = .CreateField(gconstrCalledField, dbText, gconintCalledLen)
            fdTemp.Required = True
            .Fields.Append fdTemp
            
            Set fdTemp = .CreateField(gconstrDurLongField, dbText, gconintDurLongLen)
            fdTemp.Required = True
            .Fields.Append fdTemp
            
            Set fdTemp = .CreateField(gconstrEndTimeField, dbText, gconintEndTimeLen)
            fdTemp.Required = True
            .Fields.Append fdTemp        .Fields.Append .CreateField(gconstrStateField, dbByte)
            
            'create a state index
            Dim idTemp As Index
            Set idTemp = .CreateIndex(gconstrStateIndex)
            idTemp.Fields.Append .CreateField(gconstrStateField, dbByte)
            .Indexes.Append idTemp
            
        End With
        dbTemp.TableDefs.Append tbTemp
        dbTemp.Close
      

  2.   

    在ACCESS中不能用SQL语句创建数据库,我建议你生成一个空的数据库文件,然后在程序中拷贝这个文件,再用SQL语句来创建表,INDEX等,
      

  3.   

    See DaoTable and DaoView sample in MSDN.