Ayuda Contraseña
Daniel
01 de Diciembre del 2005
Hola tengo un pequeño problema yo hice un prog de gestion para mi, pero lo que quiero ahora es que apenas empiece el programa se ejecute un formulario que pida nombre de usuario y contraseña, si cual quiera de los dos datos no es valido a las tres veces se cierre el prog., y si es correcto que pase al formulario principal , como hago? Tambien lo que necesitaria es que apena se instale el programa me pida crear un usuario y su contraseña que eso se alojaria en una tabla, y despues poder agregar varios usuarios desde el programa ya funcionando desde ya muchas gracias.
foxfeliz
01 de Diciembre del 2005
para comenzar les explicare paso.
pero no de un solo guarapazo sino poco apoco todos los dias tendran una leccion. vale
Y TAMBIEN COMO ENCRIPTAR TU CLAVE
pues bien empesemos
primero:
creamos la tabla llamada USUARIOS.
LA TABLA CON TENDRAN LOS SIGUIENTES CAMPOS
USU_LOGIN : NOMBRE DE USUARIO
USU_CLAVE : CLAVE DEL USUARIO
USU_NOMBRE : USUARIO PROPIETARIO DEL USUARIO
USU_F_CRE : FECHA DE CREACION
PUES BIEN LUEGO DE HABER CREADO LA TABLA
EL SEGUNDO PASO ES....? CREAR EL FORMULARIO.....PUES NO LOSABIAN?
EL FORMULARIO LO LLAMAREMOS "PRESENTACION"
Y CONTENDRA LOS SIGUIENTES CONTROLES
2 LABEL
1 COMBOBOX : PARA LA LISTA DE USUARIOS
1 TEXTBOX
2 COMMANDBOTTON
CONTINUAMOS......
LABEL1.CAPTION = "USUARIO"
LABEL2.CAPTION = "DIGITE CLAVE"
COMBOBOX.ROWSOURCE = USUARIOS.USU_LOGIN
COMBOBOX.ROWSOURCETYPE = 6
COMMANDBOTTON1.CAPTION = "<ACEPTAR"
COMMANDBOTTOM2.CAPTION = "<CANCELAR"
pero no de un solo guarapazo sino poco apoco todos los dias tendran una leccion. vale
Y TAMBIEN COMO ENCRIPTAR TU CLAVE
pues bien empesemos
primero:
creamos la tabla llamada USUARIOS.
LA TABLA CON TENDRAN LOS SIGUIENTES CAMPOS
USU_LOGIN : NOMBRE DE USUARIO
USU_CLAVE : CLAVE DEL USUARIO
USU_NOMBRE : USUARIO PROPIETARIO DEL USUARIO
USU_F_CRE : FECHA DE CREACION
PUES BIEN LUEGO DE HABER CREADO LA TABLA
EL SEGUNDO PASO ES....? CREAR EL FORMULARIO.....PUES NO LOSABIAN?
EL FORMULARIO LO LLAMAREMOS "PRESENTACION"
Y CONTENDRA LOS SIGUIENTES CONTROLES
2 LABEL
1 COMBOBOX : PARA LA LISTA DE USUARIOS
1 TEXTBOX
2 COMMANDBOTTON
CONTINUAMOS......
LABEL1.CAPTION = "USUARIO"
LABEL2.CAPTION = "DIGITE CLAVE"
COMBOBOX.ROWSOURCE = USUARIOS.USU_LOGIN
COMBOBOX.ROWSOURCETYPE = 6
COMMANDBOTTON1.CAPTION = "<ACEPTAR"
COMMANDBOTTOM2.CAPTION = "<CANCELAR"
foxfeliz
01 de Diciembre del 2005
?
yudith
01 de Diciembre del 2005
por Favor me podrias enviar la proxima leccion
gracias
gracias
foxfeliz
01 de Diciembre del 2005
PARA LOS QUE NO HAN NETENDIDO NI UN CARAJO.....DE ESTA VAINA
Creacio de un formulario para controlorar el acceso a los usuarios y verificar sus perfiles de grupos
y niveles de acceso.
paso 1
CREAMOS UN PROYECTO LLAMADO "CLAVE"
paso 2
creamos la base de datos y la llamaremos "SEGURIDAD",luego
creamos las tablas una la llamaremos
*- USUARIOS
*- GRUPOS
paso 3
la tabla USUARIO contendra los siguientes campos
1. usu_login c(10) =>Nombre de usuario.
2. usu_clave c(6) =>Clave del usuario.
3. usu_nivel c(1) =>Nivel del grupo
1. Administradrores o general
2. Limitados.
4. usu_grupo c(15) =>Grupo de trabajo donde se encuentra el/los usuario(s)
5. usu_foto M(4) =>Foto del usuario.
6. usu_f_cre date =>Fecha de creacion del usuario.
paso 4
La tabla GRUPOS contendra los siguientes campos
1. gru_nombre c(15) =>Nombre del grupo.
2. gru_descri c(70) =>una breve descripción del grupos de trabajo.
3. gru_nivel c(1) =>Nivel del grupo
1. Administradrores o general
2. Limitados.
4.gru_f_cre date =>fecha de creacion del usuario
PUES BIEN LUEGO DE HABER CREADO LA BASE DE DATOS EL
SIGUIENTE PASO ES....? CREAR EL FORMULARIO.....PUES NO LO SABIAN?
EL FORMULARIO LO LLAMAREMOS "PRESENTACION", PERo ante antes crearemos una clase.
paso 5
Pasamos a la pestaña de clases en el manejador de projectos
creamos una nueva clase llamada "CLAVE" y contendra los siguientes objetos:
un form llamado "FORMABASE"
un commandbutton llamado "BOTONBASE"
un textobox llamado "TEXTOBASE"
un combobox llamado "COMBOBASE"
un label llamado "LABELBASE"
dos custom llamados "ENTORNO "y"DERECHOS"
paso 6
ahora crearemos un archivo .prg llamado "INICIO.PRG"
en ese archivo colocaremos el siguiente codigo:
CLOSE TABLES
CLOSE DATABASES
CLOSE ALL
*--Asignamos los SET
SET DEFAULT TO SYS(5)+SYS(2003)
SET PATH TO PRG,FORMS
SET CLASSLIB TO clave additive
IF SET ('TALK') = 'ON'
SET TALK OFF
PUBLIC yuOldTalk
yuOldTalk = 'ON'
ELSE
PUBLIC juOldTalk&&, cidarticulobusca
yuOldTalk = 'OFF'
ENDIF
WITH _Screen
.MaxButton = .F.
.Closable = .F.
.WindowState= 2
.Caption = "Modo de acceso"
ENDWITH
STORE SYS(5) + SYS(2003) TO camino
*-decalramos variables publicas
********************************
PUBLIC pos,permisos,menuselec, totalderegistros, swdereg, Nregistros,sw,;
queopciones,mnu
queopciones = 1
swdereg = .F.
sw=""
mnu =""
*--Entorno de la aplicacion
pos = CREATEOBJECT("entorno")
*-- Guarda los atributos de cada usuario.
permisos = CREATEOBJECT("derechos")
IF TYPE('pos') = "O"
RELEASE yuOldTalk
*--Creo el entorno de al aplicación
* pos.ejecuta
CD forma
IF FILE('PRESENTACION.SCX')
* DO MENU.MPR
* oBarraHerprin.Show()
* oBarraHerEstado.Show()
DO FORM PRESENTACION
READ EVENTS
endif
ENDIF
*IF Version(2) = 2
* pos.Muestrabarras()
*ENDIF
* Salgo de la aplicación
************************
CLOSE TABLES
CLOSE DATABASES
CLOSE ALL
CLOSE DATA ALL
CLEAR EVENTS
CLEAR ALL
PASO 7
bueno, por fin bamos a crear el formaulario, haga click en la pestaña documentos y elija nuevo
Pasamos a la pestaña de clases en el manejador de projectos
y arrastramos el formulario clase (formabase) al formulario, le aparecera un mensaje "requiere un
un conjunto formularios...)digale q' si, acontiunacion borraremos las formas inecesarias como lo son
el form que creamos y el formset,seleccione el form1, en la barra de herramientas haga click en form
escoja la opcion REMOVE FORM Y LUEGO REMOVE FORM SET.
SOLAMENTE QUE EL FORMULARIO DE LA CLASE(FORMABASE).
PASO 8
Arrastre los controles label, combo,text, boton desde la clase
control caption Name Height width Rowsource RowSourceType format inputmask maxlength passwordChar
formabase acceso - FoxFeliz 117 375
labelbase1 Usuario
labelbase2 Password
combobase1 combousuario 20 usuarios.usu_login 6
textobase1 textoclave 20 K XXXXXX 6 *
botonbase1 <Aceptar aceptar
botonbase2 <Cancelar cancelar
paso 9
en el boton CANCELAR agregamos el siguiente codigo:
CLOSE ALL
RELEASE ALL
CLEAR EVENTS
QUIT
bueno hasta aqui va todo muy bien ejecuta la aplicaión y veras que se ejecuta el formulario
paso 10
todo bien.....
Creacio de un formulario para controlorar el acceso a los usuarios y verificar sus perfiles de grupos
y niveles de acceso.
paso 1
CREAMOS UN PROYECTO LLAMADO "CLAVE"
paso 2
creamos la base de datos y la llamaremos "SEGURIDAD",luego
creamos las tablas una la llamaremos
*- USUARIOS
*- GRUPOS
paso 3
la tabla USUARIO contendra los siguientes campos
1. usu_login c(10) =>Nombre de usuario.
2. usu_clave c(6) =>Clave del usuario.
3. usu_nivel c(1) =>Nivel del grupo
1. Administradrores o general
2. Limitados.
4. usu_grupo c(15) =>Grupo de trabajo donde se encuentra el/los usuario(s)
5. usu_foto M(4) =>Foto del usuario.
6. usu_f_cre date =>Fecha de creacion del usuario.
paso 4
La tabla GRUPOS contendra los siguientes campos
1. gru_nombre c(15) =>Nombre del grupo.
2. gru_descri c(70) =>una breve descripción del grupos de trabajo.
3. gru_nivel c(1) =>Nivel del grupo
1. Administradrores o general
2. Limitados.
4.gru_f_cre date =>fecha de creacion del usuario
PUES BIEN LUEGO DE HABER CREADO LA BASE DE DATOS EL
SIGUIENTE PASO ES....? CREAR EL FORMULARIO.....PUES NO LO SABIAN?
EL FORMULARIO LO LLAMAREMOS "PRESENTACION", PERo ante antes crearemos una clase.
paso 5
Pasamos a la pestaña de clases en el manejador de projectos
creamos una nueva clase llamada "CLAVE" y contendra los siguientes objetos:
un form llamado "FORMABASE"
un commandbutton llamado "BOTONBASE"
un textobox llamado "TEXTOBASE"
un combobox llamado "COMBOBASE"
un label llamado "LABELBASE"
dos custom llamados "ENTORNO "y"DERECHOS"
paso 6
ahora crearemos un archivo .prg llamado "INICIO.PRG"
en ese archivo colocaremos el siguiente codigo:
CLOSE TABLES
CLOSE DATABASES
CLOSE ALL
*--Asignamos los SET
SET DEFAULT TO SYS(5)+SYS(2003)
SET PATH TO PRG,FORMS
SET CLASSLIB TO clave additive
IF SET ('TALK') = 'ON'
SET TALK OFF
PUBLIC yuOldTalk
yuOldTalk = 'ON'
ELSE
PUBLIC juOldTalk&&, cidarticulobusca
yuOldTalk = 'OFF'
ENDIF
WITH _Screen
.MaxButton = .F.
.Closable = .F.
.WindowState= 2
.Caption = "Modo de acceso"
ENDWITH
STORE SYS(5) + SYS(2003) TO camino
*-decalramos variables publicas
********************************
PUBLIC pos,permisos,menuselec, totalderegistros, swdereg, Nregistros,sw,;
queopciones,mnu
queopciones = 1
swdereg = .F.
sw=""
mnu =""
*--Entorno de la aplicacion
pos = CREATEOBJECT("entorno")
*-- Guarda los atributos de cada usuario.
permisos = CREATEOBJECT("derechos")
IF TYPE('pos') = "O"
RELEASE yuOldTalk
*--Creo el entorno de al aplicación
* pos.ejecuta
CD forma
IF FILE('PRESENTACION.SCX')
* DO MENU.MPR
* oBarraHerprin.Show()
* oBarraHerEstado.Show()
DO FORM PRESENTACION
READ EVENTS
endif
ENDIF
*IF Version(2) = 2
* pos.Muestrabarras()
*ENDIF
* Salgo de la aplicación
************************
CLOSE TABLES
CLOSE DATABASES
CLOSE ALL
CLOSE DATA ALL
CLEAR EVENTS
CLEAR ALL
PASO 7
bueno, por fin bamos a crear el formaulario, haga click en la pestaña documentos y elija nuevo
Pasamos a la pestaña de clases en el manejador de projectos
y arrastramos el formulario clase (formabase) al formulario, le aparecera un mensaje "requiere un
un conjunto formularios...)digale q' si, acontiunacion borraremos las formas inecesarias como lo son
el form que creamos y el formset,seleccione el form1, en la barra de herramientas haga click en form
escoja la opcion REMOVE FORM Y LUEGO REMOVE FORM SET.
SOLAMENTE QUE EL FORMULARIO DE LA CLASE(FORMABASE).
PASO 8
Arrastre los controles label, combo,text, boton desde la clase
control caption Name Height width Rowsource RowSourceType format inputmask maxlength passwordChar
formabase acceso - FoxFeliz 117 375
labelbase1 Usuario
labelbase2 Password
combobase1 combousuario 20 usuarios.usu_login 6
textobase1 textoclave 20 K XXXXXX 6 *
botonbase1 <Aceptar aceptar
botonbase2 <Cancelar cancelar
paso 9
en el boton CANCELAR agregamos el siguiente codigo:
CLOSE ALL
RELEASE ALL
CLEAR EVENTS
QUIT
bueno hasta aqui va todo muy bien ejecuta la aplicaión y veras que se ejecuta el formulario
paso 10
todo bien.....
nalleli
01 de Diciembre del 2005
we
virus_muerte
01 de Diciembre del 2005
Eso es muy sencillo pero lo de crear un usuario desde el co mienzo del programa, necesito diseñarlo un ejemplo, deja diseñar un ejemplo....
pero necesito los campos de la tabla que controla las nombre y contraseña....
pero necesito los campos de la tabla que controla las nombre y contraseña....
daniel
01 de Diciembre del 2005
la tabla se llama contraseña y los campos son:
usuario y clave, los dos son caracter. garcias Daniel
usuario y clave, los dos son caracter. garcias Daniel