Buenas tardes, consulto si alguno ha podido hacer un login que funcione en H5 porque no estoy logrando hacer el login como lo hacemos en aplicaciones de escritorio.
Cualquier consejo sera bienvenido.
H5 y AppBroker
-
- Mensajes: 3
- Registrado: Mié Oct 10, 2012 1:04 pm
- Contactar:
-
- Ayudante de Santa
- Mensajes: 70
- Registrado: Sab Feb 12, 2011 1:53 am
- Ubicación: Cd. Juarez,Chih,Mexico
- Contactar:
Re: H5 y AppBroker
Yo lo hice siguiendo un ejemplo de h5 de softvelocity pero no encuentro el ejemplo, es asi.
Global Embeds---> after global data
En el main ->>>>Other data
en el open window
en localprocedures
y si te fiajes en este ultimo llamo al procedimineto Login que tengo definido espero te sirva
saludos
Global Embeds---> after global data
Código: Seleccionar todo
H5 CLASS()
Extension PROCEDURE(STRING Script),STRING
Wallpaper PROCEDURE(STRING NewWallpaper),STRING
!Security PROCEDURE(STRING WhatModule,STRING Action),STRING
END
Código: Seleccionar todo
H5_SEC CLASS()
CallLogin PROCEDURE(),STRING
END
Código: Seleccionar todo
IF (WebServer.IsEnabled()) !Only if running on a browser...
! Let's call the login window..
Login# = H5_SEC.CallLogin()
! Hide or Unhide components after login
!DO Security_ROUTINE
END
Código: Seleccionar todo
H5_SEC.CallLogin PROCEDURE()
CODE
!CLEAR(GLO:UserID)
L# = Login()
IF L# = 0 !not logged in...
DO HALT_Program_ROUTINE
END
RETURN('X') !Still here?
HALT_Program_ROUTINE ROUTINE
HALT(0,'Acceso denegado...')
RETURN(Level:Fatal) ! Source on Cancellation
EXIT
saludos
Victor Montañez
-
- Mensajes: 3
- Registrado: Mié Oct 10, 2012 1:04 pm
- Contactar:
Re: H5 y AppBroker
Muchas Gracias, voy a probar y te comento.-
¿Quién está conectado?
Usuarios navegando por este Foro: No hay usuarios registrados visitando el Foro y 15 invitados