Por si ya has hecho modificaciones en el código fuente, te comentamos cómo solucionarlos:
* Para el error "TVerReservas : Campo "ID Reserva" no encontrado.", hemos accedido a "mdDatos", hemos hecho doble clic en "TVerReservas", hemos eliminado el primer campo "IDreserva", luego, con el botón derecho del ratón hemos seleccionado "Add all fields", nos ha agregado el campo "Idreservas". El error estaba en que el campo "idreserva" tenía el nombre incorrecto, es "idreservas". Para que esto funcione previamente deberás tener correctamente configurado "KADaoDatabase1", con la propiedad "Database" correctamente configurada (apuntando a la unidad y carpeta de la base de datos mdb).
* Para el error "Pocos parametros.Se esperaba 1", hemos modificado el siguiente código en el formulario "FormTimeOut", botón "BVerResevas":
Código:
procedure TFormTimeOut.BVerResevasClick(Sender: TObject);
begin
mdDatos.TVerReservas.Close;
mdDatos.TVerReservas.SQL.Clear;
mdDatos.TVerReservas.Params.Clear;
mdDatos.TVerReservas.SQL.add('select u.Id as Idusuario,u.Nombre,u.Tlf,u.DNI,r.IdReserva as Idreservas,r.hora,r.fecha');
mdDatos.TVerReservas.SQL.add('from usuarios u,Reservas r');
mdDatos.TVerReservas.SQL.add('where u.id=r.Id and r.Fecha=:pf');
mdDatos.TVerReservas.SQL.add('Order By r.hora');
mdDatos.TVerReservas.Params.ParamByName('pf').DataType:=ftDate;
mdDatos.TVerReservas.Params.ParamByName('pf').Value:=Date;
mdDatos.TVerReservas.Open;
if mdDatos.TVerReservas.RecordCount > 0 then
FormVerReservas.Show
else
MessageDlg('No hay ninguna reserva en el día de hoy.',
mtInformation,[mbOK],0);
end;
Publicado:
Sab Ago 01, 2009 11:32 am
gabrielam Usuario
Registrado: Jul 04, 2009 Mensajes: 3
Asunto:
Hola!
Muchas Gracias por la pronta respuesta!!
* Para el error "TVerReservas : Campo "ID Reserva" no encontrado.", hemos accedido a "mdDatos", hemos hecho doble clic en "TVerReservas", hemos eliminado el primer campo "IDreserva", luego, con el botón derecho del ratón hemos seleccionado "Add all fields", nos ha agregado el campo "Idreservas". El error estaba en que el campo "idreserva" tenía el nombre incorrecto, es "idreservas".
Para que esto funcione previamente deberás tener correctamente configurado "KADaoDatabase1", con la propiedad "Database" correctamente configurada (apuntando a la unidad y carpeta de la base de datos mdb)
Sigo las indicaciones que me das pero me da el siguiente error: TKDaoTable.OpenDaoRecordset: Database is NOT connected.
Como lo puedo solucionar!????
Muchas Gracias nuevamente!!
Publicado:
Lun Ago 03, 2009 12:15 am
alonsojpd Administrador/Moderador
Registrado: Sep 16, 2003 Mensajes: 2687
Asunto:
gabrielam escribió:
Hola!
Muchas Gracias por la pronta respuesta!!
* Para el error "TVerReservas : Campo "ID Reserva" no encontrado.", hemos accedido a "mdDatos", hemos hecho doble clic en "TVerReservas", hemos eliminado el primer campo "IDreserva", luego, con el botón derecho del ratón hemos seleccionado "Add all fields", nos ha agregado el campo "Idreservas". El error estaba en que el campo "idreserva" tenía el nombre incorrecto, es "idreservas".
Para que esto funcione previamente deberás tener correctamente configurado "KADaoDatabase1", con la propiedad "Database" correctamente configurada (apuntando a la unidad y carpeta de la base de datos mdb)
Sigo las indicaciones que me das pero me da el siguiente error: TKDaoTable.OpenDaoRecordset: Database is NOT connected.
Como lo puedo solucionar!????
Muchas Gracias nuevamente!!
Antes de intentar agregar los campos para el TKADaoTable "TVerReservas" con "Add all fields", en el componente "KADaoDatabase1" tienes que establecer la propiedad "Database" apuntando a la unidad, carpeta y nombre del fichero MDB (de Access) y luego, has de cambiar la propiedad "Connected" a True. Una vez conectado a la mdb, ya te debería dejar ejecutar el "Add all fields" en el "TVerReservas".
Tras añadir el campo "idreservas" vuelve a poner al false la propiedad "Connected" del "KADaoDatabase1".
Puede publicar nuevos temas en este foro No puede responder a temas en este foro No puede editar sus mensajes en este foro No puede borrar sus mensajes en este foro No puede votar en encuestas en este foro
Visita nuestro nuevo sitio web con programas y contenidos actualizados: Proyecto A