Line 51: Sub showContent(ByVal DomainID As Integer)
Line 52: Dim objpages As New Pages
Line 53: If HttpContext.Current.Items("PageName").ToString.Contains("-and-") Then
Line 54: objpages = objpages.GetPageByPageUrl(HttpContext.Current.Items("PageName").Replace("-", " ").Replace("and", "&"), DomainID)
Line 55: Else
|