Ver Mensaje Individual
  #1 (permalink)  
Antiguo 05/05/2008, 12:35
ciberpata
 
Fecha de Ingreso: junio-2003
Ubicación: Santiago de Compostela
Mensajes: 603
Antigüedad: 21 años, 10 meses
Puntos: 0
error: El objeto o proveedor no puede ejecutar la operación requerida al añadir regis

Hola:
Tengo un formulario que lista las noticias con el formato siguiente (la DB es Access):

registro1 posicion (campo texto)
registro2 posicion (campo texto)

y así sucesivamente, donde el usuario tiene que escribir una posicion

Lo que quiero conseguir es que al procesar el formulario se guarde cada posición en su correspondiente registro.

He hecho lo siguiente pero me da el error:

ADODB.Recordset error '800a0cb3'
El objeto o proveedor no puede ejecutar la operación requerida.

en la linea que esta en rojo.

Código:
Set Conn= Server.CreateObject("ADODB.Connection")
Set Command= Server.CreateObject("ADODB.Command")
Conn.open "DSN=squashsantiago.com"
Command.ActiveConnection=Conn 
Command.CommandType=adCmdText 

insertar=True
%>

<table class="gestion" align="center" cellspacing="0" cellpadding="0">

<%if insertar then
    For each parametro in Request.Form
        posicion=Request.form("posicion")
        
        if posicion => cint(7) then
            response.write "muestra el error"
            insertar = False
        else
            Command.ActiveConnection=Conn
            Command.CommandText= "select idnoticias from noticias"
            Set RsNoticias=Command.Execute ()
            
            response.write "select * from noticias where  idnoticias= " & RsNoticias("idnoticias") & " AND idusuarios=" & clave
            Command.CommandText=  "select * from noticias where  idnoticias= " & RsNoticias("idnoticias") & " AND idusuarios=" & clave
            Set RsNoticias1=Command.Execute ()
            RsNoticias1.addnew
            response.write "idnoticias =" & idnoticias & "<br>"
            if parametro="" or parametro= null then
                parametro=0
                RsNoticias1(parametro)=Request.form(parametro)
                RsNoticias1.Update
            end if
        end if
    Next

¿en que me estoy equivocando?
Gracias
__________________

Espero haber aprendido algo de tí.
A mi padre.