Ver Mensaje Individual
  #7 (permalink)  
Antiguo 09/10/2007, 10:32
potenkin
 
Fecha de Ingreso: septiembre-2005
Mensajes: 202
Antigüedad: 19 años, 7 meses
Puntos: 0
Re: filtrar fecha de hoy

me da error, no se que es lo que hago mal


<%
Dim Recordset1__MMColParam
Recordset1__MMColParam = Year(hoy) & Month(hoy) & Day(hoy)
%>
<%
Dim Recordset1
Dim Recordset1_cmd
Dim Recordset1_numRows

Set Recordset1_cmd = Server.CreateObject ("ADODB.Command")
Recordset1_cmd.ActiveConnection = MM_neoparc_STRING
Recordset1_cmd.CommandText = "SELECT * FROM menu WHERE fecha = ?"
Recordset1_cmd.Prepared = true

Recordset1_cmd.Parameters.Append Recordset1_cmd.CreateParameter("param1", 133, 1, -1, Recordset1__MMColParam) 'error, ADODB.Command error '800a0d5d'
Set Recordset1 = Recordset1_cmd.Execute
Recordset1_numRows = 0
%>