Foros del Web » Programando para Internet » ASP Clásico »

Problema FECHA - asp y Access

 Estas en el tema de Problema FECHA - asp y Access en el foro de ASP Clásico en Foros del Web. Hola listeros les hago una consulta estoy armando un sitio con una bd en access y dreamweaver. en la base de datos estoy poniendo un ...
  #1 (permalink)  
Antiguo 01/12/2005, 14:09
 
Fecha de Ingreso: noviembre-2005
Mensajes: 7
Antigüedad: 18 años, 6 meses
Puntos: 0
Problema FECHA - asp y Access
Hola listeros les hago una consulta
estoy armando un sitio con una bd en access y dreamweaver.
en la base de datos estoy poniendo un campo de tipo fecha ahi ingrese una fecha cualqueira 01/12/2005 bien ahora lo quei hago n dreamweaver es con una varialbe que me muestre el registro que tiene esa fecha.
por ejemplo http:midominio/fecha.asp?fecha=01/12/2005

bien aqui tengoe l problema por que caundo lo pruebo me sale este error:
Tipo de error:
Microsoft OLE DB Provider for ODBC Drivers (0x80040E07)
[Microsoft][Controlador ODBC Microsoft Access] No coinciden los tipos de datos en la expresión de criterios.
/eventos.asp, line 20
y en la linea 20 tengo
Recordset.Open()

ahora si yo pongo en la base de datos el cambo en tipo texto me lo toma lo mas bien a que le estoy errando??
  #2 (permalink)  
Antiguo 01/12/2005, 14:11
Avatar de reel  
Fecha de Ingreso: febrero-2004
Ubicación: Managua, Nicaragua
Mensajes: 496
Antigüedad: 20 años, 4 meses
Puntos: 1
Primero Access siempre usa la fecha en formato gringo osea MM/DD/YY.

Acá te dejo este link a lo mejor te sirve.

http://www.forosdelweb.com/f69/guardar-fecha-textbox-access-2000-a-354507/

Saludes
__________________
Leer es Saber, REEL.
Mi Blog
  #3 (permalink)  
Antiguo 01/12/2005, 14:12
Avatar de Fr@Nc3$c0  
Fecha de Ingreso: abril-2002
Ubicación: Barcelona (Spain)
Mensajes: 710
Antigüedad: 22 años, 2 meses
Puntos: 1
Hola!!
Puedes poner el código exacto o un poco mas que utilizas para llamar a ese registro de fecha?
<%=rs.fields("fecha")%>
__________________
Francesc Mula Calleja
Hay mucho por ver todavía...
  #4 (permalink)  
Antiguo 01/12/2005, 14:40
 
Fecha de Ingreso: noviembre-2005
Mensajes: 7
Antigüedad: 18 años, 6 meses
Puntos: 0
aqui va el codigo esta echo por dreamweaver
<%
Dim Recordset__MMColParam
Recordset__MMColParam = "1"
If (Request.QueryString("fecha") <> "") Then
Recordset__MMColParam = Request.QueryString("fecha")
End If
%>
<%
Dim Recordset
Dim Recordset_numRows

Set Recordset = Server.CreateObject("ADODB.Recordset")
Recordset.ActiveConnection = MM_foroconect_STRING
Recordset.Source = "SELECT * FROM eventos WHERE fecha >= '" + Replace(Recordset__MMColParam, "'", "''") + "'"
Recordset.CursorType = 0
Recordset.CursorLocation = 2
Recordset.LockType = 1
Recordset.Open()

Recordset_numRows = 0
%>
<%
Dim Repeat1__numRows
Dim Repeat1__index

Repeat1__numRows = 10
Repeat1__index = 0
Recordset_numRows = Recordset_numRows + Repeat1__numRows
%>
<%
Dim Repeat2__numRows
Dim Repeat2__index

Repeat2__numRows = 10
Repeat2__index = 0
Recordset2_numRows = Recordset2_numRows + Repeat2__numRows
%>


