Changed forum address in component check dialog. Added Support Forum links to the Help menu. Moved Check for Updates to the Help menu. Changed website links in Help menu to load within mRemoteNG instead of launching an external browser.

2026-02-17 22:11:48 +08:00 · 2010-01-08 18:02:41 -06:00
parent dbf99ea512
commit 79b7c2d198
8 changed files with 82 additions and 37 deletions
--- a/mRemoteV1/App/App.Info.vb
+++ b/mRemoteV1/App/App.Info.vb
@@ -3,10 +3,11 @@ Imports System.Environment
 Namespace App
    Namespace Info
        Public Class General
-            Public Shared ReadOnly URLHome As String = "http://www.mRemoteNG.org/"
-            Public Shared ReadOnly URLDonate As String = "http://donate.mRemoteNG.org/"
-            Public Shared ReadOnly URLBugs As String = "http://bugs.mRemoteNG.org/"
-            Public Shared ReadOnly URLAnnouncement As String = "http://update.mRemoteNG.org/announcement.txt"
+            Public Shared ReadOnly URLHome As String = "http://www.mremoteng.org/"
+            Public Shared ReadOnly URLDonate As String = "http://donate.mremoteng.org/"
+            Public Shared ReadOnly URLForum As String = "http://forum.mremoteng.org/"
+            Public Shared ReadOnly URLBugs As String = "http://bugs.mremoteng.org/"
+            Public Shared ReadOnly URLAnnouncement As String = "http://update.mremoteng.org/announcement.txt"
            Public Shared ReadOnly LogFile As String = GetFolderPath(SpecialFolder.LocalApplicationData) & "\mRemoteNG.log"
            Public Shared ReadOnly HomePath As String = My.Application.Info.DirectoryPath
            Public Shared EncryptionKey As String = "mR3m"
@@ -25,7 +26,7 @@ Namespace App
        End Class

        Public Class Update
-            Public Shared ReadOnly URL As String = "http://update.mRemoteNG.org/"
+            Public Shared ReadOnly URL As String = "http://update.mremoteng.org/"
 #If DEBUG Then
            Public Shared ReadOnly File As String = "update-debug.txt"
 #Else
--- a/mRemoteV1/App/App.Runtime.vb
+++ b/mRemoteV1/App/App.Runtime.vb
@@ -1517,16 +1517,36 @@ Namespace App
 #End Region

 #Region "Misc"
+        Public Shared Sub GoToURL(ByVal URL As String)
+            Dim cI As New mRemote.Connection.Info
+
+            cI.Name = "Website"
+            cI.Hostname = URL
+            If URL.StartsWith("https:") Then
+                cI.Protocol = Connection.Protocol.Protocols.HTTPS
+            Else
+                cI.Protocol = Connection.Protocol.Protocols.HTTP
+            End If
+            cI.SetDefaultPort()
+            cI.IsQuicky = True
+
+            App.Runtime.OpenConnection(cI, mRemote.Connection.Info.Force.DoNotJump)
+        End Sub
+
        Public Shared Sub GoToWebsite()
-            Process.Start(App.Info.General.URLHome)
+            GoToURL(App.Info.General.URLHome)
        End Sub

        Public Shared Sub GoToDonate()
-            Process.Start(App.Info.General.URLDonate)
+            GoToURL(App.Info.General.URLDonate)
+        End Sub
+
+        Public Shared Sub GoToForum()
+            GoToURL(App.Info.General.URLForum)
        End Sub

        Public Shared Sub GoToBugs()
-            Process.Start(App.Info.General.URLBugs)
+            GoToURL(App.Info.General.URLBugs)
        End Sub

        Public Shared Sub Report(ByVal Text As String)
--- a/mRemoteV1/ChangeLog.txt
+++ b/mRemoteV1/ChangeLog.txt
@@ -8,7 +8,9 @@
  Changed filename delimiter in title bar from pipe to dash
  Changed default format for saving screenshot images to PNG
  Changed website addresses
-  Added Report a Bug to the Help menu
+  Added Report a Bug and Support Forum links to the Help menu
+  Moved Check for Updates to the Help menu
+  Changed website links in Help menu to load within mRemoteNG instead of launching an external browser

 1.50:
  Added the following formats to the "Save Connections As" function:
