| Pregunta: | 6386 - ADJUNTAR TABLAS EN VISUAL BASIC |
| Autor: | Mónica Peñalva |
| Hola, yo estoy haciendo un programa con Access y necesito que un MSFlexGrid contenga datos de muchas tablas que pertenecen a dos base de datos distintas. Vi que se puede adjuntar en tiempo de programación, pero nose como se hace para hacerlo en tiempo de ejecución. Por favor si saben la respuesta les agradeceria de todo corazón. Desde ya muchas gracias y que tengan un lindo día | |
| Respuesta: | Matias Alejandro Nolazco Guerrero |
| Para Access 97 Primeramente tienes que conectar el control Data1 al control MSFLEXGRID para que funcione. No lo he ejecutado no se si pueda tener errores. Mandame un correo para ver si te sirvio. Private Sub Command1_Click() Dim Base1 As String Dim Base2 As String Data1.Connect = "Access" 'conecta el primer archivo *.mdb Data1.DatabaseName = "C:\PRIMERABD.MDB" Base1 = "SELECT campo1,campo2 FROM nombretabla" Data1.RecordSource = Base1 'conecta el segundo archivo *.mdb Data1.DatabaseName = "C:\SEGUNDABD.MDB" Base2 = "SELECT campo1,campo2 FROM nombretabla" Data1.RecordSource = Base2 'Actualiza el Data1 Data1.Refresh End Sub | |