mas datos??? :S ayuda please!!!
este es el código del ciclo que uso para agregar parametros al command:
Código:
set cm.ActiveConnection=Conn
cm.CommandText=query
cm.Prepared=true
For i=0 to UBound(vectorParametros,1)-1
tamano=FormatNumber(vectorParametros(i,2))
Set parametro=cm.CreateParameter(vectorParametros(i,1),200,&H0001,tamano,vectorParametros(i,0))
cm.Parameters.Append parametro
Next