Skip to content

HTTPS clone URL

Subversion checkout URL

You can clone with HTTPS or Subversion.

Download ZIP
branch: master
Fetching contributors…

Cannot retrieve contributors at this time

27 lines (14 sloc) 0.74 kb
Partial Class Menu
Inherits cBase
Protected Sub Page_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load
Me.finSession()
If Me.Session.Item("IdCargo") = "1" Then
Response.Write("<script language=javascript> parent.frames['menu'].location = 'Menu/MenuAdmin.htm';</script>")
ElseIf Me.Session.Item("IdCargo") = "2" Then
Response.Write("<script language=javascript> parent.frames['menu'].location = 'Menu/MenuTecTrans.htm';</script>")
ElseIf Me.Session.Item("IdCargo") = "3" Then
Response.Write("<script language=javascript> parent.frames['menu'].location = 'Menu/MenuTecBas.htm';</script>")
End If
End Sub
End Class
Jump to Line
Something went wrong with that request. Please try again.