<html>
<head>
<title>Foro de las ciencias</title>
<meta http-equiv="" content="text/html; charset=iso-8859-1">
<meta http-equiv="" content="text/html; charset=iso-8859-1">
<meta http-equiv="" content="text/html; charset=iso-8859-1">
<meta http-equiv="" content="text/html; charset=iso-8859-1">
<style type="text/css">
<!--
@import url("css/estilos.css");
body {
margin-left: 0px;
margin-top: 0px;
margin-right: 0px;
margin-bottom: 0px;
}
.Estilo3 {font-size: 10px; font-family: Verdana, Arial, Helvetica, sans-serif; }
.Estilo16 {font-size: 9px; font-family: Verdana, Arial, Helvetica, sans-serif; }
-->
</style>
<meta http-equiv="" content="text/html; charset=iso-8859-1"><meta http-equiv="" content="text/html; charset=iso-8859-1"><meta http-equiv="Content-Type" content="text/html; charset="></head>

<body>
<table width="100%" height="100%" border="0" cellpadding="0" cellspacing="0">
<tr>
<td width="100%" height="100%" valign="top" background="imagenes/fondo.gif">
<table width="703" border="0" align="center" cellpadding="0" cellspacing="0" bgcolor="#F0F0F0" class="recuadro">
<tr>
<td height="1" colspan="2">
<!--#include file="top.asp" -->
</td>
</tr>
<tr bgcolor="#999999">
<td height="1" colspan="2"><img src="imagenes/trans.gif" width="20" height="1"></td>
</tr>
<tr>
<td width="190" height="219" valign="top" bgcolor="#F2F2F2"><div align="left">
<!--#include file="incmenugeneral.asp" -->
</div></td>
<td width="511" rowspan="2" valign="top" bgcolor="#F2F2F2"><div align="left"></div>
<table width="60%" height="425" border="0" cellpadding="0" cellspacing="0">
<tr>
<td height="20" colspan="5"><font color="#000033" size="2" face="Verdana, Arial, Helvetica, sans-serif"><img src="imagenes/cabeseraEventos.jpg" width="510" height="20"></font></td>
</tr>
<tr>
<td width="1"><img src="imagenes/trans.gif" width="1" height="1"></td>
<td width="507" height="404" colspan="4" valign="top" bgcolor="#FFFFFF"><table width="508" border="0">
<tr class="boton_troquel">
<td height="17" colspan="5"><strong>Eventos a realizar </strong></td>
</tr>

<%
While ((Repeat1__numRows <> 0) AND (NOT Recordset.EOF))
%>
<tr class="boton_troquel">
<td height="14"><span class="Estilo3"><%=(Recordset.Fields.Item("eventot itulo").Value)%></span></td>
<td><span class="Estilo3"><%=(Recordset.Fields.Item("eventoc ompleto").Value)%></span></td>
<td><span class="Estilo3"><%=(Recordset.Fields.Item("fecha") .Value)%></span></td>
<td><span class="Estilo3"><%=(Recordset.Fields.Item("imagen" ).Value)%></span></td>
<td><span class="Estilo3"><%=(Recordset.Fields.Item("link"). Value)%></span></td>
</tr>
<%
Repeat1__index=Repeat1__index+1
Repeat1__numRows=Repeat1__numRows-1
Recordset.MoveNext()
Wend
%>

</table>
<p>&nbsp;</p></td>
</tr>
</table></td>
</tr>
<tr>
<td height="163" valign="top" bgcolor="#F2F2F2"><p>&nbsp;</p></td>
</tr>
<tr bgcolor="#333333">
<td height="19" colspan="2"> <div align="center">
<!--#include file="incpie.asp" -->
</div></td>
</tr>
</table></td>
</tr>
</table>
</body>
</html>
<%
Recordset.Close()
Set Recordset = Nothing
%>
  #5 (permalink)  
Antiguo 01/12/2005, 14:55
Avatar de Fr@Nc3$c0  
Fecha de Ingreso: abril-2002
Ubicación: Barcelona (Spain)
Mensajes: 710
Antigüedad: 22 años, 2 meses
Puntos: 1
Porque pones:
Cita:
<%=(Recordset.Fields.Item("fecha") .Value)%>
Item que siginifica y value??

Pon esto, no??

Recordset.Fields("fecha")

Por cierto, la linea 20, deberías seguir la pauta de recordset:

