como convertir una hora para una consulta select..

[celex]

buenas tardes tengo definido un campo HORA como datetime el cual me asigna la hora como por ejemplo 4:35:17 p.m. ahora bien estoy haciendo una consulta en donde recupero la hora para pasarla a la consulta que voy a usar, esto es asi:

Código PHP:

  dim cuenta as double 
dim hr as string  '---> ya la pase a datetime y igual me da error 
 
rs.open "select hora where cuenta=" & val(cta),,, 
 
while not EOF 
  cuenta = RStmp![CO_CTA]  ' recupero variables 
  hr = RStmp![hora] 
 rsTmp.open "select * from Bitacora2 where CO_CTA= " & Val(cuenta) & " and HORA= ' " & hora & " ' ", ,, 
 
error al convertir una cadena de caracteres a datetime 
 
rs.movenext 
wend  
   

tambien he usado la funcion cdate(hora) en mi variable que defini y me de error, en este caso que formato uso o como puedo hacer esta consulta.

les agradesco mil gracias.

[ReViJa]

Primero revisa esta select

Código:

rs.open "select hora where cuenta=" & val(cta),,,

Si no pones el code completo es muy dificil dar en el clavo a la primera.

[celex]

mi consulta completa es esta:

Código PHP:

  rs.open "select hora where cuenta=" & val (cta),conectar,adOpenDynamic,adLockOptimistic 
 
en mi tabla tengo registros de este tipo: 
 
cta    fecha        hora         bitac 
521    12/02/2007    02:52:00 p.m.    algo anotan 
521    14/02/2007    02:15:00 p.m.    algo anotan2 
521    15/02/2007    03:02:00 a.m.    algo anotan3 
 
la cuestion es consultar con estos tres campos cta, hora, solo que no se como pasarle la hora ya que me da el 'error al convertir una cadena de caracteres a datetime, tambien he usado tambien format(hora, "hh:mm") pero tambien me da el mismo error 
 
aqui ocupare la hora,cta: 
rsTmp.open "select * from Bitacora2 where CO_CTA= " & Val(cuenta) & " and HORA= ' " & hora & "  ",conectar,adOpenDynamic,adLockOptimistic 
donde cuenta,hora recupero en variables.  
   

me puedes ayudar les agredesco mil gracias

[Kruzado]

mira, la fecha y la hora se manejan con el mismo formato en las consultas, el problema tuyo pasa por las cremillas simples, reemplazalas por #, por ejemplo

sql="select * from bitacora2 where hora=#" & format(hora,"hh:mm:ss) & "# and cuenta=" & cuenta

fijo que funciona jajajajajaja, pero no le pases al campo hora el valor entre comillas, pasalo entre gatos (#)

[celex]

buenos dias, disculpen pero ya realize el cambio para el formato de hora y me sigue dando error de sintaxis '09'

este es el cambio

Código PHP:

  Rs.Open "select * from Bitacora2 where HORA = # " & Format(RsTmp![hora], "hh:mm:ss") & " # and CO_CTA= " & Val(cuenta), Conectar, adOpenDynamic, adLockOptimistic 
 
en este caso tengo la hora 09:12:23 p.m.  
   

como me indicaron le quite la cremillas y use los gatos y no mas nada que puedo hacer les agradeceria.

[Kruzado]

que extraño, mira lo unico ke se meocurre es ke el problema este en RsTmp![hora], que tipo de campo es? string? date? mira, interrumpe el programa en esa linea y en la ventana de debug tipea : debug.print format(rstmp![hora],"hh:mm:ss), crea una variable tipo date y en la misma ventana de debug, asignale el valor de rstmn![hora], si te da un error, es porke el formato de tu variable no es correcto, avisame como te va

[celex]

saludos, mi campo Hora esta declarado en la tabla como datetime y cambie mi variable Hr de string por date y es el mismo error, estoy usando sql server 2000

Código PHP:

  Dim hr As Date 
hr = RsTmp![hora] 
 
Rs.Open "select * from Bitacora2 where HORA = # " & Format(hr, "hh:mm:ss") & " # and CO_CTA= " & Val(cuenta), Conectar, adOpenDynamic, adLockOptimistic 
 
 me sigue dando error:  error de sintaxis '09' 
 no se entonces por que da el el error sinedo que ya le di el formato  
   

les agredesco, gracias

[oabareload]

Trata de usar un formato de fecha sin segundos... asi le hice yo ya que tenia:

FormatDateTime(now,3) osea hh:mm:ss

Y lo cambie a:

FormatDateTime(now,4) osea hh:mm

Y así Funciono

[tazzito]

intenta con la siguiente forma

select * from Bitacora2 where CO_CTA= " & trim(cuenta) & " and Convert( VarChar(8), HORA, 108)= '" & Trim(Hora) & "'"


ojo que en este caso la hora va en formato de texto... pero prueba si te sirve de esa forma.