FTP | CCD | Buscar | Trucos | Trabajo | Foros |
|
Registrarse | FAQ | Miembros | Calendario | Guía de estilo | Buscar | Temas de Hoy | Marcar Foros Como Leídos |
|
Herramientas | Buscar en Tema | Desplegado |
|
#1
|
||||
|
||||
Registros sí hay; la base de datos ahora mismo es igual la que tengo yo que la del usuario.
|
#2
|
||||
|
||||
Mira "por separado" qué devuelve cada apartado de la consulta y lo comparas con tu equipo y con el del cliente, algo así:
etc... |
#3
|
||||
|
||||
Gracias por la sugerencia. El lunes haré la prueba.
|
#4
|
||||
|
||||
Bueno después de unos cuantos días en que tuve abandonado este tema lo retomé ayer. Lo primero que he hecho es comprobar la configuración del PC donde aparece el problema. Es esta:
Siguiendo vuestras sugerencias he modificado algo el código. Ahora está así: Código:
fMenu->Auxiliar->Close(); fMenu->Auxiliar->SQL->Text = "SELECT CURRENT_DATE FROM RDB$DATABASE"; fMenu->Auxiliar->Open(); TDateTime dFecha = fMenu->Auxiliar->FieldByName("CURRENT_DATE")->AsDateTime; fMenu->Auxiliar->Close(); fMenu->Auxiliar->SQL->Text = "SELECT CAST(B.Caduca AS DATE) Caduca FROM Usuarios A, Claves B WHERE A.Nombre = :Nombre AND A.Nombre = B.Nombre AND B.Clave = :Clave"; fMenu->Auxiliar->ParamByName("Nombre")->AsString = NombreUser; fMenu->Auxiliar->ParamByName("Clave")->AsString = ClaveUser; fMenu->Auxiliar->Open(); int nDias = fMenu->Auxiliar->FieldByName("Caduca")->AsDateTime - dFecha; if (nDias < 11) { cAux = "Su clave caduca el " + fMenu->Auxiliar->FieldByName("Caduca")->AsDateTime.FormatString("ddddd"); if (nDias < 1) { Mensaje(3, cAux + ".\nDebe cambiar la clave de acceso al sistema.", "Continuar"); Application->CreateForm(__classid(TfCamCla), &fCamCla); fCamCla->Tag = 1; fCamCla->Nombre->Text = NombreUser; fCamCla->ShowModal(); if (fCamCla->Tag < 0) { TipoInstalacion = fCamCla->Tag; delete fCamCla; Mensaje(1, "No se ha modificado la clave. Sistema desconectado.", "Terminar"); Application->Terminate(); return TipoInstalacion; } delete fCamCla; } else Mensaje(4, cAux, "Continuar"); } |
#5
|
||||
|
||||
Pero esto estará mal:
AsDateTime.FormatString("ddddd"); Será algo así como "dd-mm-yyyy" |
#6
|
||||
|
||||
Cita:
Cita:
|
#7
|
||||
|
||||
Estaba dándole vueltas al problema y lo de usar el formato dd/mm/yyyy en vez de ddddd afecta únicamente a la presentación y no a los cálculos internos que lleve a cabo la máquina, aunque he de decir que todavía no he podido probar el cambio.
|
Herramientas | Buscar en Tema |
Desplegado | |
|
|
Temas Similares | ||||
Tema | Autor | Foro | Respuestas | Último mensaje |
operaciones con fechas | GustavoCruz | Firebird e Interbase | 12 | 07-04-2009 22:52:35 |
Operaciones con fechas | tifosi_loco | SQL | 2 | 06-12-2007 14:26:08 |
Operaciones con fechas | jandres | Varios | 2 | 07-11-2006 19:16:27 |
Operaciones con fechas | febito | Oracle | 1 | 05-08-2004 03:30:09 |
operaciones con fechas | ing_alsaac | Varios | 2 | 11-05-2003 10:02:57 |
|