Hi All,
I am not able to get the ModuleId of the module when the page loads using the below code.The below code is for a legend module developed in DNN 2.x which I am upgrading to 3.x.I have converted it to 3.x but I am not able to get the module Id.Please tell me the changes that I have to make in the below code so that I can get the module id.Below is the page_load function.Thanks in advance

Mallikarjun

Private Sub Page_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
            Dim strTitle, strDIVCSS, strTableCSS, strSrcPage, strHeight, strWidth As String
            If (Not Page.IsPostBack) Then

               Try
                   Dim objPortalModule As DotNetNuke.Entities.Modules.PortalModuleBase = DotNetNuke.UI.Containers.Container.GetPortalModuleBase(Me)
                   
                    'Sample code to get data
                    strWidth = myGetSetting(objPortalModule.ModuleId, "LegendWidth")
                   
                    strHeight = myGetSetting(objPortalModule.ModuleId, "LegendHeight")
                   
                    strSrcPage = myGetSetting(CType(Settings("ReqModuleId"), Integer), "LegendPage")
                   
                    strTitle = myGetSetting(objPortalModule.ModuleId, "LegendTitle")
                   
                    strDIVCSS = myGetSetting(objPortalModule.ModuleId, "LegendDIVCSS")
                   
                    strTableCSS = myGetSetting(objPortalModule.ModuleId, "LegendTableCSS")
                   
                Catch exc As Exception
                    ProcessModuleLoadException(Me, exc)
                End Try
            End If
            Try

                lblTitle.Text = strTitle
                LegendDIV.Attributes.Add("class", strDIVCSS)
                tblMain.Attributes.Add("class", strTableCSS)

                plHolder.Controls.Clear()
                plHolder.Controls.Add(New LiteralControl("<IFRAME marginWidth='0' marginHeight='0' frameborder='1' width=" & strWidth & " height=" & strHeight & " src='" & strSrcPage & "'></iframe>"))

            Catch exc As Exception
                ProcessModuleLoadException(Me, exc)
            End Try