创建数据库MDB文件.doc

创建数据库MDB文件 var ? MYEngine:DBEngine; begin ? ? MYEngine:=CoDBEngine.Create; ? ? MYEngine.CreateDatabase( c:\NewAccess1.mdb , ;LANGID=0x0804;CP=936;COUNTRY=0; ,dbEncrypt); end; ? 用Query连接你的建好的数据库～～然后写SQL语句不就行了～～ CREATE ? TABLE ? Table1 ? ( Id ? int ? NOT ? NULL ? , String1 ? varchar ? (10) ? NOT ? NULL ? , Date1 ? datetime ? NULL ? , ); ? 对我有用[0] 丢个板砖[0] 引用 举报 管理 TOP 精华推荐：年终总结（一）：DirectShow做的播放器（有部分代码） sxy_9761 (仪仪猪猪) 等　级： #2楼 得分：0回复于：2004-03-23 16:59:23搜索 对我有用[0] 丢个板砖[0] 引用 举报 管理 TOP 精华推荐：申请delphi区大版 insert2003 (高级打字员) 等　级： #3楼 得分：0回复于：2004-03-23 16:59:48O97.pas或者是DAO2000.Pas 对我有用[0] 丢个板砖[0] 引用 举报 管理 TOP 精华推荐：在这临近年关的时候，我不祝福大家新年快乐，请大家进来缅怀已经离去1周年的sysu死树前辈！ insert2003 (高级打字员) 等　级： #4楼 得分：20回复于：2004-03-23 17:04:39//参考如下代码～～ uses ? ComObj; //... var ? ? CreateAccess: ? OLEVariant; begin ? ? CreateAccess ? := ? CreateOleObject( ADOX.Catalog ); ? ? CreateAccess.Create( Provider=Microsoft.Jet.OLEDB.4.0;Data ? Source=c:\temp\temp.mdb ); ? ? CreateAccess ? := ? Unassigned; end; //参考如下代码～～ ? ? ADOQuery1.ConnectionString ? := ? Provider=Microsoft.Jet.OLEDB.4.0;Data ? Source=c:\temp\temp.mdb ; ? ? ADOQuery1.SQL.Text ? := ? CREATE ? TABLE ? Table1 ? (Field1 ? varchar(10), ? Field2 ? varchar(10)) ; ? ? ADOQuery1.ExecSQL; 你搜一下，很多的 //建库方法 uses ? ComObj; //... var ? ? CreateAccess: ? Variant; begin ? ? CreateAccess ? := ? CreateOleObject( ADOX.Catalog ); ? ? CreateAccess.Create( Provider=Microsoft.Jet.OLEDB.4.0;Data ? Source=c:\temp\temp.mdb ); ? ? CreateAccess ? := ? Unassigned; end; //建表方法 ? ? ADOCommand1.ConnectionString ? := ? Provider=Microsoft.Jet.OLEDB.4.0;Data ? Source=c:\temp\temp.mdb ; ? ? ADOCommand1.CommandText ? := ? CREATE ? TABLE ? Table1 ? (Field1 ? varchar(10), ? Field2 ? varchar(10)) ; ? ? ADOCommand1.ExecSQL; 以下SQL语句在ACCESS ? XP的查询中测试通过 ? ? 建表: ? ? ? Create ? Table ? Tab1 ? ( ? ? ? ? ? ? ? ? ? ID ? Counter, ? ? ? ? ? ? ? ? ? Name ? string, ? ? ? ? ? ? ? ? ?