Club Delphi  
    Paypal   FTP   CCD     Buscar   Trucos   Trabajo   Foros

Retroceder   Foros Club Delphi > Bases de datos > Tablas planas
Registrarse FAQ Miembros Calendario Guía de estilo Temas de Hoy

 
 
Herramientas Buscar en Tema Desplegado
  #4  
Antiguo 14-11-2005
JanoRod JanoRod is offline
Registrado
 
Registrado: ago 2005
Posts: 6
Poder: 0
JanoRod Va por buen camino
No puede ingresar fechas en blanco en ACCESS

Cita:
Empezado por Caro
Hola supongo que tu campo fecha recibe valores nulos por eso dices en blanco, entonces podrias hacer lo siguiente:

Código Delphi [-]
 if maskedit1.Text=' ' then
    cad_fecha:='NULL'
 else
    cad_fecha:=QuotedStr(maskedit1.Text);
  
 with adoquery1 do
 begin
      close;
      sql.Clear ;
      sql.Add ('Insert Into paso (fecha)');
      sql.Add ('Values('+cadfecha+')');
      execSql ;
      showmessage ('DATOS GRABADOS OK...');
 end;
Hola Caro mira realize el siguiente codigo a lo mejor se entience un poco mejor
necesito ingresar datos cuando digo fechas en blanco me refiero a fechas con valor='' pero al ingresar estos en access me sale error tengo el siguiente codigo :

procedure TForm1.Button1Click(Sender: TObject);
var
Adate:TdateTime;
begin
Adate:=StrToDate(maskara.Text);
with adoquery1 do begin
close;
sql.Clear ;
sql.Add ('insert into paso (cod,fecha)');
sql.Add ('values ('+QuotedStr(edit1.Text)+','+QuotedStr(maskara.Text)+')');
execSql;
application.MessageBox('DATOS GRABADOS OK...','CONFIRMACION'mb_iconInformation);
edit1.Text :='';
maskara.Text :='';
end;
end;


no entiendo porque sale el error , ya que la BD me soporta valores en blanco
porfavor si alguien sabe como poder solucionar este problema se lo agradeceria.

Saludos
Responder Con Cita
 



Normas de Publicación
no Puedes crear nuevos temas
no Puedes responder a temas
no Puedes adjuntar archivos
no Puedes editar tus mensajes

El código vB está habilitado
Las caritas están habilitado
Código [IMG] está habilitado
Código HTML está deshabilitado
Saltar a Foro


La franja horaria es GMT +2. Ahora son las 09:54:28.


Powered by vBulletin® Version 3.6.8
Copyright ©2000 - 2026, Jelsoft Enterprises Ltd.
Traducción al castellano por el equipo de moderadores del Club Delphi
Copyright 1996-2007 Club Delphi