Portal    Foro    Buscar    FAQ    Registrarse    Conectarse


Publicar nuevo tema  Responder al tema 
Página 1 de 1
 
 
Como Hacer Un Proyecto En Gambas Utilizando Menu Y Para Acceder A El Utiliz...
Autor Mensaje
Responder citando   Descargar mensaje  
Mensaje Como Hacer Un Proyecto En Gambas Utilizando Menu Y Para Acceder A El Utilizar Usuario Y Contraseña 
 
necesito elaborar un proyecto en gambas utilizando un menú y para el usuario acceder al contenido de este proyecto necesita que se loguee a través de un usuario y una contraseña. si tienen algun codigo que me faciliten por favor
 



 
mesm82 - Ver perfil del usuarioEnviar mensaje privado 
Volver arribaPágina inferior
Responder citando   Descargar mensaje  
Mensaje Re: Como Hacer Un Proyecto En Gambas Utilizando Menu Y Para Acceder A El Utilizar Usuario Y Contraseña 
 
El tema del menu viene explicado en el libro de "gambas", que te lo puedes bajar desde descargas o documentacion.

Citar:
proyecto necesita que se loguee a través de un usuario y una contraseña.

Eso lo puedes hacer con 2 textbox, uno para que introduzca el usuario y otro para la contraseña, y luego el programa comprueba en una lista si esta el usuario introducido y la contraseña.

Tendras que utilizar un For....Next
y dos array con los datos de usuarios y datos de la contraseña.

Saludos
 




===================
Blog personal
Web: SoloGambas seleccion de articulos dedicados a Gambas
Visita el Curso de Gambas3 ¡¡¡Gratuito!!!
 
jsbsan - Ver perfil del usuarioEnviar mensaje privadoVisitar sitio web del usuario 
Volver arribaPágina inferior
Responder citando   Descargar mensaje  
Mensaje Re: Como Hacer Un Proyecto En Gambas Utilizando Menu Y Para Acceder A El Utilizar Usuario Y Contraseña 
 
Bueno Aqui te Dejo un Codigo con Mysql...   es bastante sencillo lo tome de una de mis aplicaciones espero te Sirva.  

' gambas class file
PUBLIC cn AS NEW Connection
PUBLIC rs AS Result
PUBLIC actStatus AS String
PUBLIC Controlador AS Boolean

PUBLIC SUB Form_Open()

  WITH cn
    .type = "mysql"
    .host = "localhost"
    .login = "root"
    .password = "123456"
    .name = "sistema"
  
    TRY .OPEN
    IF ERROR THEN
      Message.Error("Error abriendo la base de datos!!!\n" & Error.Text)
      ME.Close
    END IF
  END WITH
  ProgressBar1.Value = 0
  ME.Center
  
END

PUBLIC SUB Button2_Click()

  ME.Close

END

PUBLIC SUB Button1_Click()

  rs = cn.Exec("SELECT * FROM sis_login WHERE sis_log_user='" & Trim(TextBox1.Text) & "' AND sis_log_pass='" & Trim(TextBox2.Text) & "' ")
  'rs.MoveFirst
  IF rs.Available = TRUE THEN
    'Message("si")
    Label1.Visible = FALSE
    Label2.Visible = FALSE
    Label3.Visible = FALSE
    Label4.Visible = TRUE
    TextBox1.Visible = FALSE
    TextBox2.Visible = FALSE
    Button1.Visible = FALSE
    Button2.Visible = FALSE
    Timer1.Enabled = TRUE
    ProgressBar1.Visible = TRUE
  ELSE
    Message.Warning("Usuario o Contraseña Incorrecta!, Intente de Nuevo")
    Form_Activate
  END IF
    
END

PUBLIC SUB Form_Activate()

  TextBox1.Text = ""
  TextBox2.Text = ""
  TextBox1.SetFocus


END

PUBLIC SUB Timer1_Timer()
  DIM a AS Float
  a = ProgressBar1.Value
  a = a + 1 / 30
  ProgressBar1.Value = a
  IF a > 1 THEN
    Timer1.enabled = FALSE
'    a = 0
'    ProgressBar1.value = 0
    ME.Close
    Menu.Show

  ENDIF

END
 


donde
Menu.Show
es el formulario que contiene el Menu... Suerte.!  
 



 
jesusdaredevil - Ver perfil del usuarioEnviar mensaje privado 
Volver arribaPágina inferior
Mostrar mensajes anteriores:    
 
Ocultar¡Este tema fue útil?

 

Elegir valoración:                       

Media de valoración Valoración mínima Valoración máxima Número de valoraciones
0.00 0 0 0
 
OcultarTemas parecidos
Tema Autor Foro Respuestas último mensaje
No hay nuevos mensajes Como Hacer Proyecto Gambas Sin Depender De... rocky2007 General 5 Domingo, 06 Marzo 2011, 21:39 Ver último mensaje
fabianfv
No hay nuevos mensajes Alguien Me Puede Ayuda A Utilizar El Compo... mexicoreal16 Controles/Librerías/Componentes 11 Viernes, 04 Noviembre 2016, 19:35 Ver último mensaje
jsbsan
No hay nuevos mensajes Crear Usuario Y Contraseña JhoanM Bases de Datos 1 Martes, 05 Noviembre 2013, 08:43 Ver último mensaje
shordi
No hay nuevos mensajes Hacer Que No Se Vea La Contraseña Ricardo Prieto Aplicaciones/Fragmentos de Código 5 Lunes, 15 Agosto 2016, 17:33 Ver último mensaje
vuott
 

Publicar nuevo tema  Responder al tema  Página 1 de 1
 

Usuarios navegando en este tema: 0 registrados, 0 ocultos y 1 invitado
Usuarios registrados conectados: Ninguno


 
Lista de permisos
No puede crear mensajes
No puede responder temas
No puede editar sus mensajes
No puede borrar sus mensajes
No puede votar en encuestas
No puede adjuntar archivos
No puede descargar archivos
No puede publicar eventos en el calendario