Código:
Con el cual me aparece el siguiente error.Set CoComando = Server.CreateObject("ADODB.Command") CoComando.ActiveConnection = Mi_STRING CoComando.CommandText = "insert mensajes (msg_id,msg_titulo,msg_emailautor,msg_temaID,msg_respuestaA,msg_fechaEnvio,msg_texto,Msg_respuestas) values (?, ?, ?, ?, ?, ?, ?, ?)" CoComando.CommandType = 1 Set p1 = CoComando.CreateParameter("ID", 3, 1) p1.value = ID Set p2 = CoComando.CreateParameter("titulo", 200, 1) ' dejar en 200 p2.value = "re: " & Left(Filtro(request("respuesta")),20) & "..." Set p3 = CoComando.CreateParameter("emailautor", 200, 1) p3.value = filtro(request("mail")) Set p4 = CoComando.CreateParameter("temaid", 3, 1) p4.value = request("foro_id") Set p5 = CoComando.CreateParameter("respuestaA", 200, 1) p5.value = request("respuestaA") Set p6 = CoComando.CreateParameter("fechaenvio", 200, 1) p6.value = Dia & " " & Hora Set p7 = CoComando.CreateParameter("respuesta", 200, 1) p7.value = filtro(request("respuesta")) Set p8 = CoComando.CreateParameter("Msg_respuestas", 200, 1) p8.value = filtro(request("respuesta")) CoComando.Parameters.Append p1 CoComando.Parameters.Append p2 CoComando.Parameters.Append p3 CoComando.Parameters.Append p4 CoComando.Parameters.Append p5 CoComando.Parameters.Append p6 CoComando.Parameters.Append p7 CoComando.Parameters.Append p8 Set ob_rs = CoComando.Execute
Cita:
Y en esa linea tengo.ADODB.Parameters error '800a0e7c'
Objeto Parameter mal definido. Se proporcionó información incompleta o incoherente.
/mi_ruta/template.asp, línea 118
Objeto Parameter mal definido. Se proporcionó información incompleta o incoherente.
/mi_ruta/template.asp, línea 118
Código:
CoComando.Parameters.Append p2
O sea, la falla está en ese parametro ?.. que puede ser?
Saludos!