--- a/mRemoteV1/Forms/frmMain.Designer.vb
+++ b/mRemoteV1/Forms/frmMain.Designer.vb
@@ -59,7 +59,6 @@ Partial Class frmMain
        Me.mMenToolsExternalApps = New System.Windows.Forms.ToolStripMenuItem
        Me.mMenToolsPortScan = New System.Windows.Forms.ToolStripMenuItem
        Me.mMenToolsSep1 = New System.Windows.Forms.ToolStripSeparator
-        Me.mMenToolsUpdate = New System.Windows.Forms.ToolStripMenuItem
        Me.mMenToolsComponentsCheck = New System.Windows.Forms.ToolStripMenuItem
        Me.mMenToolsOptions = New System.Windows.Forms.ToolStripMenuItem
        Me.mMenInfo = New System.Windows.Forms.ToolStripMenuItem
@@ -83,6 +82,9 @@ Partial Class frmMain
        Me.cMenToolbarShowText = New System.Windows.Forms.ToolStripMenuItem
        Me.tmrShowUpdate = New System.Windows.Forms.Timer(Me.components)
        Me.tmrAutoSave = New System.Windows.Forms.Timer(Me.components)
+        Me.mMenToolsUpdate = New System.Windows.Forms.ToolStripMenuItem
+        Me.mMenInfoForum = New System.Windows.Forms.ToolStripMenuItem
+        Me.ToolStripSeparator2 = New System.Windows.Forms.ToolStripSeparator
        Me.msMain.SuspendLayout()
        Me.tsContainer.ContentPanel.SuspendLayout()
        Me.tsContainer.TopToolStripPanel.SuspendLayout()
@@ -312,7 +314,7 @@ Partial Class frmMain
        '
        'mMenTools
        '
-        Me.mMenTools.DropDownItems.AddRange(New System.Windows.Forms.ToolStripItem() {Me.mMenToolsSSHTransfer, Me.mMenToolsUVNCSC, Me.mMenToolsExternalApps, Me.mMenToolsPortScan, Me.mMenToolsSep1, Me.mMenToolsUpdate, Me.mMenToolsComponentsCheck, Me.mMenToolsOptions})
+        Me.mMenTools.DropDownItems.AddRange(New System.Windows.Forms.ToolStripItem() {Me.mMenToolsSSHTransfer, Me.mMenToolsUVNCSC, Me.mMenToolsExternalApps, Me.mMenToolsPortScan, Me.mMenToolsSep1, Me.mMenToolsComponentsCheck, Me.mMenToolsOptions})
        Me.mMenTools.Name = "mMenTools"
        Me.mMenTools.Size = New System.Drawing.Size(45, 20)
        Me.mMenTools.Text = "&Tools"
@@ -350,13 +352,6 @@ Partial Class frmMain
        Me.mMenToolsSep1.Name = "mMenToolsSep1"
        Me.mMenToolsSep1.Size = New System.Drawing.Size(170, 6)
        '
-        'mMenToolsUpdate
-        '
-        Me.mMenToolsUpdate.Image = Global.mRemote.My.Resources.Resources.Update
-        Me.mMenToolsUpdate.Name = "mMenToolsUpdate"
-        Me.mMenToolsUpdate.Size = New System.Drawing.Size(173, 22)
-        Me.mMenToolsUpdate.Text = "Update"
-        '
        'mMenToolsComponentsCheck
        '
        Me.mMenToolsComponentsCheck.Image = Global.mRemote.My.Resources.Resources.ComponentsCheck
@@ -373,7 +368,7 @@ Partial Class frmMain
        '
        'mMenInfo
        '
-        Me.mMenInfo.DropDownItems.AddRange(New System.Windows.Forms.ToolStripItem() {Me.mMenInfoHelp, Me.mMenInfoSep1, Me.mMenInfoBugReport, Me.mMenInfoDonate, Me.mMenInfoWebsite, Me.mMenInfoSep2, Me.mMenInfoAnnouncements, Me.mMenInfoAbout})
+        Me.mMenInfo.DropDownItems.AddRange(New System.Windows.Forms.ToolStripItem() {Me.mMenInfoHelp, Me.mMenInfoSep1, Me.mMenInfoWebsite, Me.mMenInfoDonate, Me.mMenInfoForum, Me.mMenInfoBugReport, Me.ToolStripSeparator2, Me.mMenInfoAnnouncements, Me.mMenToolsUpdate, Me.mMenInfoSep2, Me.mMenInfoAbout})
        Me.mMenInfo.Name = "mMenInfo"
        Me.mMenInfo.Size = New System.Drawing.Size(41, 20)
        Me.mMenInfo.Text = "&Help"
