• Viernes 8 de Noviembre de 2024, 14:48

Mostrar Mensajes

Esta sección te permite ver todos los posts escritos por este usuario. Ten en cuenta que sólo puedes ver los posts escritos en zonas a las que tienes acceso en este momento.


Temas - noldo

Páginas: [1]
1
Visual Basic 6.0 e inferiores / Duda Con El Text.box
« en: Miércoles 7 de Febrero de 2007, 07:51 »
Hola, yo molestando otra vez :(

Tengo 5 Text.box, y los datos que voy a ingresar son impresindibles en el Text1.box, text2.box y text3.box, no así en los 2 restantes......

mi pregunta, como hago eso, los text.box tienen alguna propiedad que ayuda en aquello??? o debo editar alguna función?????

2
Visual Basic 6.0 e inferiores / Primeros Pasos
« en: Viernes 2 de Febrero de 2007, 09:03 »
Hola amigos de solocodigos, bueno yo soy chileno y estoy dando mis primeros pasos en esto de Visual Basic, lo encuetro muy emocionante:

En estos momentos estoy diseñando un ejercicio algo así como cuentas de usuario....estoy ocupando "Visual Basic 6.0" + "Sql Server 7.0"

Cree una tabla llamada Usuarios en sql y mi problema es el siguiente:

Tengo un form con  2 Text.box, lo correcto seria que en el Text.box 1 se ingresara el "username" y en el 2 la clave....bueno eso no sé como hacerlo :angry: , lo que si pude hacer, fue que ingresando la clave en el "Text.box" 2 y pudo ingresar al siguiente form (usuario), el codigo que edite para eso fue el siguiente:

Código: Text
  1.  Private Sub Command1_Click()
  2. If Text2 = "" Then
  3.        MsgBox "Ingrese su Password Usuario", vbCritical, "Atención" 'despliega el siguiente mensaje
  4.   Text2.SetFocus
  5.    Else
  6.     sql = "select Pass_User from Usuario where Pass_User like '" + Text2.Text + "%'"
  7.     Set rst = cnn.Execute(sql)
  8.     If rst.EOF = True Then
  9. MsgBox "Password Incorrecto", alert, "Atención"
  10.    Else
  11.    MsgBox "Bienvenido", alert, "Atención"
  12.             Usuario.Show
  13.             Unload Me
  14.             rst.MoveNext
  15.     Set rst = Nothing
  16.     End If
  17.    End If
  18. End Sub
  19.  

me gustaria que me instruyeran para que ingresando el "Username", junto con la "clave", pueda ingrear al siguiente Form.....

Puede que les parezca un tanto absurda la pregunta, pero soy novato en esto....
bueno desde ya gracias!!!!

Páginas: [1]