Visual basic 2010

Gestart doorTmeiland8 reacties17 weergaven

9 berichten · pagina 1 van 1

Tmeiland

Lid · Topicstarter

Berichten
450
Reputatie
0
Punten
0,00
Lid sinds
Laatst gezien
Hallo,
Ik ben bezig met een login systeem connect met database
het werkt via VB 2010 EXPRESS

Ik heb een login systeem gemaakt waar mensen kunnen inloggen
alles wordt opgehaald via een database
ik wil dat bijv als iemand inlogt bijv: jan

en als hij dan succesvol is ingelogd

komt er
Hallo, %username% je bent succesvol ingelogd
Afbeelding
0
Berichten
804
Reputatie
0
Punten
0,00
Lid sinds
Laatst gezien
If textbox1.text = "Username" and textbox2.text = "Password" then
Me.Hide()
Form2.show


zoiets,

En dan moet Form2 zeg maar het bericht zijn.
Je kan ook me.hide weglaten als je niet wilt dat het login form weggaat.
0
Tmeiland

Lid · Topicstarter

Berichten
450
Reputatie
0
Punten
0,00
Lid sinds
Laatst gezien
ik heb het al maar ik wal dat in form1 er komt te staan je eigen gebruikersnaam waar mee je inlogt hebt snap je het?.

want alle users staan al in mysql

alleen als degene bijv

jan inlogt en succesvol

dat er dan komt Hallo, jan je bent nu succesvol ingelogd
0
Berichten
93.699
Reputatie
0
Punten
1,27
Lid sinds
Laatst gezien
Yusufnoor schreef:
If textbox1.text = "Username" and textbox2.text = "Password" then
Me.Hide()
Form2.show
zoiets,

En dan moet Form2 zeg maar het bericht zijn.
Je kan ook me.hide weglaten als je niet wilt dat het login form weggaat.

Dats laat nergens op..
1) Hij haalt zijn accounts uit een database dus niet uit een if else statement confused2) Hoe wil jij dan in Form2 ingelogd username laten zien? wink

Stuur superb is een pm, hij is de enige die ik ken die daar wat mee kan.
(En hij houd ervan om lastig gevallen te worden) emo... (Sorry Bas) biggrin
0
Berichten
3.037
Reputatie
0
Punten
0,00
Lid sinds
Laatst gezien
Xjessex schreef:
Eerdere citaten tonen
Yusufnoor schreef:
If textbox1.text = "Username" and textbox2.text = "Password" then
Me.Hide()
Form2.show
zoiets,

En dan moet Form2 zeg maar het bericht zijn.
Je kan ook me.hide weglaten als je niet wilt dat het login form weggaat.
Dats laat nergens op..
1) Hij haalt zijn accounts uit een database dus niet uit een if else statement confused2) Hoe wil jij dan in Form2 ingelogd username laten zien? wink

Stuur superb is een pm, hij is de enige die ik ken die daar wat mee kan.biggrin
Idd, ga op Google zoeken: visual basic connecting with database
Dan vind je genoeg tuts/vids alleen zijn ze engels maar dat is noet erg?
Xjessex schreef:
(En hij houd ervan om lastig gevallen te worden) emo... (Sorry Bas)
Lol.. emo
0
Berichten
2.692
Reputatie
0
Punten
0,00
Lid sinds
Laatst gezien
Omg emoIk hou daar idd heel erg van biggrin Niet dus.. biggrin sadley
Ik weet eerlijk gezegd niks van Visual Basic.. Ik zou wel kunnen helpen met C#.. ;p
0
Berichten
93.699
Reputatie
0
Punten
1,27
Lid sinds
Laatst gezien
Superb schreef:
Omg emoIk hou daar idd heel erg van biggrin Niet dus.. biggrin sadley
Ik weet eerlijk gezegd niks van Visual Basic.. Ik zou wel kunnen helpen met C#.. ;p
Is het niet zelfde syntax dan? redface
0
Berichten
2.692
Reputatie
0
Punten
0,00
Lid sinds
Laatst gezien
Xjessex schreef:
Eerdere citaten tonen
Superb schreef:
Omg emo
Ik hou daar idd heel erg van biggrin Niet dus.. biggrin sadley
Ik weet eerlijk gezegd niks van Visual Basic.. Ik zou wel kunnen helpen met C#.. ;p

Is het niet zelfde syntax dan? redface
nop
0
Berichten
545
Reputatie
0
Punten
0,00
Lid sinds
Laatst gezien
Private Sub Form1_Load(ByVal sender As System.Object, _
            ByVal e As System.EventArgs) Handles MyBase.Load
        TestConnection()
         retriveData()
    End Sub
 
    Public Sub TestConnection()
        Try
            Dim connStr As String = "Database=world;" & _
                    "Data Source=192.168.125.21;" & _
                    "User Id=worldUser;Password=worldpassword"
            Dim connection As New MySqlConnection(connStr)
            connection.Open()
            connection.Close()
            MsgBox("Connection is okay.")
        Catch ex As Exception
            MsgBox(ex.Message)
        End Try
    End Sub
Public Sub retriveData()
       Try
            Dim query As String = "SELECT * FROM users WHERE user=textboxitemhere AND pass=textboxitemhere"
            Dim connection As New MySqlConnection(connStr)
            Dim cmd As New MySqlCommand(query, connection)
 
            connection.Open()
 
            Dim reader As MySqlDataReader
            reader = cmd.ExecuteReader()
 
            While reader.Read()
                Console.WriteLine((reader.GetString(0) & ", " & _
                    "Login is succeed."))
            End While
 
            reader.Close()
            connection.Close()
        Catch ex As Exception
            Console.WriteLine(ex.Message)
        End Try
End Sub


http://www.linglom.com/2009/02/12/accessing-mysql-on-vbnet-using-mysql-connectornet-part-i-introduction/
0

Jouw reactie

Deel je idee, stel een vraag of help een ander verder.

Editor laden…

Praat mee met de One2xs-community.

Inloggen om te reageren