@@ -430,7 +425,7 @@ Partial Class frmMain
        Me.mMenInfoAbout.Image = Global.mRemote.My.Resources.Resources.mRemote
        Me.mMenInfoAbout.Name = "mMenInfoAbout"
        Me.mMenInfoAbout.Size = New System.Drawing.Size(179, 22)
-        Me.mMenInfoAbout.Text = "About"
+        Me.mMenInfoAbout.Text = "About mRemoteNG"
        '
        'mMenSep3
        '
@@ -545,6 +540,24 @@ Partial Class frmMain
        '
        Me.tmrAutoSave.Interval = 10000
        '
+        'mMenToolsUpdate
+        '
+        Me.mMenToolsUpdate.Image = Global.mRemote.My.Resources.Resources.Update
+        Me.mMenToolsUpdate.Name = "mMenToolsUpdate"
+        Me.mMenToolsUpdate.Size = New System.Drawing.Size(179, 22)
+        Me.mMenToolsUpdate.Text = "Check for Updates"
+        '
+        'mMenInfoForum
+        '
+        Me.mMenInfoForum.Name = "mMenInfoForum"
+        Me.mMenInfoForum.Size = New System.Drawing.Size(179, 22)
+        Me.mMenInfoForum.Text = "Support Forum"
+        '
+        'ToolStripSeparator2
+        '
+        Me.ToolStripSeparator2.Name = "ToolStripSeparator2"
+        Me.ToolStripSeparator2.Size = New System.Drawing.Size(176, 6)
+        '
        'frmMain
        '
        Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!)
@@ -583,7 +596,6 @@ Partial Class frmMain
    Friend WithEvents mMenFileSaveAs As System.Windows.Forms.ToolStripMenuItem
    Friend WithEvents mMenFileSep2 As System.Windows.Forms.ToolStripSeparator
    Friend WithEvents mMenFileExit As System.Windows.Forms.ToolStripMenuItem
-    Friend WithEvents mMenToolsUpdate As System.Windows.Forms.ToolStripMenuItem
    Friend WithEvents mMenToolsSep1 As System.Windows.Forms.ToolStripSeparator
    Friend WithEvents mMenToolsOptions As System.Windows.Forms.ToolStripMenuItem
    Friend WithEvents mMenInfoHelp As System.Windows.Forms.ToolStripMenuItem
@@ -628,5 +640,8 @@ Partial Class frmMain
    Friend WithEvents mMenInfoAnnouncements As System.Windows.Forms.ToolStripMenuItem
    Friend WithEvents mMenInfoSep2 As System.Windows.Forms.ToolStripSeparator
    Friend WithEvents mMenInfoBugReport As System.Windows.Forms.ToolStripMenuItem
+    Friend WithEvents ToolStripSeparator2 As System.Windows.Forms.ToolStripSeparator
+    Friend WithEvents mMenInfoForum As System.Windows.Forms.ToolStripMenuItem
+    Friend WithEvents mMenToolsUpdate As System.Windows.Forms.ToolStripMenuItem

 End Class
--- a/mRemoteV1/Forms/frmMain.resx
+++ b/mRemoteV1/Forms/frmMain.resx
@@ -124,8 +124,8 @@
  <data name="mMenViewConfig.Image" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
    <value>
        iVBORw0KGgoAAAANSUhEUgAAABAAAAAQCAYAAAAf8/9hAAAAAXNSR0IArs4c6QAAAARnQU1BAACxjwv8
-        YQUAAAAgY0hSTQAAeiYAAICEAAD6AAAAgOgAAHUwAADqYAAAOpgAABdwnLpRPAAAAAlwSFlzAAALCAAA
-        CwgBwL2l2gAAArhJREFUOE91U91LU3EYnt0GjUYSgv+EoDeCgXkhiuBAL7swoTWUEryYF2JXQlebTIlK
+        YQUAAAAgY0hSTQAAeiYAAICEAAD6AAAAgOgAAHUwAADqYAAAOpgAABdwnLpRPAAAAAlwSFlzAAALBwAA
+        CwcBtnMLwAAAArhJREFUOE91U91LU3EYnt0GjUYSgv+EoDeCgXkhiuBAL7swoTWUEryYF2JXQlebTIlK
        pA1bmfODND+DpqUzt5Vfm7NtZx9n52xnui9zm/m5p9/vlINcHnjhnPf83ud5n/d9fhIAkv9FQ0NDrU6n
        29fr9cnS0tKqq87lFQ8MDNxqaWm5oVKpjPFEEql0Gp2dnYb29vbrGo3m9mWgHIDBYGh7PzmZ1en1gtE4
        kgoLEYTCAmLxOE5OTzExMXHw2mAQTCZT9vmLF8oLIBFAJpNde/N2iGP5EOKJhBh70SjYIAchEsHu3h4O