Recordset.Open SQL, Conn

Este artículo te iría de fabula ^^
http://www.aspfacil.com/articulos/040401.asp


Saludos
__________________
Francesc Mula Calleja
Hay mucho por ver todavía...
  #6 (permalink)  
Antiguo 01/12/2005, 14:58
Avatar de Fr@Nc3$c0  
Fecha de Ingreso: abril-2002
Ubicación: Barcelona (Spain)
Mensajes: 710
Antigüedad: 22 años, 2 meses
Puntos: 1
Tambien veo que tienes código de más, tienes variables declaradas con nombres claves o que no deberias utilizar para variables, por ejemplo "recordset" es una palabra que ASP entiende como un termino y tu no puedes utilizarla como una variable, utiliza mejor "RS".
__________________
Francesc Mula Calleja
Hay mucho por ver todavía...
  #7 (permalink)  
Antiguo 01/12/2005, 15:20
 
Fecha de Ingreso: noviembre-2005
Mensajes: 7
Antigüedad: 18 años, 6 meses
Puntos: 0
fecha asp access
item y Value eso lo pone automaticamente el dreamweaver no se por que lo pone. pero ya he intentado de todo y no va no se por que.
una ultiam cosa y no te molesto mas, en access hay que cnfigurar algo o solo con poner el campo en FEcha/hora listo no?
yo dentro del campo tengo esta fecha 01/12/2005 esa fecha esta bien no? esta ingresada a mano.

si yo almodifica en el access me la vuelve a poner asi automaticamente.
  #8 (permalink)  
Antiguo 01/12/2005, 15:21
Avatar de Fr@Nc3$c0  
Fecha de Ingreso: abril-2002
Ubicación: Barcelona (Spain)
Mensajes: 710
Antigüedad: 22 años, 2 meses
Puntos: 1
Voy a cenar y vngo ^^
__________________
Francesc Mula Calleja
Hay mucho por ver todavía...
  #9 (permalink)  
Antiguo 01/12/2005, 15:47
Avatar de reel  
Fecha de Ingreso: febrero-2004
Ubicación: Managua, Nicaragua
Mensajes: 496
Antigüedad: 20 años, 4 meses
Puntos: 1
El problema ocurre al querer agregar con una consulta la fecha, porque la fecha tiene que estar en formato gringo por ejemplo:

Insert into tabla VALUES('01/30/2005')

Esa consulta daría error porque porque no la acepta el Jet (motor de base de datos de access)

Lo mismo pasaría al hacer esto:

Rs("Fecha") = "01/30/2005"

Digo esto porque me ha pasado muchas veces cuando esto programando y utilizo access.

Saludes
__________________
Leer es Saber, REEL.
Mi Blog
  #10 (permalink)  
Antiguo 01/12/2005, 16:09
Avatar de Fr@Nc3$c0  
Fecha de Ingreso: abril-2002
Ubicación: Barcelona (Spain)
Mensajes: 710
Antigüedad: 22 años, 2 meses
Puntos: 1
Sonrisa
Yo te recomiendo que te leas los articulos de http://www.aspfacil.com con ellos yo hace 2 semanas volvi a las andadas y aprendes rapido.

Solo ponte un poco y veras que hay ejemplos y explicaciones muy buenas.

No obstante, a pesar que no entiendo mucho de tu codigo porque esta con dreamweaver te pongo mas como deberia estar.
Te faltaria poner y verificar:
-el nombre de la base de datos
-el nombre de los campos de la base de datos

Código: 
<%
Dim cadena, RS, Conn, SQL, Recordset_numRows, Repeat1__index, Repeat1__numRows
cadena = 1
If (Request.QueryString("fecha") <> "") Then 
	cadena = Request.QueryString("fecha")
End If

Set Conn = Server.Createobject("ADODB.Connection")
Set RS = Server.CreateObject("ADODB.Recordset")
Conn.Open "Provider=Microsoft.Jet.OLEDB.4.0; Data Source=" & Server.MapPath("TU_BASE_DE_DATOS.mdb")
SQL = "SELECT * FROM eventos WHERE fecha >= '" + Replace(cadena, "'", "''") + "'"

