[Resolvido] inset into

[Marostegan 0]

olá amigos...

 

estou com mais um probleminha aqui que naao consigo resolver... =///

 

estou usando BD Access... e um determinado campo coloquei como tipo de dados DATA...

 

Tenho a tabela 'contas_a_pagar'

 

varios campos e mais o campo 'vencimento' (esse é DATA...)

 

O PROBLEMA: é quando eu clico no botão BAIXAR.

 

dm.q_at_pagar.Close;
dm.q_at_pagar.SQL.Clear;
dm.q_at_pagar.SQL.Add('Insert into tbl_at_pagar(valor, vencimento, referencia, empresa, parcela, de, observacao) values ('''+DBEdit2.Text+''','''+DBEdit3.Text+''','''+DBEdit4.Text+''','''+DBEdit5.Text+''','''+DBEdit6.Text+''','''+DBEdit7.Text+''','''+DBMemo1.Text+''')');
dm.q_at_pagar.ExecSQL;

SE: eu colocar a DATA (exemplo) 10/12/2010 ** Tudo funciona certinho, os dados são transferidos da tabela.

 

PORÉM...

 

SE: eu colocar a DATA (exemplo) 01/12/2010 ** Da o seguinte erro 'Tipo de dados incompatível na expressão de critério'

 

isso porque o sistema está tirando o '0' ali do começo quando salvo esses dados na tabela ... (fica assim: 1/12/2010)

 

estou usando no DataModule, dentro do ADOQuery, a formatação do campo 'vencimento' (EditMask) assim: !99/99/9999;1;_

 

como fazer para que esse '0' fique ai quetinho?

 

 

desde já agradeço a atenção!

[Marostegan 0]

Olá pessoal!

 

consegui resolver!

 

coloquei dentro do evento "AfterOpen" do ADOQuery o seguinte:

 

ShortDateFormat := 'dd/mm/yyyy';

e agora está funcionando certinho... ao colocar a data 01/12/2010, por exemplo, ele salva exatamente assim (01/11/2010) e não como estava salvando antes (1/11/2010).

 

 

Abraços!!