FTP | CCD | Buscar | Trucos | Trabajo | Foros |
|
Registrarse | FAQ | Miembros | Calendario | Guía de estilo | Temas de Hoy |
|
Herramientas | Buscar en Tema | Desplegado |
|
#1
|
|||
|
|||
Bloquear Usuarios Oracle Desde Delphi
Buenos Día a todos,
Tengo que hacer una aplicación para bloquear y desbloquear usuarios en una base de datos Oracle desde delphi. Tengo el siguiente código: var xbusca:string; begin case RadioGroup2.ItemIndex of 0: begin xbusca:=inputbox('Introduzca el nombre de usuario','Introduzca el Nombre de Usuario',''); if xbusca='' then exit; form1.ADOQuery1.SQL.Clear; FORM1.ADOQuery1.Close; adoquery1.SQL.Add('alter user ' + xbusca + ' account lock'); ADOQuery1.Open; if adoquery1.recordcount = 0 then showmessage('El usuario consultado no existe o está mal escrito'); end end El proceso me compila bien, pero cuando entro el usuario a bloquear me presenta el siguiente error: ADoquery1: commandtext does not return a result set Por favor necesito de ayuda... |
#2
|
||||
|
||||
Hola, echa un vistazo a esto: http://www.clubdelphi.com/foros/show...48&postcount=6
|
#3
|
|||
|
|||
Y el uso de las etiquetas???.
...MODERADOOOOOOOOOOOOOOOOOOOR.. |
#4
|
|||
|
|||
Caso Cerrado
Buenas Tarde,
Gracias por la ayuda... pude solucionar el problema. Anexo el código para ayudar a la comunidad: var xbusca:string; begin xbusca:=inputbox('Introduzca el nombre de usuario a Desbloquear','Introduzca el Nombre de Usuario a Desbloquear',''); if xbusca='' then exit; with AdoQuery1 do begin active:=false; SQL.Clear; SQL.Add('alter user ' + xbusca + ' account unlock'); ExecSQL; end; showmessage('Usuario Desloqueado'); end; |
#5
|
||||
|
||||
Hola rrosariom.
Que bueno que lo solucionaste. ¿Podrías poner ese mismo código pero con su debido sangrado? ¡Muchas gracias! Al. |
|
|
Temas Similares | ||||
Tema | Autor | Foro | Respuestas | Último mensaje |
Crear Usuarios Mysql desde Delphi | adeszeus | MySQL | 2 | 18-06-2010 22:55:03 |
Administración de usuarios en DB2 desde Delphi | DanForever | Conexión con bases de datos | 0 | 24-04-2006 08:46:22 |
administrar usuarios mysql desde delphi | ppalmamichi | MySQL | 6 | 02-06-2005 23:42:33 |
Crear Usuarios desde Delphi | Gustavo Gowdak | Conexión con bases de datos | 3 | 19-07-2004 02:07:21 |
roles, sesiones y usuarios de oracle 7.3 y delphi 7 | rcrmilo | Oracle | 12 | 03-06-2004 19:22:23 |
|