Obtener datos de MySQL y enviar esa información
Publicado por RyuChan (1 intervención) el 14/03/2016 02:25:24
Hola a todos.
Tengo algunas dudas sobre cosas en VB.net , no tengo mucha experiencia pero he hecho lo posible por aprender,
mi aplicación cuenta con un sistema de inicio de sesión conectado a una base de datos MySQL , la información la toma de una tabla que tiene 3 columnas : el User ID , username y email
A la hora de abrir el programa y/o aplicación les pide que pongan su nombre de usuario y email, me preguntaba si es posible que la aplicación verifique que datos a puesto y detecte el User ID de ese usuario (Tomando los datos de la tabla de MySQL) , luego que se conecte a otra tabla y verifique
si su User ID está en la otra tabla.
Aquí les dejo algunas imágenes por si no me explique del todo bien:
Mi aplicación:
Código del botón "Iniciar sesión":
Tabla 1 (User ID, username y email):
Tabla 2 (Donde verificara si existe el User ID):
Espero que me puedan ayudar, y que sea posible hacer dicha función.
Gracias.
Tengo algunas dudas sobre cosas en VB.net , no tengo mucha experiencia pero he hecho lo posible por aprender,
mi aplicación cuenta con un sistema de inicio de sesión conectado a una base de datos MySQL , la información la toma de una tabla que tiene 3 columnas : el User ID , username y email
A la hora de abrir el programa y/o aplicación les pide que pongan su nombre de usuario y email, me preguntaba si es posible que la aplicación verifique que datos a puesto y detecte el User ID de ese usuario (Tomando los datos de la tabla de MySQL) , luego que se conecte a otra tabla y verifique
si su User ID está en la otra tabla.
Aquí les dejo algunas imágenes por si no me explique del todo bien:
Mi aplicación:
Código del botón "Iniciar sesión":
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
Private Sub Button1_Click_1(sender As Object, e As EventArgs) Handles Button1.Click
MySqlConnection = New MySqlConnectionMySqlConnection.ConnectionString = "server=HostDelMySQL;Port=3306; user id=UsuarioDelMySQL;password=ContraseñaDelMySQL; database=NombreDeLaBD"
MySqlConnection.Open()
Dim Myadaptar As New MySqlDataAdapter
Dim sqlquary = "SELECT * FROM xf_user WHERE username='" & txtUsuario.Text & "' AND email='" & txtPassword.Text & "';"
Dim command As New MySqlCommand
command.Connection = MySqlConnection
command.CommandText = sqlquary
Myadaptar.SelectCommand = command
Dim Mydata As MySqlDataReader
Mydata = command.ExecuteReader
If Mydata.HasRows = 0 Then
Form4.Show()
Else
Timer1.Start()
End If
End Sub
Tabla 1 (User ID, username y email):
Tabla 2 (Donde verificara si existe el User ID):
Espero que me puedan ayudar, y que sea posible hacer dicha función.
Gracias.
Valora esta pregunta
0