Visual Basic.NET - Mostrar consula SQL

 
Vista:

Mostrar consula SQL

Publicado por Carloco (2 intervenciones) el 13/05/2007 19:07:32
Hola
Tengo el siguiente problema: He de hacer una consulta a una BD mediante una sentencia SQL y que lo que me devuelva lo muestre en un datagrid, u otro control. El problema se encuentra en que cuando la sentencia SQL hace referencia a mas de una tabla, ya no soy capaz de mostrar la consulta.

Hasta ahora tengo el siguiente codigo:

Dim Conecci As New OleDbConnection
Dim Comando As New OleDbCommand
Dim Lectors As OleDbDataReader
Dim Ds As New DataSet
Dim CadenaCon As String
Dim SQL As String

CadenaCon = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=gimnasio.mdb"
Try
Conecci.ConnectionString = CadenaCon
Comando.Connection = Conecci
Catch ex As Exception
MessageBox.Show(ex.Message)
End Try

SQL = "select socios.* from socios, matriculas_curso, cursos where matriculas_curso.cod_socio = socios.cod_socio and cursos.cod_curso = matriculas_curso.cod_curso =" & Me.TextBox2.Text & ";"
Dim Da As New OleDbDataAdapter(SQL, CadenaCon)
Da.Fill(Ds, "socios")
DataGrid3.DataSource = Ds.Tables("socios")

Puede alguien ayudarme? o darme una solucion alternativa?

Gracias de antemano
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder

RE:Mostrar consula SQL

Publicado por Harold V (411 intervenciones) el 14/05/2007 00:47:58
esto debe funcionar

remplaza estas lineas de tu codigo

=" & Me.TextBox2.Text & ";"
por
='" & Me.TextBox2.Text & "'

y

DataGrid3.DataSource = Ds.Tables("socios")
por
DataGrid3.DataSource = Ds.Tables(0)
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar