' Name                         Default.aspx.vb
' Version                      1.07
' Modified                     09/04/2008 17:08:41
' Compiler Version             5.37.001

Imports System.Data
Imports Rocktime
Imports Rocktime.Core
Imports Rocktime.Base
Imports Rocktime.Base.Security

Partial Class Control_DefaultClass
	Inherits PageExClass

#Region "Page Events"

	Protected Sub Page_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load

		Security.CurrentUser.PageAccess(True, "Rocktime, Admin", 1)

		PreIsPostBackAction()
		If IsPostBack Then
			PostBackAction()
		Else
			NonPostBackAction()
		End If
		PostIsPostBackAction()

	End Sub

#End Region

#Region "Articles"

	Protected Sub btnMenuArticleAdd_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles btnMenuArticleAdd.Click

		PageRedirect("Articles/ArticleAdd.aspx", True)

	End Sub

	Protected Sub btnMenuArticleList_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles btnMenuArticleList.Click

		PageRedirect("Articles/ArticleList.aspx", True)

	End Sub

	Protected Sub btnMenuArticleSearch_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles btnMenuArticleSearch.Click

		PageRedirect("Articles/ArticleSearch.aspx", True)

	End Sub

#End Region

#Region "JobCategories"

    Protected Sub btnMenuJobCategoryAdd_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles btnMenuJobCategoryAdd.Click

        PageRedirect("JobCategories/JobCategoryAdd.aspx", True)

    End Sub

    Protected Sub btnMenuJobCategoryList_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles btnMenuJobCategoryList.Click

        PageRedirect("JobCategories/JobCategoryList.aspx", True)

    End Sub

    Protected Sub btnMenuJobCategorySearch_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles btnMenuJobCategorySearch.Click

        PageRedirect("JobCategories/JobCategorySearch.aspx", True)

    End Sub

#End Region

#Region "Jobs"

    Protected Sub btnMenuJobAdd_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles btnMenuJobAdd.Click

        PageRedirect("Jobs/JobAdd.aspx", True)

    End Sub

    Protected Sub btnMenuJobList_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles btnMenuJobList.Click

        PageRedirect("Jobs/JobList.aspx", True)

    End Sub

    Protected Sub btnMenuJobSearch_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles btnMenuJobSearch.Click

        PageRedirect("Jobs/JobSearch.aspx", True)

    End Sub

#End Region

#Region "Misc"

	Protected Sub PreIsPostBackAction()

	End Sub

	Protected Sub PostBackAction()

	End Sub

	Protected Sub NonPostBackAction()

	End Sub

	Protected Sub PostIsPostBackAction()

	End Sub

#End Region

End Class