From a6fc49ac3b4102152a786d9fabc48cf85d234bf9 Mon Sep 17 00:00:00 2001 From: =?UTF-8?q?Vicen=C3=A7=20Masanas?= Date: Fri, 28 May 2021 10:07:44 +0200 Subject: [PATCH] Fix issues with multipage navigation --- Components/Layout/LayoutController.vb | 16 ++++++++++++++++ 1 file changed, 16 insertions(+) diff --git a/Components/Layout/LayoutController.vb b/Components/Layout/LayoutController.vb index 26164c1..f1297ca 100755 --- a/Components/Layout/LayoutController.vb +++ b/Components/Layout/LayoutController.vb @@ -1487,6 +1487,10 @@ Namespace Ventrian.NewsArticles iPtr = iPtr + 1 End While Else + If (IsNumeric(Request("PageID"))) Then + _pageId = Convert.ToInt32(Request("PageID")) + End If + If (_pageId = Null.NullInteger) Then _pageId = Pages(objArticle.ArticleID)(0).PageID End If @@ -1576,6 +1580,10 @@ Namespace Ventrian.NewsArticles iPtr = iPtr + 1 End While Else + If (IsNumeric(Request("PageID"))) Then + _pageId = Convert.ToInt32(Request("PageID")) + End If + If (_pageId = Null.NullInteger) Then _pageId = Pages(objArticle.ArticleID)(0).PageID End If @@ -2089,6 +2097,10 @@ Namespace Ventrian.NewsArticles If (Pages(objArticle.ArticleID).Count <= 1) Then objLink.Enabled = False Else + If (IsNumeric(Request("PageID"))) Then + _pageId = Convert.ToInt32(Request("PageID")) + End If + If (_pageId = Null.NullInteger) Then _pageId = CType(Pages(objArticle.ArticleID)(0), PageInfo).PageID End If @@ -2118,6 +2130,10 @@ Namespace Ventrian.NewsArticles If (Pages(objArticle.ArticleID).Count <= 1) Then objLink.Enabled = False Else + If (IsNumeric(Request("PageID"))) Then + _pageId = Convert.ToInt32(Request("PageID")) + End If + If (_pageId = Null.NullInteger) Then _pageId = CType(Pages(objArticle.ArticleID)(0), PageInfo).PageID End If