Ver Mensaje Individual
  #7 (permalink)  
Antiguo 02/07/2008, 16:35
rishart
 
Fecha de Ingreso: enero-2008
Mensajes: 181
Antigüedad: 17 años, 3 meses
Puntos: 1
De acuerdo Respuesta: Eliminar de forma masiva

Cita:
Iniciado por David el Grande Ver Mensaje
Simplemente quita la última parte. Debe quedar así:
Código:
Set ITem = ListView1.ListItems.Add(, "", CStr(rs.Fields("id"))
Pues los parámetros del método Add son [Index], [Key], [Text], [Icon], [SmallIcon]. Así que en este caso estarás agregando un elemento a la lista con el texto que esté en el campo id de la tabla.
muchisimas gracias david el grande, ya he podido cargar la lista en el listview. ahora como les comento tengo otro codigo en el cual trato de eliminar los registros seleccionados en el listview pero me aparece el siguiente error. podrian decirme a que se refiere este error porfavor?

"Variable de tipi Object o la Variable de bloque With no esta establecida"

este es el codigo que estoy implementando en un boton para eliminar mis registros

Código:
Dim Item As ListItem

 Dim rs As New ADODB.Recordset
    Dim sql As String
    
    
    sql = "DELETE animales set numero = '" & Item.SubItems(0) & _
                         "', nombre = '" & ITem.SubItems(1) & _
                         "', raza = '" & ITem.SubItems(2) & _
                          "', numero = " & Abs(Item.Checked) & _
                            " where numero=" & CLng(Item.Tag) & ""
    
    Set rs = Crear_Recordset(cn, sql)

    Set rs = Nothing

porfavor alguien podria ayudarme lo que pasa es que soy algo nuevo en la materia y me interesa mucho espero alguien me guie o me indique en que estoy mal o que hacer, les agradesco de antemano y les envio un cordial saludo.