@@ -143,8 +143,8 @@
  <data name="mMenViewSessions.Image" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
    <value>
        iVBORw0KGgoAAAANSUhEUgAAABAAAAAQCAYAAAAf8/9hAAAAAXNSR0IArs4c6QAAAARnQU1BAACxjwv8
-        YQUAAAAgY0hSTQAAeiYAAICEAAD6AAAAgOgAAHUwAADqYAAAOpgAABdwnLpRPAAAAAlwSFlzAAALCAAA
-        CwgBwL2l2gAAA4RJREFUOE9lk3tMk1cchg8a562VKXGZUxMNy8a8zM3bNIW1Omi/Xj5LKa2UYgvSyxDa
+        YQUAAAAgY0hSTQAAeiYAAICEAAD6AAAAgOgAAHUwAADqYAAAOpgAABdwnLpRPAAAAAlwSFlzAAALBwAA
+        CwcBtnMLwAAAA4RJREFUOE9lk3tMk1cchg8a562VKXGZUxMNy8a8zM3bNIW1Omi/Xj5LKa2UYgvSyxDa
        CrSFUq4lghTKrMMKBQ0mRggiMrIJjuDGNk2WbfES4oIgGqNRZ5TpGqmG9t0H/qNykifnknOe8+aXcyIA
        kNebfmPU9HRqdVZExMfL3yX+99jhrcHJMHnyfNazkaezy8dfhJoRDk++2sgIXqcwdjGZws5ZEunaEXnJ
        R78Dj2QuvLJI1EgWw7iNHUjZvlyaRcUQI/+jmQJvPItMcWjH/FW+xGX4rlSCs0UUHPFRMHNYSNswF+XK
--- a/mRemoteV1/Forms/frmMain.vb
+++ b/mRemoteV1/Forms/frmMain.vb
@@ -90,6 +90,7 @@ Public Class frmMain
        mMenToolsOptions.Text = Language.Base.Menu_Options
        mMenInfo.Text = Language.Base.Menu_Info
        mMenInfoHelp.Text = Language.Base.Menu_Help
+        mMenInfoForum.Text = Language.Base.Menu_Forum
        mMenInfoBugReport.Text = Language.Base.Menu_BugReport
        mMenInfoDonate.Text = Language.Base.Menu_Donate
        mMenInfoWebsite.Text = Language.Base.Menu_Website
@@ -476,6 +477,10 @@ Public Class frmMain
        App.Runtime.Windows.Show(UI.Window.Type.Help)
    End Sub

+    Private Sub mMenInfoForum_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles mMenInfoForum.Click
+        App.Runtime.GoToForum()
+    End Sub
+
    Private Sub mMenInfoBugReport_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles mMenInfoBugReport.Click
        App.Runtime.GoToBugs()
    End Sub
--- a/mRemoteV1/Language/Language.DE.vb
+++ b/mRemoteV1/Language/Language.DE.vb
@@ -102,7 +102,8 @@

        Public Const Menu_About As String = "Über"
        Public Const Menu_AddConnectionPanel As String = "Verbindungs Panel hinzufügen"
-        Public Const Menu_BugReport As String = "Bug Report"
+        Public Const Menu_Forum As String = "Support Forum" ' TODO: Translate
+        Public Const Menu_BugReport As String = "Bug Report" ' TODO: Translate
        Public Const Menu_Config As String = "Konfiguration"
        Public Const Menu_ConnectionPanels As String = "Verbindungs Panels"
        Public Const Menu_Connections As String = "Verbindungen"
