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.
Public Function AddPageMetaData(ByVal strKeyName As String, ByVal strKeyValue As String, ByVal pgHeader As swuh.HtmlHead) As Boolean 'Local variables Dim blnReturn As Boolean = True Dim pgMetaData As New swuh.HtmlMeta Dim ltrNewLine As New Literal 'Local constants Const cstrPROC_FUNC_NAME As String = _cstrMODULE_NAME & ".AddPageMetaData" Try With ltrNewLine .Text = Environment.NewLine End With With pgMetaData .Name = strKeyName .Content = strKeyValue End With 'Create the meta data value With pgHeader .Controls.Add(pgMetaData) .Controls.Add(ltrNewLine) End With Catch ex As Exception Finally pgMetaData = Nothing ltrNewLine = Nothing End Try End Function
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.