Problema conexion ADO
Publicado por mog (4 intervenciones) el 02/11/2004 10:51:45
Hola a todos,
tengo un codigo como el siguiente:
/////INICIO CODIGO
procedure TformEmpresas.ADOTableEmpresasAfterPost(DataSet: TDataSet);
var
proveedor, origen, seguridad : String;
nombre : String;
ADOTableOrigen : TADOTable;
ADOTableDestino : TADOTable;
begin
nombre := formDatosEmpresa.DBEdCodigo.Text+formDatosEmpresa.DBEdnif.Text+
formDatosEmpresa.DBEdEjercicio.Text;
proveedor := \'Provider=Microsoft.Jet.OLEDB.4.0;\';
origen := \'Data Source= .\\\' + nombre + \'\\asecord.mdb;\';
seguridad := \'Persist Security Info=False\';
formPrincipal.ADOConnectionBBDD.ConnectionString := proveedor +origen + seguridad;
ADOTableOrigen.Connection := formPrincipal.ADOConnectionPrincipal;
adotableOrigen.TableName := \'tblEmpresa\';
formPrincipal.ADOConnectionBBDD.Open;
AdotableDestino.Connection := formPrincipal.ADOConnectionBBDD;
end;
//////FIN CODIGO
todo me funciona aparentemente de manera correcta. Sin embargo al llegar a la linea ADOTableDestino.connection me da un error y dice que salta la excepcion C0000005. No tengo ni idea de porque me sale esto porque cuando solo conecto una ADOTABLE parece que no da error.
¿Alguien me puede echar una mano?
Gracias a todos
tengo un codigo como el siguiente:
/////INICIO CODIGO
procedure TformEmpresas.ADOTableEmpresasAfterPost(DataSet: TDataSet);
var
proveedor, origen, seguridad : String;
nombre : String;
ADOTableOrigen : TADOTable;
ADOTableDestino : TADOTable;
begin
nombre := formDatosEmpresa.DBEdCodigo.Text+formDatosEmpresa.DBEdnif.Text+
formDatosEmpresa.DBEdEjercicio.Text;
proveedor := \'Provider=Microsoft.Jet.OLEDB.4.0;\';
origen := \'Data Source= .\\\' + nombre + \'\\asecord.mdb;\';
seguridad := \'Persist Security Info=False\';
formPrincipal.ADOConnectionBBDD.ConnectionString := proveedor +origen + seguridad;
ADOTableOrigen.Connection := formPrincipal.ADOConnectionPrincipal;
adotableOrigen.TableName := \'tblEmpresa\';
formPrincipal.ADOConnectionBBDD.Open;
AdotableDestino.Connection := formPrincipal.ADOConnectionBBDD;
end;
//////FIN CODIGO
todo me funciona aparentemente de manera correcta. Sin embargo al llegar a la linea ADOTableDestino.connection me da un error y dice que salta la excepcion C0000005. No tengo ni idea de porque me sale esto porque cuando solo conecto una ADOTABLE parece que no da error.
¿Alguien me puede echar una mano?
Gracias a todos
Valora esta pregunta


0