FAZER CONSULTA

ANDRERABELOFELI 26/04/2011 22:31:54
#372549
pessoal como faço uma consulta ao banco de dados para saber se uma informação digitada num text box e verdadeira e se for verdadeira,como abrir um novo formulario.
uso vb 2005 e sql server 2005.
agradeço pela ajuda desde ja.
JONATHANSTECKER 27/04/2011 07:40:57
#372572
ANDRERABELOFELI, especifique sua dúvida.
Quando o valor do TextBox será verdadeiro?
ANDRERABELOFELI 27/04/2011 14:11:41
#372617
bem eo seguinte, digito a informação na textbox e pressiono enter dai o programa faz uma consulta no textbox pra saber se a informação que digitei e verdadeira e se for(verdade) abrir um outro formulario
nao sei se me expressei bem.
AUTOMATION 28/04/2011 20:17:41
#372739
Olá a todos,
Pessoal, como faço para pesquisar um valor no banco de dados sql? explico:

tenho um combobox.text onde está fazendo a comunicação com o banco, quando seleciono o texto que quero no combobox ele tem que fazer uma comparação com o banco e me retornar os calores das colunas, mas não consigo fazer com que ele registre esses valores em seus respectivos textbox.
olhem o codigo abaixo:

..........................................................................................................................................................

Dim conn As New SqlConnection
Dim comando As New SqlCommand
Dim cTipoPerfil As String
conn.ConnectionString = My.Settings.bancoProjcalcConnectionString
cTipoPerfil = Me.TipoPerfilComboBox.Text
Try
conn.Open()
comando.Connection = conn
comando.CommandText = [Ô]SELECT d FROM Bitolas Where TipoPerfil=@cTipoPerfil[Ô]

conn.Close()

Me.txtd.Text = esté é meu textbox como faço para que ele mostre o valore contido no banco na coluna d?


Catch ex As SqlException
MessageBox.Show([Ô]Erro ao efetuar a conexão com a base de dados : [Ô] + ex.Message)

conn.Dispose()
End Try
End Sub

......................................................................................................................

abraço a todos
Alessandro
PEGUDO 29/04/2011 07:58:14
#372773
Cara você pode criar uma Function ou uma classe para retornar o valor True ou False
Veja um exemplo meu para verificar se o valor digitado existe no BD

[ô]CRIEI ESTA CLASSE
Public Class Classes
    Public ReadOnly Property Verifica_Usuario(ByVal QualNome As String) As Boolean
        Get
            If C.State = 0 Then Conectar()
 
            RecSet = C.Execute([Ô]SELECT login FROM tblUsuarios WHERE login=[ô][Ô] & QualNome & [Ô][ô][Ô])

            If RecSet.EOF Then
                Verifica_Usuario = False
            Else
                Verifica_Usuario = True
            End If

            Try
                RecSet.Close()
            Catch ex As Exception
                RecSet = Nothing
            Finally
                C.Close()
            End Try

            Return Verifica_Usuario
        End Get
    End Property
End Class


[ô]CÓDIGO DO BOTÃO DO FORMULÁRIO
Protected Sub btnEntrar_Click(ByVal sender As Object, ByVal e As EventArgs) Handles btnEntrar.Click
    Dim TestarSenha as Boolean
    
    TestarSenha = ObjClasse.Verifica_Usuario(Trim(txtLogin.Value)) [ô]Faz uma busca pelo BD para ver se o usuário existe

    If TestarSenha = True Then
        frmPrincipal.Show()
    Else
        lblAviso.Text = [Ô]O login digitado não existe ou está incorreto.[Ô]
        txtLogin.Value = [Ô][Ô]
        txtLogin.Focus()
    End If
End Sub
AUTOMATION 01/05/2011 09:53:20
#372898
Olá, Pegudo!

Seu código é show, mas minha duvida ainda existe, pois no ::

If TestarSenha = True Then
neste ponto tenho que fazer os dados do BD registrados mostrar nos textbox que escolhi. explico
no txtd.text tem que ter a 2 coluna do BD.

Como fazer isso?

abraços
Alessandro
JWCELYO 01/05/2011 11:31:43
#372908
Mas tem cuidado com [txt-color=#e80000]incjetion [/txt-color]
imagine que o usuário digite seu nome [ô] or 1=1--[ô] ele vai acabar fazendo login do mesmo jeito
RODRIGOFERRO 01/05/2011 11:57:50
#372910
Yah o JWCELYO esta certo, desse jeito tem uma brexa enorme aberta !

Abraços
Página 1 de 2 [13 registro(s)]
Tópico encerrado , respostas não são mais permitidas
Voltar