ayuda con fechas en db

[virla]

Tengo una base de datos que guardo los datos por fecha para despues ser mostrados, no muestra datos como se no huviera nada en la base que puede ser?
les dejo parte del codigo, capas esta mal puesta la variable
<%
Response.Buffer = true
dim cnn,rst,ft,ft1
' Creamos la conexión a la base de datos sin DSN
set cnn = Server.CreateObject("ADODB.Connection")
set rst = Server.CreateObject("ADODB.RecordSet")
cnn.Open "Driver={Microsoft Access Driver (*.mdb)}; DBQ=" & Server.MapPath("/db/bdDiario.mdb")
sqltext = "SELECT * FROM tbTapa"
rst.Open sqltext,cnn,3,3
rst.movelast
ft1=rst("fechaBase")
%>

Aca es donde llama los datos
-------------------------------------------------------------------------------
<%
sql = "SELECT * FROM tbDiario WHERE Fecha='ft1' and zona='1'"
set result = cnn.Execute(sql)
if not result.eof and not result.bof then
%>
-------------------------------------------------------------------------------

plis ayuda
PD: el campo de la fecha en texto

[virla]

Lo ultima prueba que hice fue que me muestre el valor que tiene la variable ft1 y no muestra nada
Response.Write("la fecha que tiene la variable ft1: "& ft1)

en donde esta el problema?
ayuuuuudaaaaaa urgente plis

[virla]

ayuda por favor

[Bluesman74cl]

<%
sql = "SELECT * FROM tbDiario WHERE Fecha='ft1' and zona='1' "
set result = cnn.Execute(sql)
if not result.eof and not result.bof then
%>



Creo que el problema es lo que está a en negritas



deberias tratar con lo siguiente fecha= '"&ft1&"'

[virla]

no, no funciona

[u_goldman]

Lo ultima prueba que hice fue que me muestre el valor que tiene la variable ft1 y no muestra nada
Response.Write("la fecha que tiene la variable ft1: "& ft1)

Pues tu mismo acabas de decir, el problema como recoges la variable...llega de un formulario? por querystring, lo generas en el código o como es? tienes que ver que esa variable tenga un valor

Después si los campos son de tipo texto tienes que hacer la consulta con dichas variables entre apóstrofes

sql = "SELECT * FROM tbDiario WHERE Fecha='" & ft1 & "' and zona='1' "

Me queda la duda si zona es de tipo texto, si no lo es, quita los apóstrofes al 1.


Salu2,

[virla]

Pues tu mismo acabas de decir, el problema como recoges la variable...llega de un formulario? por querystring, lo generas en el código o como es? tienes que ver que esa variable tenga un valor

esta en el codigo de arriba como tomo el valor de ft1
ft1=rst("fechaBase")

de cuanquier manera no lo toma como vos decis y lo prove tambien con #"&ft1&"#
que tampoco funciona
es mas tengo una pagina que en realidad es como la misma porque estoy modificando su diseño y parte del codigo que en realidad lo estoy depurando un poco. y con #"&ft1&"# y con la fecha en la base en formato fecha andava bien el tema es que me cambia la forma en que la mando como ser
yo la quiero en dd/mm/aaaa y se guarda en mm/dd/aaaa y esto me arma un lio tremendo es por eso que lo cambie en formato texto para que sea mas simple pero veo que no es tan
bueno espero sus ayuda
gracias

[u_goldman]

qué tipo de dato es rstFecha base?
Si es fecha a lo mejor le tienes que hacer un cast, no estoy seguro pues nunca utilizo en access campos de tipo fecha , pero dices que no tiene valor tu variable ft1, entonces lo primero es que el primer recordset traiga un valor para asignárselo a ft1, nuevamente, cuál es tu query?
je je je, esto se complica más y más conforme se hacen modificaciones a las DB's, por eso es bueno tomarse un buen tiempo para pensar en el diseño de estas bueno, entonces lo primero es conseguir que esa variable tenga un valor, si no lo tiene no vas a poder avanzar...después como vas a comparar en un string, pues el formato tiene que estar igual 12/09/03 = '12/09/03' con algo que tenga de mas o de menos no funca, ahora, si tu código original funciona bien, es mejor tratar de hacer un parseo a las variables que traigan estas fechas, para darles el formato correcto en lugar de alterar la DB, bueno es solo mi opinión...

Salu2,

[virla]