@@ -360,11 +361,11 @@
        Public Const CcRDPOK As String = "Alle RDP Komponenten wurden gefunden und scheinen korrekt registriert zu sein."
        Public Const CcRDPFailed As String = "Um RDP korrekt betreiben können muss mindestens Remote Desktop Connection (Terminal Services Client) 6.0 installiert sein. Hier können sie die Software herunterladen: http://support.microsoft.com/kb/925876" & vbNewLine & _
                                            "Wenn sie RDP 6.0 bereits installiert haben und der Check noch immer fehlschlägt, versuchen sie die Datei mstscax.dll manuell zu registrieren. Öffnen sie hierzu den Ausführen Dialog (Start - Ausführen) und geben sie Folgendes ein: regsvr32 ""c:\windows\system32\mstscax.dll"" (Wobei c:\ ihr System-Laufwerk ist)." & vbNewLine & _
-                                            "Wenn sie noch immer Probleme mit RDP haben, konsultieren sie bitte das mRemote Forum: http://sourceforge.net/forum/forum.php?forum_id=677204"
+                                            "Wenn sie noch immer Probleme mit RDP haben, konsultieren sie bitte das mRemote Forum: http://forum.mremoteng.org/"
        Public Const CcVNCOK As String = "Alle VNC Komponenten wurden gefunden und scheinen korrekt registriert zu sein."
        Public Const CcVNCFailed As String = "VNC benötigt die Datei scvncctrl.dll (wird mitgeliefert). Diese muss registriert sein. Wenn sie eines der nicht-Setup Pakete verwenden muss dies manuell durchgeführt werden." & vbNewLine & _
                                            "Öffnen sie hierzu den Ausführen Dialog (Start - Ausführen) und geben sie Folgendes ein: regsvr32 ""c:\Programme\mRemote\scvncctrl.dll"" (Wobei c:\Programme\mRemote\ ihr mRemote Installations-Pfad ist)." & vbNewLine & _
-                                            "Wenn sie noch immer Probleme mit VNC haben, konsultieren sie bitte das mRemote Forum: http://sourceforge.net/forum/forum.php?forum_id=677204"
+                                            "Wenn sie noch immer Probleme mit VNC haben, konsultieren sie bitte das mRemote Forum: http://forum.mremoteng.org/"
        Public Const CcPuttyOK As String = "PuTTY wurde gefunden und scheint betriebsbereit zu sein."
        Public Const CcPuttyFailed As String = "Die Protokolle, SSH, Telnet, Rlogin und RAW benötigen PuTTY. PuTTY wird in allen mRemote Paketen mitgeliefert und befindet sich im Installations-Pfad." & vbNewLine & _
                                            "Bitte versichern sie sich dass sich die Datei Putty.exe in ihrem mRemote Installations-Pfad befindet (Standard: c:\Programme\mRemote\) oder dass sie einen korrekten Pfad in den Optionen (Extras - Optionen - Erweitert - Eigener PuTTY Pfad) angegeben haben."
@@ -372,17 +373,17 @@
        Public Const CcICAFailed As String = "ICA benötigt eine funktionierende Citrix Presentation Server Client Installation und dass die Datei wfica.ocx korrekt registriert ist. Hier können sie den Client herunterladen: http://www.citrix.com/download/" & vbNewLine & _
                                            "Wenn sie Citrix Presentation Server Client installiert haben und noch immer Probleme haben diesen Check erfolgreich abzuschließen, versuchen sie die Datei wfica.ocx manuell zu registrieren." & vbNewLine & _
                                            "Öffnen sie hierzu den Ausführen Dialog (Start - Ausführen) und geben sie Folgendes ein: regsvr32 ""c:\Programme\Citrix\ICA Client\wfica.ocx"" (Wobei c:\Programme\Citrix\ICA Client\ ihr Citrix Presentation Server Client Installations-Pfad ist)." & vbNewLine & _
-                                            "Wenn sie noch immer Probleme mit ICA haben, konsultieren sie bitte das mRemote Forum: http://sourceforge.net/forum/forum.php?forum_id=677204"
+                                            "Wenn sie noch immer Probleme mit ICA haben, konsultieren sie bitte das mRemote Forum: http://forum.mremoteng.org/"
        Public Const CcGeckoOK As String = "XULrunner wurde gefunden und scheint korrekt installiert zu sein."
        Public Const CcGeckoFailed As String = "Um die Gecko Rendering Engine benutzen zu können benötigen sie XULrunner 1.8.1.x und einen korrekt eingetragenen Pfad in den Optionen." & vbNewLine & _
                                            "Hier können sie XULrunner 1.8.1.3 herunterladen: ftp://ftp.mozilla.org/pub/xulrunner/releases/1.8.1.3/contrib/win32/" & vbNewLine & _
                                            "Wenn der Download abgeschlossen ist entpacken sie das Paket (Der Speicherort ist dabei ihnen überlassen). Als nächstes öffnen sie (in mRemote) Extras - Optionen - Erweitert und geben sie den korrekten Pfad im XULrunner Feld an." & vbNewLine & _
