Ir para conteúdo
Fórum Script Brasil

Wagner Medeiros

Membros
  • Total de itens

    7
  • Registro em

  • Última visita

Tudo que Wagner Medeiros postou

  1. Interessante, mas uso o ACCESS. Não exeste essa função, estou procurando por outras que façam a mesma coisa, se alguém souber . . . Mas observem que no Help do Delphi diz que ele retorna o último registro gravado, em forma de recordset. De qualquer maneira seria interessante saber usar esse recurso. Mas tá valendo a dica, o mySQL é uma boa opção também, não é verdade ? nste caso é que já tenho um banco e um sistema que o utiliza e não tenho como "mexer" no sistema de terceiros . . . Obrigado . . .
  2. Obrigado pela dica, mas neste caso não posso fazer isso. o campo codigo é o único que não pode repetir (chave) os outros não posso confiar e pode ser incluido um com mesmo valor imediatamente por outro usuário. se alguém me ajudar, eu vi no help do delphi que o adocommand retorna o registro incluido para um recordset, mas não consigo acessá-lo. r:=adoconnection1.Execute('insert into tb01 (descricao) values ("teste")'); OU adocommand1.CommandText:='insert into titulares (codigo, nome) values ("'+edit1.text+'","'+edit2.text+'")'; r:=adocommand1.Execute;
  3. esse erro aconteceu comigo quando uso o metodo append, mas substitui por insert e num deu erro.
  4. Jonas, Normalmente as conexões SQL devem ser rápidas, ou seja, a conexão deve ser feita no momento da solicitação do usuário. Mas pelo que você disse, a mesma aplicação não consegue mais acessar a menos que voce reinicializa a máquina, né ?
  5. Tente o seguinte : no evento DropDown ponha : keypreview:=false; e no CloseUp ponha : keypreview:=true;
  6. Olá pessoal, Tenho um campo (codigo) em uma tabela access (tb01) que é do tipo "Numeração Automática" e um campo descricao (texto). Tento fazer o seguinte : Var r : _recordset; Begin r:=adoconnection1.Execute('insert into tb01 (descricao) values ("teste")'); end; Isso funciona perfeitamente, mas quando tento pegar os dados gravados com : Var r : _recordset; s : integer; Begin r:=adoconnection1.Execute('insert into tb01 (descricao) values ("teste")'); s:=r.Fields['codigo'].Value; end; Erro : O item não pode ser encontrado na coleção correspondenre ao nome ou ao ordinal solicitado. alguém tem uma ajuda ? o que quero é pegar o numero que foi gravado no meu campo de auto incremento. não posso pegar depois já que aoutro usuário pode ter incluido um registro imediatamente após o meu, etc. . . qualquer coisa : wam1@bol.com.br
  7. Olá pessoal, Tenho um campo (codigo) em uma tabela access (tb01) que é do tipo "Numeração Automática" e um campo descricao (texto). Tento fazer o seguinte : Var r : _recordset; Begin r:=adoconnection1.Execute('insert into tb01 (descricao) values ("teste")'); end; Isso funciona perfeitamente, mas quando tento pegar os dados gravados com : Var r : _recordset; s : integer; Begin r:=adoconnection1.Execute('insert into tb01 (descricao) values ("teste")'); s:=r.Fields['codigo'].Value; end; Erro : O item não pode ser encontrado na coleção correspondenre ao nome ou ao ordinal solicitado. alguém tem uma ajuda ? o que quero é pegar o numero que foi gravado no meu campo de auto incremento. não posso pegar depois já que aoutro usuário pode ter incluido um registro imediatamente após o meu, etc. . . qualquer coisa : wam1@bol.com.br
×
×
  • Criar Novo...