Por que no funciona esto?
rsTMesas.Open "select * from TMesas where TMesas.NombreMesa=' " & Label1.Caption & "'" And TMesas.CodigoSalon = '" & NombreMesaPulsada & " '",Form1.conndb,adopenkeyset, adlockoptimistic
cual es el error que te da?
la consulta, en principio esta bien, salvo que haya nombres de campo o de tabla mal puestos....
la consulta, en principio esta bien, salvo que haya nombres de campo o de tabla mal puestos....