Que tal como estan, de nuevo aqui con un problemita, como pudiera hacer una consulta de dos tablas.........
de antemano gracias por sus repuestas
saludos
| |||
Respuesta: Consulta de dos tablas select * from tabla 1, tabla 2 where tabla1.dato1 = "dato" and tabla2.dato2 = "dato2"; pero la estructura basica es : "Select * From tabla1, tabla2" y ya en la condicion Where le agregas de donde es el dato que quieres rescatar haber si te sirve |
| |||
Respuesta: Consulta de dos tablas Cita: Gracias por la respuesta, mira en base a tu respuesta y a consultas sencilla que he realizado hice mi codigo de esta manera pero me marca un error
Código:
el error q me marca es q el contro0lador no admite la propiedades solicitadasPrivate Sub Consulta_Presupuesto_Imprimir() Dim sql As String, cadena As String, cadena1 As String cadena = codigo.Text Call VisualizarPresupuestos Call VisualizarCPresupuestos sql = "SELECT * FROM tblpresupuestos, tblcpresupuestos WHERE tblpresupuestos.codigo = '" & cadena & "' and tblcpresupuestos.codigo = '" & cadena & "' ORDER BY codigo" Set presupuestos4 = New ADODB.Recordset presupuestos4.Open sql, BD, adOpenKeyset, adLockOptimistic---------------------------> ERROR If presupuestos4.BOF = True Or presupuestos4.EOF = True Then Exit Sub End If End Sub gracias por la yuda saludos |
| |||
Respuesta: Consulta de dos tablas ok parece que le entendi, tu consulta al parecer si esta bien lo que me parece un poco diferente a lo que he manejado es que en la parte de Cita: en esa parte te marca error...presupuestos4.Open sql, BD, adOpenKeyset, adLockOptimistic si intentas cambiar a esto Cita: haber si se arreglapresupuestos4.Open sql, BD, adOpenStatic, adLockOptimistic sino, decirlo para ver la solucion va |
| |||
Respuesta: Consulta de dos tablas Cita: Que tal, gracias por la ayuda, pero no sigue marcandome el error de q el OBDC no admite las propiedades solicitadas y en la misma linea
Código:
saludos y gracias por la ayuda presupuestos4.Open sql, BD, adOpenStatic, adLockOptimistic |
| |||
Respuesta: Consulta de dos tablas hammmmmm agregaste las referencias necesarias para poder hacer la conexion? chanceeeeeeeee aique revisar todo te dejo en la manera de q yo lo hago para q veas mas o menos chance tu encuentres tu mismo error jeje Cita: haber si te sirve de algoPublic Cxn As ADODB.Connection 'estas son publicas Public AdoS As ADODB.Recordset Public CxnFac As String 'la funcion que llamo para poder hacer la consulta Function conectar() Set Cxn = New Connection Cxn.CursorLocation = adUseClient CxnFac = "Driver={MySQL ODBC 3.51 Driver};Server=127.0.0.1;Port=3306;Option=131072;S tmt=;Database=dwin;Uid=root;Pwd=123456;" Cxn.Open CxnFac ' Abrimos la conexion Set AdoS = New Recordset End Function Private Sub XPButton1_Click() ' aqui en mi boton hago la consulta Call conectar AdoS.Open "select clave from maistros where clave='" & Text1.Text & "';", Cxn, adOpenStatic, adLockOptimistic prueba y checa las regerencias y todo lo q tengas q agregar... |
| |||
Respuesta: Consulta de dos tablas Tio que consulta quieres hacer exactamente da un ejemplo, las 2 tablas estan relacionadas correctamente atravez del codigo, me parece que debes unir las tablas. Estos 2 campos estan relacionados osea contienen la misma informacion tblpresupuestos.codigo y tblcpresupuestos.codigo, Si es asi entonces une las tablas
Código:
Si no es asi entonces utiliza 2 consultas separadas y luego unelas con la clausula union sql = "SELECT A.*,B.* FROM tblpresupuestos A INNER JOIN tblcpresupuestos B ON A.codigo=B.codigo WHERE A.codigo = '" & cadena & "' ORDER BY A.codigo" |
| |||
Respuesta: Consulta de dos tablas Cita: Muchas gracias me funciono perfectamente bien la consulta como me dijiste pusiste en el codigo......
Iniciado por franko1809 Tio que consulta quieres hacer exactamente da un ejemplo, las 2 tablas estan relacionadas correctamente atravez del codigo, me parece que debes unir las tablas. Estos 2 campos estan relacionados osea contienen la misma informacion tblpresupuestos.codigo y tblcpresupuestos.codigo, Si es asi entonces une las tablas
Código:
Si no es asi entonces utiliza 2 consultas separadas y luego unelas con la clausula unionsql = "SELECT A.*,B.* FROM tblpresupuestos A INNER JOIN tblcpresupuestos B ON A.codigo=B.codigo WHERE A.codigo = '" & cadena & "' ORDER BY A.codigo" saludos y gracias Cita: gracias por la ayuda pero el problema era en la consulta y se soluciono como comento franko...saludos |