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
|
|||
|
|||
Usuario Y Password Para Acceder A Una Aplicacion
Buenos Noche,
estoy desarrollando una aplicando con ORACLE EXPRESS 11g, y DELPHI 7, y en la parte de acceso de usuario y contrasena, estoy utilizando la vista de oracle DBA_USERS, que es donde tengo creado los usuarios, puesto que lo quiero manejar por ahi, para aprovechar las funcionalidades de seguridad de oracle, asi como tener una ventana de mantenimiento de usuario desde la aplicacion y asi no tener que introduccir usuario y password en el codigo del programa. El tema, es que he realizado todo bien, pero cuando presiono o pincho el boton siempre me devuelve el mensaje del message, que es "Usuario o PassWord Invalido" El Codigo es el siguiente: Si alguien me puede ayudar utilizando esta forma para hacerlo lo mas sencillo posible, ya que quiero configurar la mayor parte del trabajo por la base de datos, por ejemplo cantidad de intentos fallidos, cambio de claves periódicas, etc, ya que ORACLE me provee todo eso, y con esto me facilito la codificación en delphi. Espero por su ayuda. Rolando. Última edición por ecfisa fecha: 21-06-2011 a las 04:18:13. Razón: Etiquetas [DELPHI] [/DELPHI] |
#2
|
||||
|
||||
Esta consulta implica que ya hay una conexión activa sobre la base de datos, por lo que problema de conexión no es.
¿Has probado a ejecutar la consulta directamente sobre la bd de oracle? ¿devuelve los registros que esperas? También puede ser debido a que usas RecordCount del DataSet. Por experiencia, si no "navegas" hasta el ultimo registro, la propiedad RecordCount puede devolver resultados erróneos.
__________________
Progress Openedge https://abevoelker.com/progress_open...dered_harmful/ Delphi forever... |
#3
|
||||
|
||||
Porque no les gusta usar parametros como debe ser, jejejejeje.
ahi te va: En tu ADOQUERY pon esta sentencia SQL: Me imagino que manejas un campo ID o identificador.
Otra forma:
Porque dependiendo tu propiedad cursortype es si devuelve todos los registros. Bueno no siempre, pero si tienes registros devuelve -1 o los registros. Si no tienes siempre devuelve 0 (CERO) Y te doy un par de consejitos 1. Cambia el nombre de tus componentes: adoquery1 a aqyExisteUsuario 2. NO uses el adoquery usa el adodataset o el adocommand es mejor 3. si vas a usar el adoquery1 para otra consulta, mejor pon otro componente o crealo en tiempo de ejecucion. 4. Usa Datamodules te va a hacer la vida mas facil. Saludos
__________________
OEsqueda |
#4
|
|||
|
|||
Continua mi error
Buenas Noche,
Lo hice como me dijiste y me da el mismo error. Aqui algunas sentencias con modificaciones: Espero tu ayuda nuevamente. Bye, Rolando. Última edición por ecfisa fecha: 21-06-2011 a las 04:18:31. Razón: Etiquetas [DELPHI] [/DELPHI] |
#5
|
|||
|
|||
Error Logico Control De Acceso
Olvide decirte que las sentencias que le envie es para que me ayude a analizarla, ya que el error continua
Gracias, Rolando. |
#6
|
||||
|
||||
No contestaste a mis 2 preguntas:
¿Has probado a ejecutar la consulta directamente sobre la bd de oracle, sin ADO de por medio? ¿devuelve los registros que esperas? Supongo que esto será un error tuyo de transcripción: debe ser asi:
__________________
Progress Openedge https://abevoelker.com/progress_open...dered_harmful/ Delphi forever... |
#7
|
|||
|
|||
Creando acceso de usuario a una aplicacion
Claro, eso lo hice antes de enviar el error antes de anoche. hice una consulta directamente a la base de datos, usando sqlplus y me devolvió el registro.
en cuanto a lo otro, cuando lo hago form2.adoquery1.SQL.Add('where username = :NombreUsuario'); entonces me da error. Un Saludo, Rolando. |
#8
|
||||
|
||||
Hola rrosariom, recuerda que para contestar a un mensaje aquí, debes pulsar en el botón que está justo ahí abajo a la izquierda, el que pone "Responder", es que has enviado la contestación al email de contactos de clubdelphi.
Es sólo para que lo tengas en cuenta, gracias |
#9
|
|||
|
|||
Control de Acceso a una aplicacion
este es el codigo que tengo actualmente:
y me presenta el siguiente error: AdoQuery1:Field'usuario' not found' Me faltara declarar algo? Última edición por ecfisa fecha: 21-06-2011 a las 04:18:44. Razón: Etiquetas [DELPHI] [/DELPHI] |
#10
|
|||
|
|||
Hola...
El error es que estás usando FieldByName cuando deberías usar ParamByName. Saludos... |
#11
|
|||
|
|||
Error Para crear control de acceso a una aplicacion
Cuando lo uso asi:
form2.adoquery1.Parameters.ParamByName('usuario').AsString := dbedit1.Text; me da el error de que el AsString no esta declarado (undeclared identified:AsString) , por en realidad lo reconoce como sigue: form2.adoquery1.Parameters.ParamByName('usuario').value.AsString := dbedit1.Text; porque no se le puede pasar ni el parambyname directamente al adoquery, debido a que lleva parameters primero (adoquery1.parameters.parambyname...) Mientras en el caso del AsSring tampoco, puesto que primero hay que pasarle el .value.AsString... Un Saludo, Rolando. |
#12
|
|||
|
|||
Actualmente, teniendo el codigo como sigue:
me muestra el siguiente error: Invalid variant operation es bueno decir que este codigo compila bien, es cuando presiono el boton que me devuelve el error. Un Saludo, Rolando. Última edición por ecfisa fecha: 21-06-2011 a las 04:18:53. Razón: Etiquetas [DELPHI] [/DELPHI] |
#13
|
|||
|
|||
hola a rrosariom prueva asi a ver k tal
Última edición por leofuentes21 fecha: 16-06-2011 a las 16:09:44. |
#14
|
||||
|
||||
Fe de erratas
Es .VALUE
__________________
OEsqueda |
#15
|
|||
|
|||
Hola OSqueda
Me continua dando error.
Lo que no quiero es tener que utilizar la mala practica de utilizar este procedimeinto por codigo. Queria hacerlo, donde se pudiera dar mantenimiento de usuarios, es decir, crear, modificar, eliminar o bloquear, y que al acceder solo era cuestion de una consulta, y si el registro existe (es decir el usuario) entonces cargue un menu principal, y que segun su perfil, entonces se le habilite o habiliten las opciones del menu que debe utilizar. Pero se ha complicado, algo que no se ve dificil, pero bueno, continuamos en la noche, tengo que irme a trabajar ahora. De todas formas, si usted pudiera hacer una prueba con esto, y ver si es que falta algo mas. Un Saludo, Rolando. |
#16
|
||||
|
||||
Yo te pediria que nos pusieras el mensaje de error tal cual por favor.
__________________
OEsqueda |
#17
|
|||
|
|||
Crear codigo para acceder a una aplicacion, usando la vista dba_users de oracle
hola mis amigos, no habia podido entrar hacer varios dias, para decirle que todavia no he podido hacer una consulta a la base de datos, donde tengo un registro de usuario y clave para llamar un formulario donde pienso crear un menu principal y de ahi deprender todo el proceso de la aplicacion.
ustedes me han ayudado, pero no el codigo que me han facilitado no ha funcionado. podrian probar ustedes y ver si pueden ver algo que no he podido ver? Un Saludo, Rolando. |
#18
|
||||
|
||||
Hola Rolando.
Te pido encarecidamente que uses las etiquetas [delphi] [/delphi] cuando incluyas código delphi en tus mensajes para que sean mas intelegibles. Agregué etiquetas a cuatro mensajes en los que habías incluído código. En cuanto al error Invalid variant operation:
Saludos.
__________________
Daniel Didriksen Guía de estilo - Uso de las etiquetas - La otra guía de estilo .... Última edición por ecfisa fecha: 21-06-2011 a las 04:42:50. |
#19
|
|||
|
|||
Acceso a una aplicacion introduciendo usuario y clave
Hola que tal todos mis amigos.
Hace varios dias estoy tratando de crear una aplicacion que acceda a una base de datos ORACLE EXPRESS 11G, y al crear el codigo y las configuraciones de propiedades el programa me corre bien, pero cuando introduzco el usuario y clave siempre me da que es incorrecto aunque lo introduzca bien. para validar el usuario, fue creado un registro en una tabla de la base de datos, y haciendo la consulta fuera de delphi me devuelve el valor correctamente. Anexo el codigo para ver si alguien me puede ayudar:
Este codigo lo tome del foro, y lo adapte a mi aplicacion. Un Saludo, Rolando. Última edición por Neftali [Germán.Estévez] fecha: 21-06-2011 a las 10:06:21. |
#20
|
||||
|
||||
Hola.
Por favor, utiliza TAG's cuando escribas código. En cuanto al código. ¿Lo has ejecutado paso a paso? Sería lo más sencillo para saber qué está fallando
__________________
Germán Estévez => Web/Blog Guía de estilo, Guía alternativa Utiliza TAG's en tus mensajes. Contactar con el Clubdelphi P.D: Más tiempo dedicado a la pregunta=Mejores respuestas. |
Herramientas | Buscar en Tema |
Desplegado | |
|
|
Temas Similares | ||||
Tema | Autor | Foro | Respuestas | Último mensaje |
cambiar password del usuario sysdba | walace_soy | Firebird e Interbase | 27 | 23-06-2015 09:39:18 |
acceder a carpeta remota con password | chinchan | C++ Builder | 2 | 12-04-2011 13:33:59 |
validar dos campos (password y usuario) | Yessy | OOP | 18 | 28-07-2006 21:59:15 |
Usuario y Password con TQuery en MyODBC | mutant09 | Conexión con bases de datos | 9 | 23-04-2004 19:19:04 |
Dar Master Password a Paradox para que no lo haga el usuario | nefy | Conexión con bases de datos | 3 | 03-01-2004 19:01:30 |
|