Foros del Web » Programación para mayores de 30 ;) » Programación General » Visual Basic clásico »

Ayuda con funcion split

Estas en el tema de Ayuda con funcion split en el foro de Visual Basic clásico en Foros del Web. Que tal compañeros como estas, mi molestia e spor lo siguiente, tengo una pagina la cual me arroja una consulta de mis usuarios que estan ...
  #1 (permalink)  
Antiguo 09/05/2007, 10:41
 
Fecha de Ingreso: febrero-2007
Mensajes: 78
Antigüedad: 17 años, 2 meses
Puntos: 0
Mensaje Ayuda con funcion split

Que tal compañeros como estas, mi molestia e spor lo siguiente, tengo una pagina la cual me arroja una consulta de mis usuarios que estan activos, y para eliminarlos o editarlo los selecciono por medio de un checkbox, pero el problema es que si quiero tomar mas de 2 elementos me manda un error, entonces mi opinion es hacerlo por medio de un SPLIT, lo he checado en la red pero no me sale, como lo puedo hacer???


Código:
	dim sClaveUsuario
	dim sNombre 
	dim idPuesto
	dim idDepto
	dim sEmail
	dim idStatus
	
	'dim LoTckt 
	'dim loResultado

	sClaveUsuario  = request.Form("SClaveUsuario")
	idstatus = request.Form("txtstatus")
	
	'response.Write(sClaveUsuario)
	'	response.Write("status= "& idstatus)
	'	response.End()
	Set LoTckt = CreateObject("Tckt_Consultar.Cls_Consultar")
	set loResultado=nothing
	'Esta es la sentencia de insersión a la base de datos

	LoTckt.IdCatalogo =41
	
	
	
	LoTckt.IdUsuario = sClaveUsuario	
	LoTckt.Status = idstatus	
	
	
	
	LoTckt.Consultar

	If LoTckt.Resultado = "" Then
		Response.Write("<script>alert('Usuario actualizado con éxito'); ")
		Response.Write("document.location='usuarios1.asp'")
		Response.Write("</script>")
		'Response.Redirect("seguimiento.asp")
	else
		Response.Write("<script>alert('Error: " & LoTckt.Resultado & "')</script>")
	end if
	
	
%>
Saludos
Atención: Estás leyendo un tema que no tiene actividad desde hace más de 6 MESES, te recomendamos abrir un Nuevo tema en lugar de responder al actual.
Respuesta




La zona horaria es GMT -6. Ahora son las 10:44.