não Esta Fazendo Consulta No Bd

[mestre fyoda]

Public Class Login

    Private Sub Sair_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Sair.Click
        Close()
    End Sub

    Private Sub Entrar_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Entrar.Click
        If InicializaConexão() Then
            Dim MySQLDrr As MySql.Data.MySqlClient.MySqlDataReader = ExecutarSQL("SELECT * FROM AQCAD where EMACAD = '&usuario.text&' ")

            If MySQLDrr.HasRows = True Then
                While MySQLDrr.Read
                    Dim codigo As String = MySQLDrr.Item(1)
                    MessageBox.Show("" + codigo)
                End While
            End If
        End If
        'MySQLDrr.Close()
    End Sub
End Class

não está selecionando o usuario digitado, porque ?

[Andersonjb]

Essa Consulta:

"SELECT * FROM AQCAD where EMACAD = '&usuario.text&'

Não seria assim?

"SELECT * FROM AQCAD where EMACAD = '" & usuario.text & "'"

[mestre fyoda]

MessageBox.Show("Bem vindo " + codigo)

estranho não esta aparecendo a mensagem Bem Vindo porque ?

Editado Maio 2, 2007 por mestre fyoda

[Lucas Phillip]

Aew,

você fez a mudança que o Andersonjb falou? Já está selecionando o usuário?

Bom.. Se a msg não está aparecendo, provavelmente é porque "MySQLDrr.HasRows" está false..

De qualquer maneira, eu estava olhando o código e parece que você quer apenas 1 row do mysql correto? apenas o nome do usuário. Se eu estiver certo, você não precisa utilizar o while para fazer o read do mysql. Basta apenas a chamar MySQLDrr.Read, pois como só tem 1 row, o while só vai ser executado 1 vez... Bom pelo menos eu não utilizo e acho que da uma acelerada... :D

falou

[mestre fyoda]

MessageBox.Show("Bem vindo " + codigo)

o +codigo aparece mas o bem vindo não esta aparecendo!

[Graymalkin]

Não sei se dá diferença, mas o certo é usar o operador & e não o + neste caso.

MessageBox.Show("Bem vindo " & codigo.ToString())

Abraços,

Graymalkin

[mestre fyoda]

o que pode estar ocorrendo no meu VB.net ? eu alterei a co de fundo do meu form e executei , na execução não modificou a cor , esta acontecendo a mesma coisa com o menssagebox.show , porque ?

[Graymalkin]

o que pode estar ocorrendo no meu VB.net ? eu alterei a co de fundo do meu form e executei , na execução não modificou a cor , esta acontecendo a mesma coisa com o menssagebox.show , porque ?

Ele está realmente compilando o projeto? Porque se tiver algum erro no código ele não compila e você vai estar rodando o executável antigo.

Abraços,

Graymalkin

[mestre fyoda]

é isso mesmo Graymalkin, eu deletei uma imagem mas não saiu no projeto do vb, como eu faço isso ?

está dndo esse erro !

[Andersonjb]

é isso mesmo Graymalkin, eu deletei uma imagem mas não saiu no projeto do vb, como eu faço isso ?

está dndo esse erro !

Presta Atenção de Novo nessa Parte:

Ele está realmente compilando o projeto? Porque se tiver algum erro no código ele não compila e você vai estar rodando o executável antigo.