-                                            "Wenn sie noch immer Probleme mit der Gecko Engine in mRemote haben, konsultieren sie bitte das mRemote Forum: http://sourceforge.net/forum/forum.php?forum_id=677204"
+                                            "Wenn sie noch immer Probleme mit der Gecko Engine in mRemote haben, konsultieren sie bitte das mRemote Forum: http://forum.mremoteng.org/"
        Public Const CcEOLOK As String = "EOLWTSCOM wurde gefunden und scheint korrekt registriert zu sein."
        Public Const CcEOLFailed As String = "Das (RDP) Sessions feature benötigt die Datei eolwtscom.dll. Diese muss korrekt registriert sein." & vbNewLine & _
                                            "Alle mRemote Pakete beinhalten diese Datei, jedoch muss sie, wenn sie eines der nicht-Setup Pakete verwenden manuell registriert werden." & vbNewLine & _
                                            "Öffnen sie hierzu den Ausführen Dialog (Start - Ausführen) und geben sie Folgendes ein: regsvr32 ""c:\Programme\mRemote\eolwtscom.dll"" (Wobei c:\Programme\mRemote\ ihr mRemote Installations-Pfad ist)." & vbNewLine & _
-                                            "Wenn sie noch immer Probleme mit dem (RDP) Sessions Feature in mRemote haben, konsultieren sie bitte das mRemote Forum: http://sourceforge.net/forum/forum.php?forum_id=677204"
+                                            "Wenn sie noch immer Probleme mit dem (RDP) Sessions Feature in mRemote haben, konsultieren sie bitte das mRemote Forum: http://forum.mremoteng.org/"

        Public Const PropertiesWillOnlyBeSavedMRemoteXML As String = "(Diese Einstellungen werden nur gespeichert wenn sie mRemote XML als Dateiformat auswählen!)"
    End Class
--- a/mRemoteV1/Language/Language.EN.vb
+++ b/mRemoteV1/Language/Language.EN.vb
@@ -102,6 +102,7 @@

        Public Const Menu_About As String = "About"
        Public Const Menu_AddConnectionPanel As String = "Add Connection Panel"
+        Public Const Menu_Forum As String = "Support Forum"
        Public Const Menu_BugReport As String = "Report a Bug"
        Public Const Menu_Config As String = "Config"
        Public Const Menu_ConnectionPanels As String = "Connection Panels"
@@ -130,7 +131,7 @@
        Public Const Menu_SessionsScreenshots As String = "Sessions && Screenshots"
        Public Const Menu_SSHFileTransfer As String = "SSH File Transfer"
        Public Const Menu_Tools As String = "&Tools"
-        Public Const Menu_Update As String = "Update"
+        Public Const Menu_Update As String = "Check for Updates"
        Public Const Menu_View As String = "&View"
        Public Const Menu_Website As String = "Website"

@@ -360,11 +361,11 @@
        Public Const CcRDPOK As String = "All RDP components were found and seem to be registered properly."
        Public Const CcRDPFailed As String = "For RDP to work properly you need to have at least Remote Desktop Connection (Terminal Services Client) 6.0 installed. You can get it here: http://support.microsoft.com/kb/925876" & vbNewLine & _
                                     "If you have RDP 6.0 installed and the check still fails, try to register mstscax.dll manually. To do this open up the run dialog (Start - Run) and enter the following: regsvr32 ""c:\windows\system32\mstscax.dll"" (Where c:\ is your system drive)." & vbNewLine & _
-                                     "If you still have trouble getting RDP to work please consult the mRemoteNG forums at http://sourceforge.net/forum/forum.php?forum_id=677204"
+                                     "If you still have trouble getting RDP to work please consult the mRemoteNG Forum at http://forum.mremoteng.org/"
        Public Const CcVNCOK As String = "All VNC components were found and seem to be registered properly."
        Public Const CcVNCFailed As String = "VNC requires the scvncctrl.dll library to be registered. If you are using one of the none-setup packages like the portable package, this must be done manually." & vbNewLine & _
                                     "To do this open up the run dialog (Start - Run) and enter the following: regsvr32 ""c:\Program Files\mRemoteNG\scvncctrl.dll"" (Where c:\Program Files\mRemoteNG\ is the path to your mRemoteNG installation)." & vbNewLine & _
