Bom dia!
- Some o campos Data e Hora antes de enviar para o Parâmetro.
- Use
ParamByName('DataFim').AsDateTime:=StrToDate(Edit5.Text)+StrToTime(Edit6.Text);
Boa sorte.
Ulisses
----- Original Message -----
From: Pedro Neves
To: delphi-br@yahoogrupos.com.br
Sent: Thursday, August 20, 2009 9:00 PM
Subject: [delphi-br] (unknown)
Estou com a seguinte dificuldade:
Estou tentando gravar a data e a hora no banco usando:
Begin
QRCadastro.Close;
QRCadastro.Sql.Clear;
QRCadastro.Sql.Add('Insert Into Tabela(Matricula, DataInicio,
DataFim)');
QRCadastro.Sql.Add('Values(:Matricula, :DataInicio, :DataFim)');
QRCadastro.ParamByName('Matricula').AsString:= Edit2.Text;
QRCadastro.ParamByName('DataInicio').AsDate:= StrToDate(Edit5.Text);
QRCadastro.ParamByName('DataFim').AsDate:= StrToDate(Edit7.Text);
QRCadastro.ParamByName('DataInicio').AsTime:= StrToTime(Edit6.Text);
QRCadastro.ParamByName('DataFim').AsTime:= StrToTime(Edit8.Text);
QRCadastro.ExecSQL;
End
O campo no banco de dados é do tipo datetime e quando gravo a data dá
certo mas se comentar (//) a data e gravar a hora dá erro no banco.
Alguém sabe onde está o erro.
grato
Pedro.
__________________________________________________________
Veja quais são os assuntos do momento no Yahoo! +Buscados
http://br.maisbuscados.yahoo.com
[As partes desta mensagem que não continham texto foram removidas]
[As partes desta mensagem que não continham texto foram removidas]
