<% Dim RutaHTTP Dim Favorito Dim Fecha Dim prom Dim cont Dim strTemp numArticulo="16917" Fecha = "10/20/2020" session("PalabrasClaves") = "gestión humana,recursos humanos,clima laboral,riesgo psicosocial,selección,desarrollo,salarios,compensación,evaluación de desempeño,indicadores de gestión humana,empleo" ' ' ' '' ' ' ' ' ' RutaHTTP = "http://" & Request.ServerVariables("SERVER_NAME") & Left(Request.ServerVariables("PATH_INFO"), InstrRev(Request.ServerVariables("PATH_INFO"), "/")) ' se valida de la url si contiene los parametro que dan acceso para los contenidos de evaluaciones de la plataforma de capacitacion RutaCompleta = Request.ServerVariables("HTTP_REFERER") Cadena1 = RutaCompleta Cadena2= "IFramePanel.asp" If InStr(Cadena1,Cadena2)>0 then EsPanel = 1 Else EsPanel = 0 End if 'fin validacion txtTituloPagina = "Roles y desafíos de liderazgo involucrados en la transformación económica" Session("txtTituloPagina")= trim(txtTituloPagina) If Request("print") = 1 then If Session("CodWebsite")=1 then %> <%=Application("website")%> - <%=txtTituloPagina%> <% Response.write( "") %>
<%=prObtieneBanner(Session("txtTituloPagina"),"TOPE")%>
<% else %> <%=Application("website")%> - <%=txtTituloPagina%> <% Response.write( "") %>
<%=prObtieneBanner(Session("txtTituloPagina"),"TOPE")%>
<% End if else if Request("IframePanel") <> 1 and Session("EsIframe")="" then Server.execute("../../../PaisEncabezadoArticulo.asp") else %> <%=Application("website")%> - <%=txtTituloPagina%> <% Response.write( "") %>
Planes de capacitación
<% end if end if session("PalabrasClaves") = "" %> <% if Request("IframePanel") <> 1 and Session("EsIframe")="" then if Request("print") <> 1 then Server.execute("../../../Include/Menu.asp") end if end if%> <% if Request("IframePanel") <> 1 then %> <% if Request("print") <> 1 then Response.write "" If Session("ID_Suscriptor") <> "" AND numArticulo <> "" Then Cadena_SQL = "SELECT COUNT(*) as cuantos FROM FavoritoArticulo WHERE CodSuscriptor=" & Session("ID_Suscriptor") & _ " AND CodObjetoSE=" & numArticulo ' Response.write (Cadena_SQL) Set RS = Conn.Execute(Cadena_SQL) If not RS.EOF Then If Rs("Cuantos")>0 Then favorito = "" Else favorito = "" End If Else favorito = "" End If Rs.close Set Rs=Nothing End If Response.write "" Response.write "" end if end if %>
    " & favorito & "    " If Session("CodWebsite")=1 then Response.write "          " End if Response.write "


<% Cadena_SQL = "select calificacion from calificaArticulo where CodObjetoSE = "&numarticulo Set RS = conn.execute(Cadena_SQL) cont = 0 prom = 0 Do while not RS.EOF prom = prom + RS("calificacion") RS.MoveNext cont = cont + 1 loop if cont=0 then cont=1 for i=1 to prom/cont Response.write " " next %> <% varAntetitulo1 = "Covid-19: Especial de reactivación empresarial en Colombia" varTitulo1 = "Roles y desafíos de liderazgo involucrados en la transformación económica" varAntetituloTitulo = ""&varAntetitulo1&"
"&varTitulo1&"" %> <% varSumario1 = "Los líderes no solo deben ser capaces de cambiar la mentalidad de sus equipos para poder navegar en tiempos de incertidumbre, sino también desarrollar un plan de recuperación lo suficientemente fuerte para superar la crisis. Aquel proyecto, junto a las adecuadas formas de dirigir, servirán como base para enfrentar el escenario pos covid-19." varSumario = ""&varSumario1&"" %> <% if Session("CodWebsite")=2 then if numArticulo < 10329 or numArticulo > 11708 then %>
<%=varAntetituloTitulo%>
<%=varSumario%>
<% end if%> <% else %>
<%=varAntetituloTitulo%>
<%=varSumario%>
<% end if %>

<% strAutor="Johanna Gómez Rivera
formadora de liderazgo y coach de The John Maxwell Team" Session("strAutor") = strAutor strTiempo="" If strAutor <> "" Then Response.write "Por " & strAutor & "" End If Session("Fecha") = Fecha If Fecha <> "" Then Response.write ("
" & Day(Fecha) & " de " &Meses(Month(Fecha)) & " de " & Year(Fecha)) End If If strTiempo <> "" Then%>
Tiempo estimado de lectura: <%'Response.write("
Tiempo estimado de lectura:" & " " & strTiempo) Response.write strTiempo End If %>
<% %>
Crear y mantener la confianza con los equipos de trabajo. Este es un aspecto imprescindible en el nuevo orden laboral que genera la emergencia sanitaria, aún más en un contexto donde las nuevas formas de trabajo, fusionadas con la virtualidad, van en aumento. Fomentarla durante la reactivación empresarial no es la excepción.

Johanna Gómez es formadora de liderazgo y coach de The John Maxwell Team. La experta destaca la flexibilidad y la empatía como aspectos clave que complementan el poder de la confianza. Conoce qué otras habilidades deberían añadirse o potenciarse durante esta etapa de recuperación y en un escenario pospandemia, además de los errores en los que podría caer un líder en la siguiente entrevista.

Si deseas ver el perfil completo de la experta, haz clic aquí.

<% RutaVideo="BancoMedios/Videos/liderazgoespecialreac.mp4" RutaImagenPoster = Replace("","","") widthVideo = "720" if widthVideo = "720" then heightVideo= "445" elseif widthVideo = "510" then heightVideo= "315" else heightVideo= "184" End if if VideoPlayer="" then VideoPlayer=1 else VideoPlayer = VideoPlayer +1 end if %>
  • Duración del video: 00:38:17 minutos






<% If EsPanel then datosconcatena = "IDUSUARIO=" & fnRequest("IDUSUARIO") & "&ITEM=" & fnRequest("ITEM")& "&CODPLANDESARROLLOUSUARIO=" & fnRequest("CODPLANDESARROLLOUSUARIO") %> <% End if if Request("IframePanel") <> 1 and Session("EsIframe")="" then Server.execute("../../../PaisPataArticulo.asp") else %>
<% end if If fnRequest("IdUsuario")="" then Session("EsIframe") = "" end if %>