• Revista PROGRAMAR: Já está disponível a edição #53 da revista programar. Faz já o download aqui!

rjsma

Sistema de login

20 mensagens neste tópico

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

0

Partilhar esta mensagem


Link para a mensagem
Partilhar noutros sites
If Textbox1.text <> Textbox2.text then
messagebox.show("Senhas diferentes")
End sub

0

Partilhar esta mensagem


Link para a mensagem
Partilhar noutros sites

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

0

Partilhar esta mensagem


Link para a mensagem
Partilhar noutros sites

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

0

Partilhar esta mensagem


Link para a mensagem
Partilhar noutros sites

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.

0

Partilhar esta mensagem


Link para a mensagem
Partilhar noutros sites

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

0

Partilhar esta mensagem


Link para a mensagem
Partilhar noutros sites

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

cumps

0

Partilhar esta mensagem


Link para a mensagem
Partilhar noutros sites

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

0

Partilhar esta mensagem


Link para a mensagem
Partilhar noutros sites

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

Tens q meter o using lá em cima.

0

Partilhar esta mensagem


Link para a mensagem
Partilhar noutros sites

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

É logo na primeira linha q tens q por.

0

Partilhar esta mensagem


Link para a mensagem
Partilhar noutros sites

eu ja tinha posto na 1 linha

imports mysql.data.mysqlclient

e continua a dar os erros

0

Partilhar esta mensagem


Link para a mensagem
Partilhar noutros sites

Crie uma conta ou ligue-se para comentar

Só membros podem comentar

Criar nova conta

Registe para ter uma conta na nossa comunidade. É fácil!


Registar nova conta

Entra

Já tem conta? Inicie sessão aqui.


Entrar Agora