Ver Mensaje Individual
  #8  
Antiguo 04-04-2005
Avatar de jas010
jas010 jas010 is offline
Miembro
 
Registrado: ago 2004
Ubicación: Bolivia
Posts: 51
Reputación: 20
jas010 Va por buen camino
Lightbulb

la consulta que yo tengo
es el siguiente
Código:
'SELECT cod_aul, fecha_prest,nombre_presta,apellido_presta,hora_entrada,hora_salida ' +
		'FROM presto_ WHERE cod_aul = :codigo_aula and ((hora_entrada >= :hora_ent and hora_entrada <=:hora_sal) or (hora_salida > :hora_ent and hora_salida <= :hora_sal )) and fecha_prest = :fecha_prestamo ';
y anexo la where, y saque la conclucion que si el campo de fecha esta de tipo string no da problema, al contrario si halla datos pero no me puede mostrar el showmessage que si esta libre.
hice correr el programa paso a paso y si entra en la linea de codigo de consulta sql pero tal parece que no halla nada, y a continuacion anexo el codigo que pregunta si encuentra o no, y esta parte necesito saber si esta mal o esta bien
Código:
ADODataSet1.Recordset := ADOCOMMAND1.Execute;
if ADODataset1.Recordset.RecordCount = 0 then(esta parte hace la comparacion, si no halla es = a 0 sino muestra mensaje)
 begin
   showmessage('No  se a encontrado niguna reserva');
   guardar.Enabled:=true;
	end
else
  begin
  showmessage(('  El Aula ingresada esta siendo acupada por: ')+adodataset1.Fieldbyname('nombre_presta').Value);
  guardar.Enabled:=false;
   end;
ahi se los dejo el codigo a su criterio
espero que me puedan aclarar este lio
y gracias de antemano a todos los del foro
Responder Con Cita