1. Este site usa cookies. Ao continuar a usar este site está a concordar com o nosso uso de cookies. Saber Mais.

Comando SQL

Discussão em 'Programação' iniciada por VieirinhaZ, 11 de Maio de 2009. (Respostas: 5; Visualizações: 892)

  1. Boas,

    ja tou farto de procurar e mexer e alterar e nada, este vb 2008 baralha me

    Eu coloco o Seguinte Codigo

    Dim sql as String

    sql = "SELECT Nome FROM Teste WHERE ID = ' " & proprietario + 1 & " ' "

    label10.text = sql

    Executando este codigo, o resultado deste codigo e o proprio codigo :s
    Ou seja nao reconhece o comando e coloca-me o Select :S

    Sera q alguem me pode ajudar ?

    Cumps
     
  2. MrOverclock

    MrOverclock Power Member

    O pa.. eu de VB já não me lembro de muito e nunca cheguei a trabalhar com base de dados a sério. Mas isso não me parece que esteja correcto, faltam-te aí alguns passos!

    basicamente o que estás a fazer é meter uma frase numa variável e a mandar a variável para a label!

    Tens de meter a base de dados a interpretar o SELECT e só depois é que a base de dados te retorna o resultado ;)
     
  3. MrOverclock, eu tenho tudo direito , vou por o resto do codigo:

    Connection String esta' a funcionar visto que o DataGrid Tem valores

    E depois :

    Dim bd As New SqlConnection(ttest)
    Dim sql As String

    proprietario = DataGridView1.CurrentRow.Index


    sql = "SELECT Nome FROM Teste WHERE ID = '" & proprietario + 1 & "'"



    Fraccoes.Enabled = True

    If entipo = 1 Then
    Fraccoes.TextBox4.Text = proprietario
    Fraccoes.Label10.Text = sql
    ElseIf entipo = 2 Then
    Fraccoes.TextBox5.Text = proprietario
    Else
    Fraccoes.TextBox6.Text = proprietario
    End If
    Me.Close()

    Isto e o que eu tenho
     
  4. Correcçao :

    Dim bd As New SqlConnection(ttest)
    Dim sql As String

    proprietario = DataGridView1.CurrentRow.Index

    bd.Open()

    sql = "SELECT Nome FROM Teste WHERE ID = '" & proprietario + 1 & "'"

    Dim cmd As New SqlCommand(sql, bd)




    cmd = New SqlCommand(sql, bd)


    cmd.ExecuteScalar()

    bd.Close()

    Fraccoes.Enabled = True

    If entipo = 1 Then
    Fraccoes.TextBox4.Text = proprietario
    Fraccoes.Label10.Text = sql
    ElseIf entipo = 2 Then
    Fraccoes.TextBox5.Text = proprietario
    Else
    Fraccoes.TextBox6.Text = proprietario
    End If
    Me.Close()
     
  5. o que me parece e q estas a afectar a tua textbox com o conteudo da variavel sql e nao com o que tem la dentro
     
  6. Problema resolvido

    Soluçao



    bd.Open()


    Dim cmd As SqlCommand = New SqlCommand("SELECT Nome FROM Teste where ID = '" & proprietario + 1 & "'", bd)

    Dim sdr As SqlDataReader = cmd.ExecuteReader()

    While sdr.Read = True
    Fraccoes.Label10.Text = sdr.Item("Nome")
    End While







    bd.Close()
     

Partilhar esta Página