Comando SQL

[VieirinhaZ]

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

 

[MrOverclock]

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

 

[VieirinhaZ]

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

 

[VieirinhaZ]

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()

 

[palmoura]

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()

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

 

[VieirinhaZ]

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()