Hola, que tal,
Yo trabajo en VB.NET, para WEB FORMS, intentará echarte una mano, y luego traducirlo a C# no creo que sea mu dificil,¿ok?
Para el WEB FORM, llamdo Login.aspx:
En el Login.aspx tenemos un TextBox, un boton llamado BtnEntrar y una label llamada Label1.
En el CodeBehind (Login.aspx.vb) tenemos:
Código:
Private Sub Page_Load(ByVal sender As System.Object, ByVal
e As System.EventArgs) Handles MyBase.Load
'Introducir aquí el código de usuario para inicializar la página
End Sub
Private Sub BtnEntrar_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles BtnEntrar.Click
Dim cn As SqlConnection
cn = New SqlConnection("data source=Nombre de tu Server SQL;initial catalog=Organizacion;persist security info=False;user id=usuario; password=password")
cn.Open()
If Not ValidarUsuario(TEXTBOX1.Text) Then
MsgBox1.ShowMessage("ERROR: Los datos introducidos no son correctos. Por favor vuelva a intentarlo.")
else 'Si ha encontrado al usuario muestro los datos en una label, por ejemplo'
label1.text="La persona seleccionada es: " & session("id") &" "& session("Nombre")
End If
End Sub
Function ValidarUsuario(ByVal Nombre As String) As Boolean
'Declaración de Variables
Dim cmd As SqlCommand
Dim dr As SqlDataReader
Dim RetVal As Boolean = False
Session("Id") = ""
Session("Nombre")=""
'Creamos la cadena para obtener los datos
cmd = New SqlCommand("SELECT PERSONAL.id, PERSONAL.Nombre FROM PERSONAL WHERE (PERSONAL.Nombre = '" & Nombre & "')", cn)
dr = cmd.ExecuteReader()
While (dr.Read()) 'Compruebo si existen esos datos
If StrComp(dr("Nombre"), Nombre, 1) = 0 Then
RetVal = True
Session("Nombre") = dr("Nombre")
Session("Id") = dr("Id")
Else
'No ha puesto correctamente el nombre
RetVal = False
Exit Function
End If
End While
dr.Close()
cmd.Dispose()
ValidarUsuario = RetVal
End Function
