2tablas para 1mismo datagrid

hola
quiero llenar un datagrid con datos de 2 tablas diferentes. es posible?

solo kiero q al poner un cp en un textbox y pulsar el boton se rellene el
datagrid

en teoria mi consulta tendria q comparar q las claves de las 2 tablas

iguales (klvcol de telemarketing = klave de centros1) pero hacer esto me
daba errores por todas partes.
os pongo aki el codigo con los camps q kiero sacar en datagrid a ver si
podeis decirme como solucionarlo
muchas gracias!!
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As
System.EventArgs) Handles Button1.Click

Dim nuevo As cargadatagrid

If TextBox1.Text <> "" Then

If IsNumeric(TextBox1.Text) Then

mysql = "select NOMBR,DPOST from centros1 where DPOST='" & TextBox1.Text &
"';"

nuevo.Carga(mysql, "CENTROS1", DataGrid1)

mysql = "select KLVCOL from TELEMARKETING"

nuevo.Carga(mysql, "TELEMARKETING", DataGrid1)

End If

End If

End Sub

anteriormente habia unido las 2 tablas de esta manera, pero da error al
correrlo:

mysql = "select NOMBR,DPOST,KLVCOL,FECHAS,XESCR1,XLECT1,XMATE1,XORTO1 from
centros1,telemarketing where DPOST='" & TextBox1.Text & "'AND
klvcol.telemarketing= klave.centros1;"

nuevo.Carga(mysql, "TELEMARKETING", DataGrid1)





"Sonia" escribió en el mensaje
news:
> hola
> quiero llenar un datagrid con datos de 2 tablas diferentes. es posible?
>
> solo kiero q al poner un cp en un textbox y pulsar el boton se rellene

> datagrid
>
> en teoria mi consulta tendria q comparar q las claves de las 2 tablas
fueran
> iguales (klvcol de telemarketing = klave de centros1) pero hacer esto me
> daba errores por todas partes.
> os pongo aki el codigo con los camps q kiero sacar en datagrid a ver si
> podeis decirme como solucionarlo
> muchas gracias!!
> Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As
> System.EventArgs) Handles Button1.Click
>
> Dim nuevo As cargadatagrid
>
> If TextBox1.Text <> "" Then
>
> If IsNumeric(TextBox1.Text) Then
>
> mysql = "select NOMBR,DPOST from centros1 where DPOST='" & TextBox1.Text

> "';"
>
> nuevo.Carga(mysql, "CENTROS1", DataGrid1)
>
> mysql = "select KLVCOL from TELEMARKETING"
>
> nuevo.Carga(mysql, "TELEMARKETING", DataGrid1)
>
> End If
>
> End If
>
> End Sub
>
>

Sonia:

Cual es el error que te da?

Saludos, claudio

"Sonia" escribió en el mensaje
news:%
> anteriormente habia unido las 2 tablas de esta manera, pero da error al
> correrlo:
>
> mysql = "select NOMBR,DPOST,KLVCOL,FECHAS,XESCR1,XLECT1,XMATE1,XORTO1

> centros1,telemarketing where DPOST='" & TextBox1.Text & "'AND
> klvcol.telemarketing= klave.centros1;"
>
> nuevo.Carga(mysql, "TELEMARKETING", DataGrid1)
>
>
>
>
>
> "Sonia" escribió en el mensaje
> news:
> > hola
> > quiero llenar un datagrid con datos de 2 tablas diferentes. es

> >
> > solo kiero q al poner un cp en un textbox y pulsar el boton se rellene
el
> > datagrid
> >
> > en teoria mi consulta tendria q comparar q las claves de las 2 tablas
> fueran
> > iguales (klvcol de telemarketing = klave de centros1) pero hacer esto

> > daba errores por todas partes.
> > os pongo aki el codigo con los camps q kiero sacar en datagrid a ver

> > podeis decirme como solucionarlo
> > muchas gracias!!
> > Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As
> > System.EventArgs) Handles Button1.Click
> >
> > Dim nuevo As cargadatagrid
> >
> > If TextBox1.Text <> "" Then
> >
> > If IsNumeric(TextBox1.Text) Then
> >
> > mysql = "select NOMBR,DPOST from centros1 where DPOST='" &

&
> > "';"
> >
> > nuevo.Carga(mysql, "CENTROS1", DataGrid1)
> >
> > mysql = "select KLVCOL from TELEMARKETING"
> >
> > nuevo.Carga(mysql, "TELEMARKETING", DataGrid1)
> >
> > End If
> >
> > End If
> >
> > End Sub
> >
> >
>
>