| Pregunta: | 42512 - APERTURA TABLA DE SQL |
| Autor: | David Ascacibar |
| Hola a tod@s: Tengo el siguiente problema, tengo un formulario, que lanza un proceso, en el cual, tengo que consultar datos de una tabla Sql que he vinculado. Al abrirla, me dice que debo usar la instruccion 'dbSeeChanges', y uso este procedimiento: Dim DB As DAO.Database Dim TB As DAO.Recordset Set DB = DBEngine.Workspaces(0).Databases(0) Set TB = DB.OpenRecordset("dbo_PARTI",,DbSeeChanges) aún así, no consigo acceder a ella. También he probado a crear un snapshot, y me deja abrirla, pero no me permite hacer una búsqueda aleatoria, usando las instrucciones 'filter' y 'sort' de esta manera: Private Sub SELCODIGO_LostFocus() Dim DB As DAO.Database Dim TB As DAO.Recordset Set DB = DBEngine.Workspaces(0).Databases(0) Set TB = DB.OpenRecordset("SELECT * FROM dbo_PARTI", dbOpenSnapshot, dbSeeChanges) TB.Filter o TB.Sort 'GENERA ESTE ERROR: Me aparece que el uso de la propiedad no es válido a quien pueda ayudarme... muchas gracias. Un Saludo. | |
| Respuesta: | David Ascacibar |
| Ya he dado con lo que necesitaba. Si a alguien pudiera interesarle, lo que he hecho ha sido abrir la tabla como un snapshot, con una sentencia Sql, que me lleve directamente al valor del campo que busco, el codigo seria el siguiente: Set TB = DB.OpenRecordset("SELECT * FROM dbo_PARTI where [campo]=' " & cuadro_de_texto.value & " ' ", dbOpenSnapshot, dbSeeChanges) De esta forma he conseguido acceder de forma directa al registro que busco. | |