Products

Solutions

Resources

Partners

Community

Blog

About

QA

Ideas Test

New Community Website

Ordinarily, you'd be at the right spot, but we've recently launched a brand new community website... For the community, by the community.

Yay... Take Me to the Community!

Welcome to the DNN Community Forums, your preferred source of online community support for all things related to DNN.
In order to participate you must be a registered DNNizen

HomeHomeUsing DNN Platf...Using DNN Platf...Administration ...Administration ...How to display the last modified date in the footer of the website?How to display the last modified date in the footer of the website?
Previous
 
Next
New Post
12/16/2011 8:12 AM
 
I actually made a small module for this once.
It checked:
- tab/page last updated:
Dim objTabController As New TabController
Dim objTabInfo As TabInfo = objTabController.GetTab(PortalSettings.ActiveTab.TabID, PortalSettings.PortalId, True)
dates.Add(objTabInfo.LastModifiedonDate)

then it checked all the modules on the page:

Dim objModuleController As New ModuleController
Dim lstModuleInfo As Dictionary(Of Integer, ModuleInfo)
lstModuleInfo = objModuleController.GetTabModules(PortalSettings.ActiveTab.TabID)
Dim a As KeyValuePair(Of Integer, ModuleInfo)
Dim objModuleInfo As ModuleInfo
For Each a In lstModuleInfo
objModuleInfo = a.Value
If (objModuleInfo.IsDeleted = False) And (objModuleInfo.StartDate <= Now.Date) And (objModuleInfo.EndDate <= Now.Date) And (objModuleInfo.ModuleID <> Me.ModuleId) Then
objModuleController.GetModuleSettings(objModuleInfo.ModuleID)
'give the lastmodified date of the Module (not the TabModule I guess a bug in DNN)
dates.Add(objModuleInfo.LastModifiedOnDate)
End If
Next

And after that it checked the contents of some modules:

If lstModuleNames.Contains("DNN_HTML") Then
GetHTML()
End If

If lstModuleNames.Contains("DNN_Links") Then
GetLinks()
End If

If lstModuleNames.Contains("DNN_FAQs") Then
GetFAQs()
End If

If lstModuleNames.Contains("DNN_Announcements") Then
GetAnnouncements()
End If

etc...


So I made some stored proc. to get the last modified date for each type of module:

Public Sub GetHTML()
Dim HTMLdate As Date = Null.NullDate

HTMLdate = DotNetNuke.Data.DataProvider.Instance().ExecuteScalar("Captise_LastModified_TextHTML", TabId)

If HTMLdate <> Null.NullDate Then
dates.Add(HTMLdate)
End If
End Sub

And at last I got the newest date from the dates list:


 
New Post
12/16/2011 3:53 PM
 

Good day M Bouwman

could u share your  module with us pls. 

many thanks in advance.

 
New Post
1/17/2012 7:58 AM
 
I'm intersted to your article. I use DotNetNuke 4.9 and I want to display a Last Modified Date and User on the bottom of any page. Can you to share your solution with me or, please, can you provide me more informations? Thank you
 
Previous
 
Next
HomeHomeUsing DNN Platf...Using DNN Platf...Administration ...Administration ...How to display the last modified date in the footer of the website?How to display the last modified date in the footer of the website?


These Forums are dedicated to discussion of DNN Platform and Evoq Solutions.

For the benefit of the community and to protect the integrity of the ecosystem, please observe the following posting guidelines:

  1. No Advertising. This includes promotion of commercial and non-commercial products or services which are not directly related to DNN.
  2. No vendor trolling / poaching. If someone posts about a vendor issue, allow the vendor or other customers to respond. Any post that looks like trolling / poaching will be removed.
  3. Discussion or promotion of DNN Platform product releases under a different brand name are strictly prohibited.
  4. No Flaming or Trolling.
  5. No Profanity, Racism, or Prejudice.
  6. Site Moderators have the final word on approving / removing a thread or post or comment.
  7. English language posting only, please.
What is Liquid Content?
Find Out
What is Liquid Content?
Find Out
What is Liquid Content?
Find Out