rst("fechaBase") es de tipo text
lo del query, esta todo en la misma pagina si ves un poco la primera pregunta y ovservas el codigo esto es dentro de la misma pagina no es que lo estoy pasando el dato a otra.

[buliwyf]

no entiendo porque se enrollan la vida

sql= "select * from tbDiario where fecha in (select top 1
fecha_base from tbTapa order by id desc) and zona='1'"

eso en el caso de que tengas un campo id autonumerico, en caso contrario, deberias añadir uno



cualquier duda comunicate conmigo y hablamos.


saludos!

[virla]

esta bien pero yo lo que necesito es que me de las notas o textos de la fecha ultima
no se si se entiende

[virla]

ahora lo estoy haciendo como originalmente lo hacia pero tampoco veo nada,
originalmente tengo in incude logo.asp dentro de la pagina index.asp que toma la fecha de la base de datos y con una session paso el valor a la index.asp

Esta es el codigo de logo.asp
<%
Response.Buffer = true
dim cnn,rst,ft
' Creamos la conexión a la base de datos sin DSN
set cnn = Server.CreateObject("ADODB.Connection")
set rst = Server.CreateObject("ADODB.RecordSet")
cnn.Open "Driver={Microsoft Access Driver (*.mdb)}; DBQ=" & Server.MapPath("/db/Diario.mdb")
sqltext = "SELECT * FROM Tapa"
rst.Open sqltext,cnn,3,3
rst.movelast
session("ft")=rst("fechaBase")
%>

y en el index tengo esto
<!--#include file="logo.asp" -->
<%
dim ft1
ft1=session("ft")
Set Cnn = Server.CreateObject("ADODB.Connection")
Cnn.Open("Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.MapPath("/db/bdDiario.mdb"))
sql = "SELECT * FROM tbDiario WHERE Fecha=#"&ft1&"# and zona='1'"
set result = cnn.Execute(sql)
%>

El problema es que no esta pasando el valor porque no pone nada y la base esta cargada con los datos de la fecha que muestra el logo y es la que esta pasando con la session
porfavor algun maestro que me ayude estoy apurado
gracias

[virla]

no hay nadie que me ayude????????

[virla]

vamos maestros, vamos

[virla]

nadie me puede ayudar?, no puedo creer que mis maestros me dejen sin la solucion

[buliwyf]

tienes un campo autonumerico en tbtapa???

[virla]

si

[buliwyf]

probaste con el sql que te puse antes???? deberia funcionarte perfectamente, pruebalo y me cuentas si hay algun error!

[virla]

bueno, lo prove y me sale este mensaje:
Microsoft JET Database Engine error '80040e10'

No se han especificado valores para algunos de los parámetros requeridos.

/plantilla.asp, línea 56
----------------------------------
el contenido de la linea 56 es el marcado con -->
----------------------------------
<%
Set Cnn = Server.CreateObject("ADODB.Connection")
Cnn.Open("Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.MapPath("/db/bdDiario.mdb"))
sql= "select * from tbDiario where fecha in (select top 1 fecha_base from tbTapa order by id desc) and zona='1'"
--> set result = Cnn.Execute(sql)
if not result.eof and not result.bof then
%>

[virla]

alguno que me ayude plis

[virla]

ayuda plisssssss

[virla]

bueno ya lo arregle y les dejo cual fue mi solución
lo que hice fue poner el campo fecha en formato texto y en el codigo fue haci
sql = "SELECT * FROM tbDiario WHERE zona='1' and Fecha='"&ft&"'"

el tema era la variable que se escribia haci '"&ft&"'

gracias por los que quisieron ayudar a los demas tambien muchas gracias pero por la ayuda que no dieron

[u_goldman]

Bueno, no es personal, pero creo que hay que poner un poco de voluntad al menos, este poste tiene muchas respuestas que puedes ver muy cercanas a lo que estabas buscando hacer, pero recuerda que nosotros no vemos muchas cosas en tu código, este lugar es espectacular para aprender, pero hay que tener un poco de disposición para adaptar las ideas y hacer tus propias creaciones


Salu2,

[virla]

ok, muchas veces me han ayudado pero, desde hace un tiempo que veo poca voluntad, es mas para contestar la ultima respuesta solo tardo unos minutos y para las demas llevo mas de 3 dias.
ahora yo pregunto pasa algo, o no?

[u_goldman]

Pos no creo que pase nada, sucede de repente que si alguien te está ayudando es mejor no meterse para no confundir la idea, al menos eso creo, sobre todo si están cerca de la respuesta

Salu2,