<!--#include file="../inscripciones/conexion.asp"-->
<%
if (Session("activo")=true) then
conectar()
	Sql= "SELECT count(*) as son FROM trabajos WHERE orden Is not Null "
	rs.Open Sql, Conn
	do while not rs.eof
		cont=rs("son")
    rs.movenext
	loop
	rs.close
	cont=cont+1
Sql = "UPDATE trabajos SET orden="&cont& " WHERE codtrab="& request.QueryString("cod") & " and orden Is Null" 
RS = Conn.Execute(Sql)
	Conn.close
response.Redirect("orden_trabajos.asp")
end if
%>