mira Ronruby lo trabaje asi pero no funciona me imagino que lo estoy trabajando mal:
<html>
<head>
<title>Adquisiciones de Metodologia de la Investigación</title>
<link rel="stylesheet" type="text/css" href="estilo.css">
<style>
INPUT{
font-size: 8pt;
font-family: Arial;
border-style: solid;
border-width: 1px;
color: #5B6469;
border-color: #D5D8D9;
margin: 0;
padding: 0;
width: 40pt;
}
</style>
</head>
<body>
<?php
echo"<table border=0>";
echo"<form action='prueba.php' method='post'>";
echo"<tr><td>Introduzca la fecha desde (dia/mes/año) <INPUT TYPE='text' NAME='Fecha_des'></td>";
echo"<td>hasta <INPUT TYPE='text' NAME='Fecha_has'></td></tr>";
echo"<tr><td><input type='submit' name='consul' value='Consultar'></td></tr>";
echo"</form>";
echo"</table>";
if(isset($_POST['consul']))
{
$db = odbc_connect('base','','');
if (!$db) {
exit('Error en la conexión a la base de datos');
} else {
$fecha1=$_POST['Fecha_des'];
$fecha2=$_POST['Fecha_has'];
$consulta = "SELECT *FROM Fichas WHERE (((Fichas.Fecha) Between #$fecha1# And #$fecha2#) AND ((Fichas.Clasificacion)>='001' And (Fichas.Clasificacion)<='002'))
ORDER BY Fichas.Fecha DESC";
$result = odbc_exec($db,$consulta);
if (!$result) {
exit("Error en la consulta");
} else {
$valor=odbc_fetch_array($result);
if($valor['Fecha']==0)
{
print "<table align='center' ><tr height=500><td>No Hay Nuevas Adquisiciones</td></tr></table>";
}else{
echo " <LINK HREF='estilo.css' REL='stylesheet' TYPE='text/css'>\n";
print "<table border=\"1\" align='center' width=\"850\">\n <tr bgcolor='#669933'>
<th id='etiqueta1' class='etiqueta1'>Fecha</th>\n <th id='etiqueta1' class='etiqueta1'>Titulo</th>\n <th id='etiqueta1' class='etiqueta1'>Autor</th>\n <th id='etiqueta1' class='etiqueta1'>ISBN</th>\n <th id='etiqueta1' class='etiqueta1'>Clasificacion</th>\n <th id='etiqueta1' class='etiqueta1'>Año</th>\n </tr>\n";
reset($valor);
while($valor = odbc_fetch_array($result))
{
$Fecha = $valor['Fecha'];
$Titulo = $valor['Titulo'];
if(!$valor['Autor']){
$Autor = ('NA');
}else{
$Autor = $valor['Autor'];
}
if(!$valor['ISBN']){
$ISBN = ('NI');
}else{
$ISBN = $valor['ISBN'];
}
$Clasificacion = $valor['Clasificacion'];
$cadena=$valor['DatosFijos'];
$cadena_original = substr ($cadena, 6);
$longitud_cadena_original = strlen ($cadena_original);
$resto = $longitud_cadena_original -22;
$cadena_original = substr ($cadena, 6, $resto);
print " <tr>\n <td width=\"115\" align='center' id='etiqueta' class='etiqueta'>$Fecha</td>\n <td width=\"250\" align='center'id='etiqueta' class='etiqueta'>$Titulo</td>\n <td width=\"200\" align='center'id='etiqueta' class='etiqueta'>$Autor</td>\n <td width=\"115\" align='center'id='etiqueta' class='etiqueta'>$ISBN</td>\n <td width=\"115\" align='center'id='etiqueta' class='etiqueta'>$Clasificacion</td>\n <td width=\"60\" align='center'id='etiqueta' class='etiqueta'>$cadena_original</td>\n </tr>\n";
}
}
odbc_close($db);
print "</table>\n";
}
}
}
?>
</body>
</html>