Helpful to verify reports of your own downtime, or to double check a downed website you are trying to access.
One of a set of tools we are providing to everyone as a way of saying thank you for being a part of the community.
Private Sub LoadPanelBar(ByVal _s As String) Dim sqlSelect As String = Nothing sqlSelect = "Select id,parentID, panelText,CASE maintenance WHEN 0 THEN navigateUrl ELSE '~/maintenance.aspx?mPage=' + REPLACE([panelText],' ','%20') END AS navigateUrl,imageUrl,expandedImageUrl from dbo.activeDirPanelBar where id in (" & _s & ") and active = 'True' order by webpagesort, sort" Using dbCon As SqlConnection = ngSqlConnectionString(Clng0(AppConfig("isProduction"))) dbCon.Open() Using adapter As New SqlDataAdapter(sqlSelect, dbCon) Using dt As New DataTable() adapter.Fill(dt) 'Set Panel Paramaters RadPanelBar1.DataTextField = "panelText" RadPanelBar1.DataNavigateUrlField = "navigateUrl" RadPanelBar1.DataFieldID = "id" RadPanelBar1.DataFieldParentID = "parentId" RadPanelBar1.Skin = "Web20" RadPanelBar1.Width = 204 RadPanelBar1.DataSource = dt RadPanelBar1.DataBind() End Using End Using End Using End Sub
Add your voice to the tech community where 5M+ people just like you are talking about what matters.
Join the community of 500,000 technology professionals and ask your questions.