Los Foros de ASPTutor.com
Home | Perfil | Registrarse | Temas Activos | Miembros | Buscar | FAQ
Usuario:
Password:
 Todos los Foros
 ASP
 Microsoft OLE DB Provider for ODBC Drivers (0x8004
 Foro Bloqueado  Tema Bloqueado


Autor Temas
T3R3S@
Starting Member

Mexico
10 Posts
Mensajes - 27 Aug 2008 :  18:45:41  Ver Perfil  Enviar Email
SOY NUEVA EN PROGRAMACION ASP
NECESITO ENVIAR DOS PARAMETRO DE FECHA AUN PROCEDIMIENTO ALMACENADO PERO ME MARCA EL SIGUINTE ERROR

Microsoft OLE DB Provider for ODBC Drivers (0x80040E14)
[Microsoft][SQL Native Client][SQL Server]Ejecutando SQL directamente, sin cursor.

EL CODIGO ES:


</head>

<body>

<!--#include Virtual ="Urbanos3\connsql.asp"-->

<%
Server.ScriptTimeOut = 10000
response.expires = 0
response.buffer = true

Mes = Request.QueryString("Meses")
Anio = Request.QueryString("Anio")

if len(Mes) = 0 then
Mes = Month(Date())
end if

if Anio = "" then
Anio= cstr(Year(date()))
end if

Anioo = mid(Anio, 3)

if Len(Mes) = 1 then
Mes = "0" & CStr(Mes)
else
Mes = CStr(Mes)
end if

fechaini = "01/"& Mes &"/"& Anio
fechafin = "31/"& Mes&"/"& Anio
fecini= Day(fechaini)& "/" & Month(fechaini)& "/" & Year(fechaini)

Response.Write "<table border='0' width='100%' cellspacing='0' cellpadding='0'>"
Response.Write "<tr>"
Response.Write "<td width='12%' align='center'><p align='center'><Strong>Movimientos del Urbano</Strong></p></td>"
Response.Write "</tr>"
Response.Write "</table>"

Response.Write "<table border='0' width='100%' cellspacing='0' cellpadding='0'>"
Response.Write "<tr>"
Response.Write "<p>&nbsp</p>"
Response.Write "<td width='70%'><p align='center'><strong><font face='Arial'>"& Mes &" "& Anio &"</font></strong></td>"
Response.Write "</tr>"
Response.Write "</table>"

Response.Write "<div align='center'><center>"
Response.Write "<table border='1' width='80%'>"
Response.Write "<tr>"
Response.Write "<td width='6%' align='center' bgcolor='#C0C0C0'><small><font face='Arial' color='#0000FF'><strong>Reg</strong></font></small></td>"
Response.Write "<td width='6%' align='center' bgcolor='#C0C0C0'><small><font face='Arial' color='#0000FF'><strong>Fecha PC</strong></font></small></td>"
Response.Write "<td width='6%' align='center' bgcolor='#C0C0C0'><font face='Arial' color='#0000FF'><small><strong>Punto</strong></small></font></td>"
Response.Write "<td width='6%' align='center' bgcolor='#C0C0C0'><font face='Arial' color='#0000FF'><small><strong>Velocidad</strong></small></font></td>"
Response.Write "<td width='6%' align='center' bgcolor='#C0C0C0'><font face='Arial' color='#0000FF'><small><strong>Suben puerta 1</strong></small></font></td>"
Response.Write "<td width='6%' align='center' bgcolor='#C0C0C0'><font face='Arial' color='#0000FF'><small><strong>Bajan Puerta 1</strong></small></font></td>"
Response.Write "<td width='6%' align='center' bgcolor='#C0C0C0'><font face='Arial' color='#0000FF'><small><strong>Suben puerta 2</strong></small></font></td>"
Response.Write "<td width='6%' align='center' bgcolor='#C0C0C0'><font face='Arial' color='#0000FF'><small><strong>Bajan puerta 2</strong></small></font></td>"
Response.Write "<td width='6%' align='center' bgcolor='#C0C0C0'><font face='Arial' color='#0000FF'><small><strong>Bloqueo puerta 1</strong></small></font></td>"
Response.Write "<td width='6%' align='center' bgcolor='#C0C0C0'><font face='Arial' color='#0000FF'><small><strong>Bloqueo puerta 2</strong></small></font></td>"
Response.Write "<td width='6%' align='center' bgcolor='#C0C0C0'><font face='Arial' color='#0000FF'><small><strong>NoCircuitos</strong></small></font></td>"
Response.Write "<td width='6%' align='center' bgcolor='#C0C0C0'><font face='Arial' color='#0000FF'><small><strong>Odometro</strong></small></font></td>"
Response.Write "</tr>"

fecfin= Day(fechafin)& "/" & Month(fechafin)& "/" & Year(fechafin)


cad="exec GENERAL "& fecini &","& fecfin &";"

Set rscp= Server.CreateObject("ADODB.Recordset")
rscp.Open cad, conn, 3 ,3
id = rscp("id")
bus = rscp("name")
sb1 = rscp("SUBEN1")
sb2 = rscp("BAJAN1")
ed1 = rscp("SUBEN2")
ed2 = rscp("BAJAN2")
bd1 = rscp("BLOQUEO1")
bd2 = rscp("BLOQUEO2")
pd1 = rscp("PABLOS1")
pd2 = rscp("PABLOS2")

rscp.Close
Response.Write "<tr>"
Response.Write "<td width='6%' align='Right'><strong><font face='Arial'><small>" & id &"</small></font></strong></td>"
Response.Write "<td width='6%' align='Right'><strong><font face='Arial'><small>" & bus & "</small></font></strong></td>"
Response.Write "<td width='6%' align='Left'><strong><font face='Arial'><small>" & sb1 & "</small></font></strong></td>"
Response.Write "<td width='6%' align='Right'><strong><font face='Arial'><small>" & ed1 & "</small></font></strong></td>"
Response.Write "<td width='6%' align='Left'><strong><font face='Arial'><small>" & sb2 & "</small></font></strong></td>"
Response.Write "<td width='6%' align='Right'><strong><font face='Arial'><small>" & ed2 & "</small></font></strong></td>"
Response.Write "<td width='6%' align='Left'><strong><font face='Arial'><small>" & bd1 & "</small></font></strong></td>"
Response.Write "<td width='6%' align='Right'><strong><font face='Arial'><small>" & bd2 & "</small></font></strong></td>"
Response.Write "<td width='6%' align='Right'><strong><font face='Arial'><small>" & pd1 & "</small></font></strong></td>"
Response.Write "<td width='6%' align='Left'><strong><font face='Arial'><small>" & pd2 & "</small></font></strong></td>"


Response.Write "</tr>"



%>
</body>

</html>

PORFIS ALGUIN QUE PUEDA AYUDARME SE LO AGREDCERE MUCHO

T3R3

DonGato
Moderator

España
263 Posts
Posted - 28 Aug 2008 :  02:41:13  Ver perfil  Enviar e-mail  Visit DonGato's Homepage
veo que siempre partes de una fecha del tipo 01/mm/aaaa hasta 31/mm/aaaa.
A ver si el problema lo tienes porque no todos los meses tienen 31 dias?
Otra cosa que se me ocurre, mira a ver a pasarle la fecha en modo ingles, mes/dia/año.

Suerte

Inicio Pagina

T3R3S@
Starting Member

Mexico
10 Posts
Posted - 28 Aug 2008 :  20:57:23  Ver perfil  Enviar e-mail
LOS MESE ESTAN VALIDDOS PARA QUE TOMEN YA SEA 30 O 31

Y EN LA BASE DE DATOS LA FECHA SE GUARDA COMO DD/MM/AA

T3R3Inicio Pagina

DonGato
Moderator

España
263 Posts
Posted - 01 Sep 2008 :  17:02:42  Ver perfil  Enviar e-mail  Visit DonGato's Homepage
Pues a mi no se me ocurre nada. Siento no poder ayudate.

Inicio Pagina

   
 Foro Bloqueado  Tema Bloqueado
Ir a:
Los Foros de ASPTutor.com Los Foros de ASPTutor.com
Ir al principio de la Página

 Imprimir Tema
 

Descargas de manuales¦ Ejemplos de código ¦ Artículos mas visitados ¦ Envía tu articulo ¦ Foros ¦
  Libro de visitas ¦Crea un enlace con ASPTutor 
 

    © 2001-Hasta hoy  Pedro Rufo Martín  contactar