-                                     "If you are still not able to pass this check or use VNC in mRemoteNG please consult the forums at http://sourceforge.net/forum/forum.php?forum_id=677204"
+                                     "If you are still not able to pass this check or use VNC in mRemoteNG please consult the mRemoteNG Forum at http://forum.mremoteng.org/"
        Public Const CcPuttyOK As String = "The PuTTY executable was found and should be ready to use."
        Public Const CcPuttyFailed As String = "The SSH, Telnet, Rlogin and RAW protocols need PuTTY to work. PuTTY comes with every mRemoteNG package and is located in the installation path." & vbNewLine & _
                                     "Please make sure that either you have the Putty.exe in your mRemoteNG directory (default: c:\Program Files\mRemoteNG\) or that you specified a valid path to your PuTTY executable in the Options (Tools - Options - Advanced - Custom PuTTY path)"
@@ -372,17 +373,17 @@
        Public Const CcICAFailed As String = "ICA requires that the Citrix Presentation Server Client is installed and that the wfica.ocx library is registered. You can download the client here: http://www.citrix.com/download/" & vbNewLine & _
                                     "If you have the Citrix Presentation Server Client installed and the check still fails, try to register wfica.ocx manually." & vbNewLine & _
                                     "To do this open up the run dialog (Start - Run) and enter the following: regsvr32 ""c:\Program Files\Citrix\ICA Client\wfica.ocx"" (Where c:\Program Files\Citrix\ICA Client\ is the path to your Citrix Presentation Server Client installation)." & vbNewLine & _
-                                     "If you are still not able to pass this check or use ICA in mRemoteNG please consult the forums at http://sourceforge.net/forum/forum.php?forum_id=677204"
+                                     "If you are still not able to pass this check or use ICA in mRemoteNG please consult the mRemoteNG Forum at http://forum.mremoteng.org/"
        Public Const CcGeckoOK As String = "XULrunner was found and seems to be installed properly."
        Public Const CcGeckoFailed As String = "To use the Gecko Rendering Engine you need to have XULrunner 1.8.1.x and the path to the installation set in your Options." & vbNewLine & _
                                     "You can download XULrunner 1.8.1.3 here: ftp://ftp.mozilla.org/pub/xulrunner/releases/1.8.1.3/contrib/win32/" & vbNewLine & _
                                     "When you are finished downloading extract the package to a path of your choice. Then in mRemoteNG go to Tools - Options - Advanced and enter the correct path in the XULrunner path field." & vbNewLine & _
-                                     "If you are still not able to pass this check or use the Gecko Engine in mRemoteNG please consult the forums at http://sourceforge.net/forum/forum.php?forum_id=677204"
+                                     "If you are still not able to pass this check or use the Gecko Engine in mRemoteNG please consult the mRemoteNG Forum at http://forum.mremoteng.org/"
        Public Const CcEOLOK As String = "EOLWTSCOM was found and seems to be registered properly."
        Public Const CcEOLFailed As String = "The (RDP) Sessions feature requires that you have a registered copy of eolwtscom.dll on your system." & vbNewLine & _
                                     "mRemoteNG ships with this component but will not register it automatically unless you run the setup package." & vbNewLine & _
                                     "To do register it manually do this: Open up the run dialog (Start - Run) and enter the following: regsvr32 ""c:\Program Files\mRemoteNG\eolwtscom.dll"" (Where c:\Program Files\mRemoteNG\ is the path to your mRemoteNG installation)." & vbNewLine & _
-                                     "If you are still not able to pass this check or use the (RDP) Sessions feature in mRemoteNG please consult the forums at http://sourceforge.net/forum/forum.php?forum_id=677204"
+                                     "If you are still not able to pass this check or use the (RDP) Sessions feature in mRemoteNG please consult the mRemoteNG Forum at http://forum.mremoteng.org/"

        Public Const PropertiesWillOnlyBeSavedMRemoteXML As String = "(These properties will only be saved if you select mRemote/mRemoteNG XML as output file format!)"
    End Class