Ué, mas eu estou passando o ProviderName para o fcdsCliente. Como ficaria a procedure então? Obrigado.
________________________________ De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em nome de Fellipe Henrique Enviada em: domingo, 26 de novembro de 2006 15:47 Para: delphi-br@yahoogrupos.com.br Assunto: Re: [delphi-br] Erro ao acessar Fire Bird Isto quer dizer que algum CDS falta o DSP... vi pelo seu código: FcdsCliente.ProviderName := 'FdspCliente'; FdsCliente.DataSet Ou você esqueceu de por no seu email, ou realmente voce esqueceu no seu codigo de passar o ProviderName para o FdsCliente. []s Em 26/11/06, technomoked <[EMAIL PROTECTED] <mailto:humberto%40moked.com.br> > escreveu: > > Bem, estou tentando acessar o banco de dados somente criando os > objetos via código. porém estou tendo alguma dificuldade, pois apesar > de parecer estar tudo correto, da o seguinte erro: "Missing data > provider or data package" > > Segue abaixo a minha procedure: > > procedure TCliente.ConectarBD; > begin > > //Conectando ao banco de dados. > FsdsCliente := TSQLDataSet.Create(FsdsCliente); > FcdsCliente := TClientDataSet.Create(FcdsCliente); > FdspCliente := TDataSetProvider.Create(FdspCliente); > FdsCliente := TDataSource.Create(FdsCliente); > > FsdsCliente.Datasource := FdsCliente; > FsdsCliente.SQLConnection := dm.scsisgel; > FsdsCliente.CommandText := 'SELECT * FROM Cliente ' + > 'WHERE fl_ativo = 1'; > > FdspCliente.DataSet := FsdsCliente; > FcdsCliente.ProviderName := 'FdspCliente'; > FdsCliente.DataSet := FcdsCliente; > > FsdsCliente.Active := True; > FcdsCliente.Active := True; > > FcdsCliente.Close; > FcdsCliente.Open; > FcdsCliente.First; > //----< > > end; > > Alguém ai pode me ajudar? Thks. > > > -- _________________________________ Fellipe Henrique [EMAIL PROTECTED] <mailto:fellipeh%40gmail.com> Borland Developer Studio 2006 Certified "Venham até a borda, ele disse. Eles disseram: Nós temos medo. Venham até a borda, ele insistiu. Eles foram, Ele os empurrou... E eles voaram." (Guillaume Apollinaire) [As partes desta mensagem que não continham texto foram removidas] [As partes desta mensagem que não continham texto foram removidas]
