treaer info de mysql A ASP

[Zeptimo]

estoy tratando de cambiar la conexion de este codigo que esta conectado a sql

pero al tratar de conectarlo a mysql con su estored procedure no me traer nada,alguien me puede hacer el favor de checar el siguiente codigo????


AQUI SE DECLARAN LAS VARIABLES QUE VOY A UTILIZAR

ESTOS SON LOS PARAMETROS DEL STORED

pRuta
PFecha
PFechad

<%
dim strFecha1,strFecha2,intFecha1,intFecha2,strFechaHo y
dim lonRuta,TotalRegistros
TotalRegistros=0
lonRuta=0
strFechaHoy=date
Set objSesion = Server.CreateObject("libBase.classSesion")
if request.Form <> "" then
lonRuta=request.Form("cmbRutas")
strFecha1=request.form("FechaUno")
strFecha2=request.Form("FechaDos")
end if
if request.QueryString <> "" then
lonRuta=request.QueryString("pRuta")
strFecha1=request.QueryString("PFecha")
strFecha2=request.QueryString("PFechad")
end if
intFecha1= Mid(strFecha1, 7, 4) + Mid(strFecha1, 4, 2) + Mid(strFecha1, 1, 2)
intFecha2= Mid(strFecha2, 7, 4) + Mid(strFecha2, 4, 2) + Mid(strFecha2, 1, 2)

%>
ESTO VIENE SIENDO LOS CONTROLES A LOS QUE VOY A TECLEAR LA FECHA1 Y FECHA2 Y BUSCAR

EN OTRA PARTE LLENO EL COMBO PERO NO LO VOY A MOSTRAR


<td width="5%"><div align="right"><span class="Estilo5">Fecha:<span class="Estilo9"> </span> </span></div></td>
<td width="30%"><span class="Estilo5"> <span class="Estilo9">
<input name="FechaUno" id="FechaOne" type="text" size="10" maxlength="10" readonly="true" value="<%=strFecha1%>">
<img id="img_Fecha1" src="calendar.gif" height="16" width="16" alt="calendar"> a

<input name="FechaDos" id="FechaTwo" type="text" size="10" maxlength="10" readonly="true" value="<%=strFecha2%>">
<img id="img_Fecha2" src="calendar.gif" height="16" width="16" alt="calendar"> </span></span></td>

<td><span class="Estilo9"><span class="Estilo5">
<input name="btnBuscar" type="button" onClick='Refrescar(cmbRutas.value,FechaUno.value,F echaDos.value);' value="Buscar" >
</span></span></td>

AQUI MANDO LLAMAR AL STORED PROCEDURE DE MYSQL

Sub QueryA()
strQuery ="exec sp_lamickc" & pRuta & "," & objSesion.Comy(intFecha1) & "," & objSesion.Comy(intFecha2) & " "

End Sub

QUE ES LO QUE TENGO MAL..????

SALUDOS..

[Adler]

Hola

Creo que te estas confundiendo, StrFecha1 es una fecha, así que al hacer

intFecha1= Mid(strFecha1, 7, 4) + Mid(strFecha1, 4, 2) + Mid(strFecha1, 1, 2)

si StrFecha1 = 12/12/2008 lo que estas haciendo es sumar

2008 + 12 + 12 = 2032

por lo tanto el parámetro a buscar es 2032

Lo que deberías de hacer es concatenarlo

intFecha1= Mid(strFecha1, 7, 4) & "/" & Mid(strFecha1, 4, 2) & "/" & Mid(strFecha1, 1, 2)

Suerte

[Zeptimo]

y mi amigo ya le agregue lo que me dijiste pero ahora me marca este error:

Microsoft OLE DB Provider for ODBC Drivers (0x80040E14)
[MySQL][ODBC 5.1 Driver][mysqld-5.0.37]You have an error in your SQL syntax; check the manual that corresponds to your MySQL server version for the right syntax to use near 'exec sp_lamickc,'//','//'' at line 1
/portal/scvlamic.asp, line 282

esta es la linea 282:


Sub QueryA()
strQuery ="exec sp_lamickc" & pRuta & "," & objSesion.Comy(intFecha1) & "," & objSesion.Comy(intFecha2) & " "


End Sub
if lonruta <> 0 and intFecha1 <> "" and intFecha2 <> "" then
Dim intPares, varColorItem


Set objConn = Server.CreateObject("ADODB.Connection")
Set objRecordset = Server.CreateObject("ADODB.Recordset")


objConn.Open strConexionMySql

QueryA()


objRecordset.Open strQuery, objConn ------> linea 282

alguna otra idea.....


saludos...

[Adler]

Hola

Antes no te daba error, pero ahora sí. Lo único ha cambiado es que Fecha1 y 2 ya no traen un valor numérico, sino un valor con formato fecha

Suerte