Ver Mensaje Individual
  #30 (permalink)  
Antiguo 10/05/2005, 09:42
Avatar de Jose_minglein2
Jose_minglein2
 
Fecha de Ingreso: noviembre-2004
Mensajes: 2.344
Antigüedad: 20 años, 3 meses
Puntos: 8
Una vez eso, los cortas y lo pegas a un procedimiento que llamaremos CambiaServicios
en el page_load pondremos

if ispostback
if request.form.item("__eventtarget") = "guardar"
dim identificadores as string = request.form.item("__eventargument")
dim arrayidentificadores as array = identificadores.split("")
CambiaServicios(arrayidentificadores)
'Aqui no se si iria "" o " ", Neivan te lo podrá confirmar


end if
endif

private sub CambiaServicios(byval arr as array)

'Aqui tu code anterior

'Y ahora puedes hacer esto

dim sql as string
dim i as integer = 0
while i< arr.length
if i=0
sql = " where UsServIdServ<>" & arr(i)
else
sql += " and UsServIdServ<>" & arr(i)
end if
i+=1
endwhile

sql = "Delete from UsuariosServicios " + sql + " and UsServIdUs=" & ComboLogin.SelectedItem.Value

myCommand.Connection.Open();
mycommand.text = sql 'Creo que es text, pero bueno, el que indique la instrucción



'Con esto lo que hacemos es borrar los servicios que se hayan desquitado del listado

'Queda insertar los que se hayan seleccionados nuevos
end sub