RS.CursorType = 1
RS.LockType = 3
RS.Open SQL, Conn

Recordset_numRows = 0
Repeat1__numRows = 10
Repeat1__index = 0
Recordset_numRows = Recordset_numRows + Repeat1__numRows

Dim Repeat2__numRows
Dim Repeat2__index

Repeat2__numRows = 10
Repeat2__index = 0
Recordset2_numRows = Recordset2_numRows + Repeat2__numRows
%>

<html><head>
<title>Foro de las ciencias</title>
<meta http-equiv="" content="text/html; charset=iso-8859-1">
<style type="text/css">
<!--
@import url("css/estilos.css");
body {
margin-left: 0px;
margin-top: 0px;
margin-right: 0px;
margin-bottom: 0px;
}
.Estilo3 {font-size: 10px; font-family: Verdana, Arial, Helvetica, sans-serif; }
.Estilo16 {font-size: 9px; font-family: Verdana, Arial, Helvetica, sans-serif; }
-->
</style>
</head><body>
<table width="100%" height="100%" border="0" cellpadding="0" cellspacing="0">
<tr> 
<td width="100%" height="100%" valign="top" background="imagenes/fondo.gif">
<table width="703" border="0" align="center" cellpadding="0" cellspacing="0" bgcolor="#F0F0F0" class="recuadro">
<tr> 
<td height="1" colspan="2">
<!--#include file="top.asp" -->
</td>
</tr>
<tr bgcolor="#999999">
<td height="1" colspan="2"><img src="imagenes/trans.gif" width="20" height="1"></td>
</tr>
<tr> 
<td width="190" height="219" valign="top" bgcolor="#F2F2F2"><div align="left"> 
<!--#include file="incmenugeneral.asp" -->
</div></td>
<td width="511" rowspan="2" valign="top" bgcolor="#F2F2F2"><div align="left"></div>
<table width="60%" height="425" border="0" cellpadding="0" cellspacing="0">
<tr> 
<td height="20" colspan="5"><font color="#000033" size="2" face="Verdana, Arial, Helvetica, sans-serif"><img src="imagenes/cabeseraEventos.jpg" width="510" height="20"></font></td>
</tr>
<tr>
<td width="1"><img src="imagenes/trans.gif" width="1" height="1"></td>
<td width="507" height="404" colspan="4" valign="top" bgcolor="#FFFFFF"><table width="508" border="0">
<tr class="boton_troquel">
<td height="17" colspan="5"><strong>Eventos a realizar </strong></td>
</tr>

<% 
While Repeat1__numRows <> 0 AND RS.EOF
%>
<tr class="boton_troquel">
<td height="14"><span class="Estilo3"><%=RS.Fields("eventotitulo")%></span></td>
<td><span class="Estilo3"><%=RS.Fields("eventocompleto")%></span></td>
<td><span class="Estilo3"><%=RS.Fields("fecha")%></span></td>
<td><span class="Estilo3"><%=RS.Fields("imagen")%></span></td>
<td><span class="Estilo3"><%=RS.Fields("link")%></span></td>
</tr>
<% 
Repeat1__index=Repeat1__index+1
Repeat1__numRows=Repeat1__numRows-1
RS.MoveNext
Wend
%>

</table>
<p>&nbsp;</p></td>
</tr>
</table></td>
</tr>
<tr> 
<td height="163" valign="top" bgcolor="#F2F2F2"><p>&nbsp;</p></td>
</tr>
<tr bgcolor="#333333"> 
<td height="19" colspan="2"> <div align="center"> 
<!--#include file="incpie.asp" -->
</div></td>
</tr>
</table></td>
</tr>
</table>
</body>
</html>
<%
RS.Close
Set RS = Nothing
Conn.Close
Set Conn = Nothing
%>

SALUDOSSSS
__________________
Francesc Mula Calleja
Hay mucho por ver todavía...
Atención: Estás leyendo un tema que no tiene actividad desde hace más de 6 MESES, te recomendamos abrir un Nuevo tema en lugar de responder al actual.
Respuesta


« Tema Anterior | Próximo Tema »


La zona horaria es GMT -6. Ahora son las 20:45.