Visual Basic.NET - formulario login

   
Vista:

formulario login

Publicado por cristian (29 intervenciones) el 05/03/2008 04:55:00
Hola buenas tardes.
quería saber si alguien me puede ayudar:
Tengo una tabla en mi BD SQL 2000 en donde están los campos usuario y contraseña
quiero crear un Formulario de login que me permita ingresar usuario y contraseña, y de ser correctos que me deje ingresar al sistema.

espero se apiaden de mi
Saludos

Cristian
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder

RE:formulario login

Publicado por hector (78 intervenciones) el 05/03/2008 19:54:07
Espero te sirva

Public cmdadministrador As New SqlClient.SqlCommand
Public adapadministrador As New SqlClient.SqlDataAdapter
Public dadministrador As New DataSet
Dim contador, comparador As Integer

adapadministrador.AcceptChangesDuringFill = True
cmdadministrador.CommandText = "select * from ADMINISTRADOR"
cmdadministrador.Connection = conexion
adapadministrador.SelectCommand = cmdadministrador
dadministrador.Clear()

adapadministrador.Fill(dadministrador, "tadministrador")
contador = dadministrador.Tables("tadministrador").Rows.Count
comparador = 0
encontrado = "no"
Do While (comparador < contador)
If tusuario.Text = dadministrador.Tables("tadministrador").Rows(comparador).Item("usuario") Then
If tcontraseña1.Text = dadministrador.Tables("tadministrador").Rows(comparador).Item("clave") Then
ventana_principal.Show()
tcontraseña1.Text = ""
Me.Hide()
comparador = contador
encontrado = "si"
End If
End If
comparador = comparador + 1
Loop

Suerte
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar