抄来的一段 var CreateAccess:OleVariant; begin CreateAccess:=CreateOleObject('ADOX.Catalog'); CreateAccess.Create('Provider=Microsoft.Jet.OLEDB.4.0;Data Source=c:\Aceco.mdb'); end;
to xzgyb var CreateAccess:OleVariant; begin CreateAccess:=CreateOleObject('ADOX.Catalog'); CreateAccess.Create('Provider=Microsoft.Jet.OLEDB.4.0;Data Source=c:\Aceco.mdb'); end; 不行的,它却说是 Undeclared identifier: 'CreateOleObject' 连编译也过不去
现在来说很简单了,只是我以前没有接触过,请大家帮助
var
CreateAccess:OleVariant;
begin
CreateAccess:=CreateOleObject('ADOX.Catalog');
CreateAccess.Create('Provider=Microsoft.Jet.OLEDB.4.0;Data Source=c:\Aceco.mdb');
end;
AccessApplication:=CoApplication.Create;
嗯,请问谁可以给我一段动态建库的源代码?
D5+ACCESS2000
[email protected]
var
CreateAccess:OleVariant;
begin
CreateAccess:=CreateOleObject('ADOX.Catalog');
CreateAccess.Create('Provider=Microsoft.Jet.OLEDB.4.0;Data Source=c:\Aceco.mdb');
end;
不行的,它却说是
Undeclared identifier: 'CreateOleObject'
连编译也过不去
http://www.csdn.net/expert/topic/414/414324.shtm
用Servers页的TAccessApplication的
AccessApplication1.NewCurrentDatabase('C:\gh.db');
也好使
用一个空数据库Copy就可以了