hola,estoy trabajando con un sistema pequeño para una materia en la escuela, necesito un login que verifique los datos en una base de datos de access, he trabajado con vb 6 pero es la primera vez que trabajo con elVB.Net 2008

ayudemne porfa

Hola, es winforms o webforms?

es un winforms

Ok, pone 2 textbox
A uno lo vamos a llamar txtUser y al otro txtPass.
AtxtPass setea su propiedad PasswordChar con un asterisco (*)
Y agrega un boton que vamos a llmar btnLogin.
El codigo lo hacemos bien rustico, despues lo podes separar en clases, validad la password, que los campos no sean vacios, etc.
Ahora cuando haces click en el boton hace lo siguiente.


Private sub btnLogin_Click(....) Handles btnLogin.click

dim conexion As New System.Data.OleDb.OleDbConnection
dim comando [color=#0000ff size=2]As[/color] [color=#0000ff size=2]New[/color] System.Data.OleDb.OleDbCommand
dim cadena as string=[color=#800000 size=2]"Provider= microsoft.jet.oledb.4.0;Data Source=c:\MiBase.mdb[color=#800000 size=2]"[/color][/color]
[color=#800000 size=2][/color]
[color=#800000 size=2]conexion.connectionstring=cadena[/color]
[color=#800000 size=2]conexion.open()[/color]
[color=#800000 size=2]Comando.commandText="Select * from TablaUsuario Where NombreUsuario=' " & txtUser.text & " ' AND PasswordUsuario=' " & txtPass.text & " ';"[/color]
[color=#800000 size=2][/color]
[color=#800000 size=2]comando.connection= conexion[/color]
[color=#800000 size=2]if comando.ExecuteScalar() >= 1 then[/color]
msgbox "Se logueo"
else
msgbox"Usuario o clave incorrecta"
end sub
----------
Fiajte bien el path de la bd, el nombde de los campos y tablas y por ultimo que hacer si la persona se loguea.
Como veraz no varia en casi nada de lo que venias haciendo en vb6.
Si necesitas mas ayuda pidela,

Saludos

Muchisimas gracias, en verdad me ha servido, Saludos

De nada
Cuando quieras.

hola fpela,
he intentado hacer este mismo codigo pero me genera un error en esta linea:
If comando.ExecuteScalar() >= 1 Then

y dice que los tipos no coinciden.Me puedes ayudar,te lo agradeceria mucho.