mmmmmm, el error de "Pocos parámetros. Se esperaba 1" nunca había visto que ocurriera por causas diferentes a que se ha escrito mal una consulta SQL.
Yo lo que haría es intentar cambiar las formas de trabajar en este caso. Por ejemplo:
Código:
Set rs1 = oConn.Execute("SELECT * FROM " & tabla & " ORDER BY " & campo_nombre & " DESC;")
While NOT rs1.EOF
.....
Se puede cambiar por
Código:
set rs1= Server.CreateObject("adodb.recordset")
vSQL = "SELECT * FROM " & tabla & " ORDER BY " & campo_nombre & " DESC;"
rs1.Open vSQL, oConn, 3,3
'Incluso, aquí podrías hacer un:
Matriz = rs1.GetRows
rs1.close
set rs1 = nothing
For i=0 To UBound(Matriz,2)
....
Pueba Nono y nos dices
