Sistema de login

[rjsma]

boas

eu tou a criar um sistema de login e queria saber como fazo para aparecer uma janela de erro se a palavra do campo "Digite a senha novamente" nao for igual a senha introduzida no campo " escolha uma senha" na janela de criar uma conta .

cumps

[Google]

Sabes trabalhar com bases de dados no vb.net?

[rjsma]

sei

[renafi]

tens o controlo "Compare Validator". Experimenta

[rjsma]

como e que utilizo o Compare Validator?

[bioshock]

If Textbox1.text <> Textbox2.text then
messagebox.show("Senhas diferentes")
End sub

[rjsma]

ponho o codigo na form ou numa textbox?

cumps

[bioshock]

Poems o código no botão / label conforme o que tu tiveres.

[rjsma]

obrigado pela ajuda bioshock

[rjsma]

e na base de dados tambem crio um campo para o "digita novamente a senha"?

[bioshock]

Nop, não precisas.

Só precisas de ter o campo Senha na base de dados.

Quanto ao "Digite novamente a senha" é uma questão de Design do software.

[rjsma]

thanks

[rjsma]

se pomos um campo de tipo texto ele depois aceita so letras ou letras e numeros?

[rjsma]

alguem pode dar me uma ideia como se conecta base de dados mysql com um sistema d elogin no vb.net?

cumps

[bruno1234]

Vê se este site te dá umas dicas:

http://www.macoratti.net/net_msql.htm

[rjsma]

eu tou a tentar conecta a  base de dados que criei no phpmyadmin ao vb

pos o seguinte codigo no botao para registar novos users

Dim conn As MySqlConnection

        'connect to base de dados

        conn = New MySqlConnection()

        conn.connectionstring = "server=192.168.10.22:nome de utilizador=root;senha"

        Try

            conn.open()

        Catch myerror As mysqlexception

            MsgBox("Erro ao conectar a Base de Dados")

        End Try

        'consulta SQL

        Dim myadapter As New mysqldataadapter

        Dim sqlquery = "select * from regester Where username = '" + Text + "'"

        Dim mycommand As New mysqlcommand

        mycommand.connection = conn

        mycommand.commandtext = sqlquery

        'Começa a Consulta

        myadapter.selectCommand = mycommand

        Dim mydata As mysqldatareader

        mydata = mycommand.executereader()

        ' Ve se o utilizador se ja existe

        If mydata.hasrows = 0 Then

            MsgBox("Registado")

            conn.close()

            conn.open()

            Dim registerfinal As New mysqldata

            Dim query = " Insert into register ( Nome de Utilizador, Senha,) Values ('" + Text + "','" + Text + "')"

            Dim command As New mysqlcommand()

            mycommand.connection = conn

            mycommand.commandtext = query

            'Começa a consulta

            myadapter.selectCommand = mycommand

            mydata = mycommand.executereader()

        Else

            MsgBox("username already in use.")

        End If

    End Sub

mas aparece varios erros

http://bayimg.com/pAeegAaCE

se alguem conseguir  como dar volta a isto ajudava me muito

cumps

[bruno1234]

Isso é pq te falta a referencia ao Provider de MySql.

Tens q meter o using lá em cima.

[rjsma]

antes do public class?

[bruno1234]

o using é no C#, em vb .net  é Imports.

É logo na primeira linha q tens q por.

[rjsma]

eu ja tinha posto na 1 linha

imports mysql.data.mysqlclient

e continua a dar os erros