[QUOTE
'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
lblIFrame.Text = FrameText.ToString
End If
Catch exc As Exception 'Module failed to load
ProcessModuleLoadException(Me, exc)
End Try
End Sub
[/QUOTE]
I'm trying to do the same thing, but am totally new to DNN. (I only installed 4.0.2 yesterday) I would like to pass in a parameter as well, but instead of EMPLID, i would like to pass in a complete ?URL=http://www.domain.com instead. Any Ideas where in the code I will need to go to dynamically display this passed URL parameter in the IFrame content area? I can upgrade to 4.3.x.