Consulta que no funciona en vb
Hola. Tengo esta consulta:
rsTempTMesas.Open "select * from TMesas where TMesas.NombreMesa=" & NombreMesaPulsada, Form1.conndb, adOpenKeyset, adLockOptimistic
Por que no funciona si NombreMesaPulsada contiene un nombre con espacios en blanco y sin embargo si se los quito si que funciona?(es decir, si es una sola palabra del tipo Mesa1). El problema es que en esa variable pone cosas como Mesa 1 Salon 1 y no se como ponerlo para que funcione. Gracias.
rsTempTMesas.Open "select * from TMesas where TMesas.NombreMesa=" & NombreMesaPulsada, Form1.conndb, adOpenKeyset, adLockOptimistic
Por que no funciona si NombreMesaPulsada contiene un nombre con espacios en blanco y sin embargo si se los quito si que funciona?(es decir, si es una sola palabra del tipo Mesa1). El problema es que en esa variable pone cosas como Mesa 1 Salon 1 y no se como ponerlo para que funcione. Gracias.
Tienes que poner el nombre entre comillas para que te lo coja todo entero. Los strings se deben poner entre comillas. Me parece que debe ser eso. Pruevalo.
Asi: "... NombreMesa = ' " & nom & "'..."
Me entiendes???
Asi: "... NombreMesa = ' " & nom & "'..."
Me entiendes???
Me refiero a esto
rsTempTMesas.Open "select * from TMesas where TMesas.NombreMesa=' " & NombreMesaPulsada & " ' ", Form1.conndb, adOpenKeyset, adLockOptimistic
pero sin el espacio entre las " y '. Seria como si la sentencia instanciada en SQL quedase:
"select * from TMesas where TMesas.NombreMesa= 'Pedro Picapiedra' "
Ahora si?
rsTempTMesas.Open "select * from TMesas where TMesas.NombreMesa=' " & NombreMesaPulsada & " ' ", Form1.conndb, adOpenKeyset, adLockOptimistic
pero sin el espacio entre las " y '. Seria como si la sentencia instanciada en SQL quedase:
"select * from TMesas where TMesas.NombreMesa= 'Pedro Picapiedra' "
Ahora si?
Te has olvidado de ponerle las comillas simples, ya que parece que es un dato tipo string.
sería algo así:
rsTempTMesas.Open "select * from TMesas where TMesas.NombreMesa=comilla_simple" & NombreMesaPulsada & "comilla_simple", Form1.conndb, adOpenKeyset, adLockOptimistic
rsTempTMesas.Open "select * from TMesas where TMesas.NombreMesa=comilla_simple" & NombreMesaPulsada & "comilla_simple", Form1.conndb, adOpenKeyset, adLockOptimistic