In Version 2x of DNN, we made a customization to the IFrame module to pass in an EMPLID query string from another .net application. We added the following code to the DotNetNuke > Desktop Modules > Iframe > Iframe.ascx.vp file. Now I'm trying to upgrade to DNN 4.03 but I can't find where we would make this same customization. Any help you could provide would be useful.
Thanks
DNN 2* customization
Private Sub Page_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
Try
If (CType(Settings("src"), String)) <> "" Then
Dim FrameText As New StringBuilder
FrameText.Append("<iframe frameborder=""")
FrameText.Append(CType(Settings("border"), String))
FrameText.Append(""" src=""")
'001 Start --- JMichael March 29, 2005 Add custom code that will pass in EMPLID as QueryString
'------------- if EMPLID QueryString is detected
Dim oSRC As String
oSRC = CType(Settings("src"), String)
Dim oUser As UserInfo = (New UserController).GetUser(PortalId, UserId)
oSRC = oSRC.ToUpper
If oSRC.IndexOf("?EMPLID") > 0 Then
oSRC = Left(oSRC, oSRC.IndexOf("?")) + "?EMPLID=" & GetEmplid(oUser.Username.ToString)
End If
FrameText.Append(AddHTTP(oSRC))
'FrameText.Append(AddHTTP(CType(Settings("src"), String)))
'001 END ---------------------------------------------------------------------------
FrameText.Append(""" height=""")
FrameText.Append(CType(Settings("height"), String))
FrameText.Append(""" width=""")
FrameText.Append(CType(Settings("width"), String))
FrameText.Append(""" title=""")
FrameText.Append(CType(Settings("title"), String))
FrameText.Append(""" scrolling=""")
FrameText.Append(CType(Settings("scrolling"), String))
FrameText.Append(""">Your Browser Does Not Support Frames</iframe>")
lblIFrame.Text = FrameText.ToString
End If
Catch exc As Exception 'Module failed to load
ProcessModuleLoadException(Me, exc)
End Try
End Sub