Tema: *asp Y Sql*
Ver Mensaje Individual
  #5 (permalink)  
Antiguo 28/09/2006, 14:08
mary*
 
Fecha de Ingreso: septiembre-2006
Mensajes: 161
Antigüedad: 18 años, 7 meses
Puntos: 0
y para la pag que me va traer la consulta tengo consulta:


if IsDate(Request.Form("Fecha1")) and IsDate(Request.Form("Fecha2")) and IsDate(Request.Form("Hora1")) and IsDate(Request.Form("Hora2")) then
vFecha1= Request.Form("Fecha1")
vFecha2= Request.Form("Fecha2")
vHora1= Request.Form("Hora1")
vHora2= Request.Form("Hora2")

else
response.Redirect("inicRP.asp") 'ir a pagina anterior
end if

sConnStr = "Driver={SQL Server};Server=AUTOSORT\AUTOSORTSQL;Database=Rssql ;UID=sa;Password=sa;"
Set objConn = Server.CreateObject("ADODB.Connection")
objConn.Open sConnStr

'creamos tabla temporal
Set rsTest = Server.CreateObject("ADODB.Recordset")

strSQL_N = "SELECT * FROM VCT where (FECH BETWEEN '" & cdate(vFecha1) & "' AND '" & cdate(vFecha2) & "') AND (HRA BETWEEN '" & cdate(vHora1) & "' AND '" & cdate(vHora2) & "') "

'ABRO LA TABLA TEMPORAL
rsTest.ActiveConnection = objConn
rsTest.Open strSQL_N, objConn,2,2
rsTest.Requery

%>

<tr align="center" bgcolor="#F4F4F4">
<th width="150" height="32" valign="middle" bordercolor="#FFFFFF" bgcolor="#999999" scope="col"><div align="center" class="Estilo12">CODIGO</div></th>
<th width="300" bordercolor="#FFFFFF" bgcolor="#999999" scope="col"><div align="center" class="Estilo5 Estilo4"><strong>NOMBRE</strong></div></th>
<th width="155" bordercolor="#FFFFFF" bgcolor="#999999" scope="col"><div align="center" class="Estilo12">TIPO DE EQUIPO </div></th>
<th width="155" bordercolor="#FFFFFF" bgcolor="#999999" scope="col"><div align="center" class="Estilo12">CANTIDAD</div></th>


<%

do while not rsTest.EOF%>
<tr bgcolor="#F4F4F4">
<td width="150" height="22"><div align="center" class="Estilo4"><%=rsTest("CODE")%></div></td>
<td width="300"><div align="center" class="Estilo4"><%=rsTest("NAME")%></div></td>
<td width="155"><div align="center" class="Estilo4"><%=rsTest("TIPO")%></div></td>
<td width="155"><div align="center" class="Estilo4"><%=rsTest("CODE") %> </div></td>

</tr>
<% rsTest.MoveNext
loop%>
</table>
</form>
<table width="200" border="2" align="center" bordercolor="#333333">
<tr>
<td><div align="center"><span class="Estilo4"><%'=rsSUMA("TOTAL")%></span></div></td>
</tr>
</table>
<p align="center">&nbsp;</p>
<p align="center"><b><a href="InicRP.asp">Regresar</a></b></p>
<p align="center">&nbsp;</p>
</body>
</html>


***El problema es que no obtengo resultados...no se si sea mi bd...mi codigo en asp...o ambas...!!!