Ayuda con Login

No se si entiendo bien tu pregunta, si te refieres a como se hace un acceso a
BD para recojer un campo seria algo asi.

Dim sql as string = "Select passid from Personal"
Dim Cnn as SqlConnection =new SqlConnection()

Cnn.ConnectionString ="data source=" & Servidor & ";initial
catalog=master;user id=" & Usuario & ";password=" & Password
Dim sqlDataAdapter1 as SqlDataAdapter =new SqlDataAdapter()
Dim sqlCommand1 as SqlCommand =new SqlCommand()

sqlCommand1.CommandText=sql
sqlDataAdapter1.SelectCommand=sqlCommand1
sqlDataAdapter1.SelectCommand.Connection=Cnn
sqlDataAdapter1.SelectCommand.Connection.Open()
DataSet DS=new DataSet()
sqlDataAdapter1.Fill(DS)
Dim pasword as string = DS.Tables(0).Rows(0).Item("passid ")

lo mejor que busques documentacion de SqlConnection, SqlDataAdapter y Dataset.
Tb puedes hacerlo con un asistente que tiene el VS 2005 muy rapido y
sencillo. Lo unico que tienes que hacer es agruegar tu conexion de BD en el
menu explorador de servidores y arrastrar tu conexion hacia el formulario, a
partir de ahi eliges los campos que quieras y los manejas en tu programa.


"jonathan romero" wrote:

De antemano mil gracias por su atencion

Buen dia Todos por aqui

Quisiera ver si alguin pudiera ayudarme a encontrar esta solucion de login
en win forms

Problema:
Tengo un programa en vb 2005 y SQL como Base de Datos en el cual tengo una
tablas Llanada Personal que contiene las columasn de nombre, telefono,
puesto, userid, passid

Tengo esto en el boton de aceptar tengo:

Private veces As Integer = 0
Private Const NumeroIntentos As Integer = 3

Private Sub btnAceptar_Click(ByVal sender As System.Object, ByVal e As
System.EventArgs) _
Handles btnAceptar.Click
If passtxt.Text = "juanito" Then
Me.DialogResult = DialogResult.OK
Else
veces = veces + 1
If veces < NoInt Then
Label1.Text = "Quedan " & (NoInt - veces) & " intentos"
Exit Sub
End If
Me.DialogResult = DialogResult.No
End If
Hide()
End Sub


Ahora mi problemas es que quiero que la clave que recoja no sea "juanito" si
no la que puse desde la base de datos en la columna de passid


Si pudieran ayudarme se les agradecera
el aprendis

OK tienes razon mi estimado Asier
te esplico de una forma mas detallada mira tengo con el asistente de data
source ya tengo los DataSet cone el el nombre de PersonalDS ahora lo que
quiero es que en vez de que tome los numero que le puse como password, tome
los datos de esta tabla espero que me puedas ayudar la anterior respuesta
voy a ver si puedo analizarla y sacar algo de ella para relizar la coneccion
a personalDS y de ahi poder ligarlo


de antemano mil gracias

el aprendis


"AsierMM" wrote:

No se si entiendo bien tu pregunta, si te refieres a como se hace un acceso a
BD para recojer un campo seria algo asi.

Dim sql as string = "Select passid from Personal"
Dim Cnn as SqlConnection =new SqlConnection()

Cnn.ConnectionString ="data source=" & Servidor & ";initial
catalog=master;user id=" & Usuario & ";password=" & Password
Dim sqlDataAdapter1 as SqlDataAdapter =new SqlDataAdapter()
Dim sqlCommand1 as SqlCommand =new SqlCommand()

sqlCommand1.CommandText=sql
sqlDataAdapter1.SelectCommand=sqlCommand1
sqlDataAdapter1.SelectCommand.Connection=Cnn
sqlDataAdapter1.SelectCommand.Connection.Open()
DataSet DS=new DataSet()
sqlDataAdapter1.Fill(DS)
Dim pasword as string = DS.Tables(0).Rows(0).Item("passid ")

lo mejor que busques documentacion de SqlConnection, SqlDataAdapter y Dataset.
Tb puedes hacerlo con un asistente que tiene el VS 2005 muy rapido y
sencillo. Lo unico que tienes que hacer es agruegar tu conexion de BD en el
menu explorador de servidores y arrastrar tu conexion hacia el formulario, a
partir de ahi eliges los campos que quieras y los manejas en tu programa.


"jonathan romero" wrote:

> De antemano mil gracias por su atencion
>
> Buen dia Todos por aqui
>
> Quisiera ver si alguin pudiera ayudarme a encontrar esta solucion de login
> en win forms
>
> Problema:
> Tengo un programa en vb 2005 y SQL como Base de Datos en el cual tengo una
> tablas Llanada Personal que contiene las columasn de nombre, telefono,
> puesto, userid, passid
>
> Tengo esto en el boton de aceptar tengo:
>
> Private veces As Integer = 0
> Private Const NumeroIntentos As Integer = 3
>
> Private Sub btnAceptar_Click(ByVal sender As System.Object, ByVal e As
> System.EventArgs) _
> Handles btnAceptar.Click
> If passtxt.Text = "juanito" Then
> Me.DialogResult = DialogResult.OK
> Else
> veces = veces + 1
> If veces < NoInt Then
> Label1.Text = "Quedan " & (NoInt - veces) & " intentos"
> Exit Sub
> End If
> Me.DialogResult = DialogResult.No
> End If
> Hide()
> End Sub
>
>
> Ahora mi problemas es que quiero que la clave que recoja no sea "juanito" si
> no la que puse desde la base de datos en la columna de passid
>
>
> Si pudieran ayudarme se les agradecera
> el aprendis

Si te fijas cuando creas tu proyecto en .net, visual te crea el dataaset,
bueno, en este Dataset encontraras tu tabla Personal.
Lo que tienes que hacer es abrir el Dataset en el diseñador, buscar la tabla
Personal, y agregar una nueva Consulta.

El diseñador te presentara un select, al que tu deber editar y poner un
parametro (o filtro) y finalizar.
Con esto, el diseñador te habra creado un metodo Fillby...algo... y con este
metodo puedes hacer la consulta mas facil y rapido...
eso si, si es que estas usando enlace a datos.

Bueno como veras en la foto yo con esa consulta estoy obtiende un numero,
cosa que puedes omitir, pues la hice para un proposito particular.