%
'Detalle de servicios
servicio = Request.QueryString("servicio")
If servicio = couServ Then
contServ = cont_couServ
folder = "couServ"
ElseIf servicio = couPrevDes Then
contServ = cont_couPrevDes
folder = "couPrevDes"
ElseIf servicio = accesoInt Then
contServ = cont_accesoInt
folder = "accesoInt"
ElseIf servicio = enlacePrivDed Then
contServ = cont_enlacePrivDed
folder = "enlacePrivDed"
ElseIf servicio = hostComElecCorp Then
contServ = cont_hostComElecCorp
folder = "hostComElecCorp"
ElseIf servicio = hostComElecEdGob Then
contServ = cont_hostComElecEdGob
folder = "hostComElecEdGob"
ElseIf servicio = hostValAgre Then
contServ = cont_hostValAgre
folder = "hostValAgre"
ElseIf servicio = hotSpot Then
contServ = cont_hotSpot
folder = "hotSpot"
ElseIf servicio = impRentRep Then
contServ = cont_impRentRep
folder = "impRentRep"
ElseIf servicio = intCorDedCo Then
contServ = cont_intCorDedCo
folder = "intCorDedCo"
ElseIf servicio = intCorDedEdGob Then
contServ = cont_intCorDedEdGob
folder = "intCorDedEdGob"
ElseIf servicio = intCorDedHo Then
contServ = cont_intCorDedHo
folder = "intCorDedHo"
ElseIf servicio = polizasCorp Then
contServ = cont_polizasCorp
folder = "polizasCorp"
ElseIf servicio = polizasEdGob Then
contServ = cont_polizasEdGob
folder = "polizasEdGob"
ElseIf servicio = redPriv Then
contServ = cont_redPriv & "
" & cont_enlacePrivDed
folder = "redPriv"
ElseIf servicio = segInfoCorp Then
contServ = cont_segInfoCorp
folder = "segInfoCorp"
ElseIf servicio = segInfoEdGob Then
contServ = cont_segInfoEdGob
folder = "segInfoEdGob"
ElseIf servicio = segInfoB Then
contServ = cont_segInfoB
folder = "segInfoB"
ElseIf servicio = servConm Then
contServ = cont_servConm
folder = "servConm"
ElseIf servicio = tarServ Then
contServ = cont_tarServ
folder = "tarServ"
ElseIf servicio = traVVM Then
contServ = cont_traVVM
folder = "traVVM"
ElseIf servicio = videoCserV Then
contServ = cont_videoCserV
folder = "videoCserV"
ElseIf servicio = videoMon Then
contServ = cont_videoMon
folder = "videoMon"
ElseIf servicio = centDatos Then
contServ = cont_centDatos
folder = "centDatos"
End If
%>