FOR-2275
Forum_ThreadMove.ascx.vb (around line 193)
Private Sub cmdMove_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles cmdMove.Click
Try
' See if user selected a forum to move thread to.
' Get the forumID where the user is moving the thread to
Dim newForumID As Integer = Int32.Parse(ctlForumLookup.ResultItems.TrimStart(";"c))
' If the new forumID is the same as the old ForumID
If newForumID = mOldForumID Then
' Show user error message
MessageCell.Controls.Add(UI.Skins.Skin.GetModuleMessageControl("", DotNetNuke.Services.Localization.Localization.GetString("OldForumSeleted.Text", Me.LocalResourceFile), DotNetNuke.UI.Skins.Controls.ModuleMessage.ModuleMessageType.RedError))
Exit Sub
Else
' It is not the same forumID, Move it
Dim ctlThread As New ThreadController
ctlThread.ThreadMove(mThreadID, newForumID)
ForumInfo.ResetForumInfo(newForumID)
ForumInfo.ResetForumInfo(mOldForumID)
ThreadInfo.ResetThreadInfo(mThreadID, mUserID)
' return to new forum page
Dim params As String() = New String(2) {"scope=threads", "forumid=" & newForumID.ToString, "mid=" & ModuleId}
Dim strURL As String = NavigateURL(TabId, "", params)
Response.Redirect(strURL)
End If
'Else
' ' User did not select a forum to move post to, show an error validator.
' lblInfo.Visible = True
'End If
Catch ex As Exception
LogException(ex)
Dim x As String
x = ex.ToString
End Try
End Sub