Condicion WHERE
Muchas gracias ante todo...
al introducir el código en la consulta: SELECT ..... FROM ...... WHERE Monitor.Id_monitor='Alfonso'. Me sale bien, es decir, introduce en el listview los alumnos de este monitor. Pero si quiero que obtenga el valor de un textbox me da el siguiente error:
"Error '3709' en tiempo de ejecución: No se puede utilizar la conexión para realizar esta operación. Está cerrada o no es válidad en este contexto"
Este es el codigo que utilizo (el error se da en la consulta):
Const sPathBase As String = "H:\atletismo_97.MDB"
Set conexion = New ADODB.Connection
Set record = New ADODB.Recordset
conexion.ConnectionString = "Provider=Microsoft.Jet.OLEDB.3.51;" & _
"Data Source=" & sPathBase & ";"
conexion.Open
record.Open "SELECT Alumnos.Nombre_alumno, Alumnos.Apellidos_alumno FROM (Monitor INNER JOIN Grupo ON Monitor.Id_monitor = Grupo.Id_monitor) INNER JOIN Alumnos ON Grupo.Nombre_Grupo = Alumnos.Nombre_Grupo WHERE Monitor.Id_monitor= ' " & txtusuario.Text & " ' "", conexion, adOpenDynamic, adLockOptimistic"
Salu2...
|