More translations in App.Runtime, changed logfile syntax

This commit is contained in:
Andreas Rehm
2010-05-19 00:15:52 +08:00
committed by Riley McArdle
parent e1623a8157
commit 57c0236c66
5 changed files with 289 additions and 32 deletions

View File

@@ -1428,7 +1428,7 @@ Namespace App
#Region "Event Handlers"
Public Shared Sub Prot_Event_Disconnected(ByVal sender As Object, ByVal DisconnectedMessage As String)
Try
mC.AddMessage(Messages.MessageClass.InformationMsg, "Protocol Event Disconnected" & vbNewLine & "Message: " & DisconnectedMessage, True)
mC.AddMessage(Messages.MessageClass.InformationMsg, String.Format(My.Resources.strProtocolEventDisconnected, DisconnectedMessage), True)
Dim Prot As Connection.Protocol.Base = sender
If Prot.InterfaceControl.Info.Protocol = Connection.Protocol.Protocols.RDP Then
@@ -1437,14 +1437,14 @@ Namespace App
Dim ReasonDescription As String = Reason(1)
If ReasonCode > 3 Then
If ReasonDescription <> "" Then
mC.AddMessage(Messages.MessageClass.WarningMsg, "RDP Disconnected!" & vbNewLine & ReasonDescription & vbNewLine & "Error code " & ReasonCode & ".")
mC.AddMessage(Messages.MessageClass.WarningMsg, My.Resources.strRdpDisconnected & vbNewLine & ReasonDescription & vbNewLine & String.Format(My.Resources.strErrorCode, ReasonCode))
Else
mC.AddMessage(Messages.MessageClass.WarningMsg, "RDP Disconnected!" & vbNewLine & "Error code " & ReasonCode & ".")
mC.AddMessage(Messages.MessageClass.WarningMsg, My.Resources.strRdpDisconnected & vbNewLine & String.Format(My.Resources.strErrorCode, ReasonCode))
End If
End If
End If
Catch ex As Exception
mC.AddMessage(Messages.MessageClass.ErrorMsg, "Protocol Event Disconnected failed" & vbNewLine & ex.Message, True)
mC.AddMessage(Messages.MessageClass.ErrorMsg, String.Format(My.Resources.strProtocolEventDisconnectFailed, ex.Message), True)
End Try
End Sub
@@ -1452,15 +1452,14 @@ Namespace App
Try
Dim Prot As Connection.Protocol.Base = sender
mC.AddMessage(Messages.MessageClass.InformationMsg, "Protocol Event Closed", True)
mC.AddMessage(Messages.MessageClass.InformationMsg, My.Resources.strConnenctionCloseEvent, True)
If App.Editions.Spanlink.Enabled Then
mC.AddMessage(Messages.MessageClass.ReportMsg, "Connection to " & Prot.InterfaceControl.Info.Hostname & " via " & Prot.InterfaceControl.Info.Protocol.ToString & " closed by user " & My.User.Name & " (Description: " & Prot.InterfaceControl.Info.Description & "; User Field: " & Prot.InterfaceControl.Info.UserField & ")")
mC.AddMessage(Messages.MessageClass.ReportMsg, String.Format(My.Resources.strConnenctionClosedByUserDetail, Prot.InterfaceControl.Info.Hostname, Prot.InterfaceControl.Info.Protocol.ToString, My.User.Name, Prot.InterfaceControl.Info.Description, Prot.InterfaceControl.Info.UserField))
Else
mC.AddMessage(Messages.MessageClass.ReportMsg, "Connection to " & Prot.InterfaceControl.Info.Hostname & " via " & Prot.InterfaceControl.Info.Protocol.ToString & " closed by user " & My.User.Name)
mC.AddMessage(Messages.MessageClass.ReportMsg, String.Format(My.Resources.strConnenctionClosedByUser, Prot.InterfaceControl.Info.Hostname, Prot.InterfaceControl.Info.Protocol.ToString, My.User.Name))
End If
Prot.InterfaceControl.Info.OpenConnections.Remove(Prot)
If Prot.InterfaceControl.Info.OpenConnections.Count < 1 And Prot.InterfaceControl.Info.IsQuicky = False Then
@@ -1474,30 +1473,30 @@ Namespace App
End If
End If
Catch ex As Exception
mC.AddMessage(Messages.MessageClass.ErrorMsg, "Protocol Event Closed failed" & vbNewLine & ex.Message, True)
mC.AddMessage(Messages.MessageClass.ErrorMsg, My.Resources.strConnenctionCloseEventFailed & vbNewLine & ex.Message, True)
End Try
End Sub
Public Shared Sub Prot_Event_Connected(ByVal sender As Object)
Dim prot As mRemoteNG.Connection.Protocol.Base = sender
mC.AddMessage(Messages.MessageClass.InformationMsg, "Protocol Event Connected", True)
mC.AddMessage(Messages.MessageClass.ReportMsg, "Connection to " & prot.InterfaceControl.Info.Hostname & " via " & prot.InterfaceControl.Info.Protocol.ToString & " established by user " & My.User.Name & " (Description: " & prot.InterfaceControl.Info.Description & "; User Field: " & prot.InterfaceControl.Info.UserField & ")")
mC.AddMessage(Messages.MessageClass.InformationMsg, My.Resources.strConnectionEventConnected, True)
mC.AddMessage(Messages.MessageClass.ReportMsg, String.Format(My.Resources.strConnectionEventConnectedDetail, prot.InterfaceControl.Info.Hostname, prot.InterfaceControl.Info.Protocol.ToString, My.User.Name, prot.InterfaceControl.Info.Description, prot.InterfaceControl.Info.UserField))
End Sub
Public Shared Sub Prot_Event_ErrorOccured(ByVal sender As Object, ByVal ErrorMessage As String)
Try
mC.AddMessage(Messages.MessageClass.InformationMsg, "Protocol Event ErrorOccured", True)
mC.AddMessage(Messages.MessageClass.InformationMsg, My.Resources.strConnectionEventErrorOccured, True)
Dim Prot As Connection.Protocol.Base = sender
If Prot.InterfaceControl.Info.Protocol = Connection.Protocol.Protocols.RDP Then
If ErrorMessage > -1 Then
mC.AddMessage(Messages.MessageClass.WarningMsg, "RDP Error!" & vbNewLine & "Error Code: " & ErrorMessage & vbNewLine & "Error Description: " & Connection.Protocol.RDP.FatalErrors.GetError(ErrorMessage))
mC.AddMessage(Messages.MessageClass.WarningMsg, String.Format(My.Resources.strConnectionRdpErrorDetail, ErrorMessage, Connection.Protocol.RDP.FatalErrors.GetError(ErrorMessage)))
End If
End If
Catch ex As Exception
mC.AddMessage(Messages.MessageClass.ErrorMsg, "Protocol Event ErrorOccured failed" & vbNewLine & ex.Message, True)
mC.AddMessage(Messages.MessageClass.ErrorMsg, My.Resources.strConnectionEventConnectionFailed & vbNewLine & ex.Message, True)
End Try
End Sub
#End Region
@@ -1568,7 +1567,7 @@ Namespace App
sWr.WriteLine(Text)
sWr.Close()
Catch ex As Exception
mC.AddMessage(Messages.MessageClass.ErrorMsg, "Writing to report file failed!")
mC.AddMessage(Messages.MessageClass.ErrorMsg, My.Resources.strLogWriteToFileFailed)
End Try
End Sub
@@ -1584,7 +1583,7 @@ Namespace App
Return True
Catch ex As Exception
mC.AddMessage(Messages.MessageClass.ErrorMsg, "Couldn't save report to final location. (App.Runtime.SaveReport)" & vbNewLine & ex.Message, True)
mC.AddMessage(Messages.MessageClass.ErrorMsg, My.Resources.strLogWriteToFileFinalLocationFailed & vbNewLine & ex.Message, True)
Return False
End Try
End Function
@@ -1607,7 +1606,7 @@ Namespace App
ChangeMainFormText(txt)
Catch ex As Exception
mC.AddMessage(Messages.MessageClass.ErrorMsg, "Setting main form text failed" & vbNewLine & ex.Message, True)
mC.AddMessage(Messages.MessageClass.ErrorMsg, My.Resources.strSettingMainFormTextFailed & vbNewLine & ex.Message, True)
End Try
End Sub
@@ -1665,7 +1664,7 @@ Namespace App
Private Shared Sub SQLUpdateCheckFinished(ByVal UpdateAvailable As Boolean)
If UpdateAvailable = True Then
mC.AddMessage(Messages.MessageClass.InformationMsg, "SQL Update check finished and there is an update available! Going to refresh connections.", True)
mC.AddMessage(Messages.MessageClass.InformationMsg, My.Resources.strSqlUpdateCheckUpdateAvailable, True)
LoadConnectionsBG()
End If
End Sub

View File

@@ -1097,7 +1097,7 @@ Wenn Sie noch immer Probleme mit VNC haben, konsultieren Sie bitte das mRemoteNG
</data>
<data name="strCcPuttyFailed" xml:space="preserve">
<value>Die Protokolle, SSH, Telnet, Rlogin und RAW benötigen PuTTY. PuTTY wird in allen mRemote Paketen mitgeliefert und befindet sich im Installations-Pfad.
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.</value>
Bitte versichern Sie sich, dass sich die Datei Putty.exe in ihrem mRemote Installations-Pfad befindet (Standard: c:\Programme\mRemoteNG\) oder dass Sie einen korrekten Pfad in den Optionen (Extras - Optionen - Erweitert - Eigener PuTTY Pfad) angegeben haben.</value>
</data>
<data name="strCcICAOK" xml:space="preserve">
<value>Alle ICA Komponenten wurden gefunden und scheinen korrekt registriert zu sein.
@@ -1986,4 +1986,60 @@ Starte mit neuer Datei.</value>
<data name="strVncSetPropsFailed" xml:space="preserve">
<value>Setzen der VNC Parameter fehlgeschlagen!</value>
</data>
<data name="strRdpDisconnected" xml:space="preserve">
<value>RDP Verbindung getrennt!</value>
</data>
<data name="strErrorCode" xml:space="preserve">
<value>Fehler Nummer {0}.</value>
</data>
<data name="strConnenctionEventDisconnected" xml:space="preserve">
<value>Protokoll Ereignis Verbindung getrennt.
Nachricht:
{0}</value>
</data>
<data name="strConnenctionEventDisconnectFailed" xml:space="preserve">
<value>Protokoll Ereignis Trennen der Verbindung fehlgeschlagen!
{0}</value>
</data>
<data name="strConnenctionClosedByUserDetail" xml:space="preserve">
<value>Verbindung zu {0} mit {1} wurde vom Benutzer {2} getrennt. (Beschreibung: "{3}"; Benutzer Feld: "{4}")</value>
</data>
<data name="strConnenctionClosedByUser" xml:space="preserve">
<value>Verbindung zu {0} mit {1} wurde vom Benutzer {2} getrennt. (Description: " &amp; Prot.InterfaceControl.Info.Description &amp; "; User Field: " &amp; Prot.InterfaceControl.Info.UserField &amp; ")"</value>
</data>
<data name="strConnenctionCloseEvent" xml:space="preserve">
<value>Ereignis Verbindung beenden</value>
</data>
<data name="strConnenctionCloseEventFailed" xml:space="preserve">
<value>Ereignis Verbindung beenden fehlgeschlagen!</value>
</data>
<data name="strConnectionEventConnected" xml:space="preserve">
<value>Ereignis Verbindung hergestellt</value>
</data>
<data name="strConnectionEventConnectedDetail" xml:space="preserve">
<value>Verbindung zu "{0}" mit "{1}" hergestellt von Benutzer "{2}" (Beschreibung: "{3}"; Benutzer Feld: "{4}")</value>
</data>
<data name="strConnectionEventErrorOccured" xml:space="preserve">
<value>Ein Protokoll Ereignis Fehler ist aufgetreten!</value>
</data>
<data name="strConnectionEventConnectionFailed" xml:space="preserve">
<value>Verbindung fehlgeschlagen!</value>
</data>
<data name="strConnectionRdpErrorDetail" xml:space="preserve">
<value>RDP Fehler!
Fehler Code: {0}
Fehler Beschreibung: {1}</value>
</data>
<data name="strLogWriteToFileFailed" xml:space="preserve">
<value>Schreiben des Report.log fehlgeschlagen!</value>
</data>
<data name="strLogWriteToFileFinalLocationFailed" xml:space="preserve">
<value>Kann das Report.log nicht im Zielordner speichern!</value>
</data>
<data name="strSettingMainFormTextFailed" xml:space="preserve">
<value>Setzen der Hauptformular Texte fehlgeschlagen!</value>
</data>
<data name="strSqlUpdateCheckUpdateAvailable" xml:space="preserve">
<value>SQL Aktualisierungsprüfung beendet und es existiert eine Aktualisierung! Aktualisiere die Verbindungsdaten.</value>
</data>
</root>

View File

@@ -1670,6 +1670,42 @@ Namespace My.Resources
End Get
End Property
'''<summary>
''' Sucht eine lokalisierte Zeichenfolge, die Protocol Event Connected ähnelt.
'''</summary>
Friend ReadOnly Property strConnectionEventConnected() As String
Get
Return ResourceManager.GetString("strConnectionEventConnected", resourceCulture)
End Get
End Property
'''<summary>
''' Sucht eine lokalisierte Zeichenfolge, die Connection to &quot;{0}&quot; via &quot;{1}&quot; established by user &quot;{2}&quot; (Description: &quot;{3}&quot;; User Field: &quot;{4}&quot;) ähnelt.
'''</summary>
Friend ReadOnly Property strConnectionEventConnectedDetail() As String
Get
Return ResourceManager.GetString("strConnectionEventConnectedDetail", resourceCulture)
End Get
End Property
'''<summary>
''' Sucht eine lokalisierte Zeichenfolge, die Conenction failed! ähnelt.
'''</summary>
Friend ReadOnly Property strConnectionEventConnectionFailed() As String
Get
Return ResourceManager.GetString("strConnectionEventConnectionFailed", resourceCulture)
End Get
End Property
'''<summary>
''' Sucht eine lokalisierte Zeichenfolge, die Protocol Event ErrorOccured ähnelt.
'''</summary>
Friend ReadOnly Property strConnectionEventErrorOccured() As String
Get
Return ResourceManager.GetString("strConnectionEventErrorOccured", resourceCulture)
End Get
End Property
'''<summary>
''' Sucht eine lokalisierte Zeichenfolge, die Opening connection failed! ähnelt.
'''</summary>
@@ -1688,6 +1724,17 @@ Namespace My.Resources
End Get
End Property
'''<summary>
''' Sucht eine lokalisierte Zeichenfolge, die RDP error!
'''Error Code: {0}
'''Error Description: {1} ähnelt.
'''</summary>
Friend ReadOnly Property strConnectionRdpErrorDetail() As String
Get
Return ResourceManager.GetString("strConnectionRdpErrorDetail", resourceCulture)
End Get
End Property
'''<summary>
''' Sucht eine lokalisierte Zeichenfolge, die Connections ähnelt.
'''</summary>
@@ -1770,6 +1817,42 @@ Namespace My.Resources
End Get
End Property
'''<summary>
''' Sucht eine lokalisierte Zeichenfolge, die Connection to {0} via {1} closed by user {2}. ähnelt.
'''</summary>
Friend ReadOnly Property strConnenctionClosedByUser() As String
Get
Return ResourceManager.GetString("strConnenctionClosedByUser", resourceCulture)
End Get
End Property
'''<summary>
''' Sucht eine lokalisierte Zeichenfolge, die Connection to {0} via {1} closed by user {2}. (Description: &quot;{3}&quot;; User Field: &quot;{4}&quot;) ähnelt.
'''</summary>
Friend ReadOnly Property strConnenctionClosedByUserDetail() As String
Get
Return ResourceManager.GetString("strConnenctionClosedByUserDetail", resourceCulture)
End Get
End Property
'''<summary>
''' Sucht eine lokalisierte Zeichenfolge, die Connection Event Closed ähnelt.
'''</summary>
Friend ReadOnly Property strConnenctionCloseEvent() As String
Get
Return ResourceManager.GetString("strConnenctionCloseEvent", resourceCulture)
End Get
End Property
'''<summary>
''' Sucht eine lokalisierte Zeichenfolge, die Connection Event Closed failed! ähnelt.
'''</summary>
Friend ReadOnly Property strConnenctionCloseEventFailed() As String
Get
Return ResourceManager.GetString("strConnenctionCloseEventFailed", resourceCulture)
End Get
End Property
'''<summary>
''' Sucht eine lokalisierte Zeichenfolge, die Couldn&apos;t create new connections file! ähnelt.
'''</summary>
@@ -1923,6 +2006,15 @@ Namespace My.Resources
End Get
End Property
'''<summary>
''' Sucht eine lokalisierte Zeichenfolge, die Error code {0}. ähnelt.
'''</summary>
Friend ReadOnly Property strErrorCode() As String
Get
Return ResourceManager.GetString("strErrorCode", resourceCulture)
End Get
End Property
'''<summary>
''' Sucht eine lokalisierte Zeichenfolge, die Errors ähnelt.
'''</summary>
@@ -2661,6 +2753,24 @@ Namespace My.Resources
End Get
End Property
'''<summary>
''' Sucht eine lokalisierte Zeichenfolge, die Writing to report file failed! ähnelt.
'''</summary>
Friend ReadOnly Property strLogWriteToFileFailed() As String
Get
Return ResourceManager.GetString("strLogWriteToFileFailed", resourceCulture)
End Get
End Property
'''<summary>
''' Sucht eine lokalisierte Zeichenfolge, die Couldn&apos;t save report to final location. ähnelt.
'''</summary>
Friend ReadOnly Property strLogWriteToFileFinalLocationFailed() As String
Get
Return ResourceManager.GetString("strLogWriteToFileFinalLocationFailed", resourceCulture)
End Get
End Property
'''<summary>
''' Sucht eine lokalisierte Zeichenfolge, die Uses the Magic library by [Crownwood Software] ähnelt.
'''</summary>
@@ -3724,15 +3834,6 @@ Namespace My.Resources
End Get
End Property
'''<summary>
''' Sucht eine lokalisierte Zeichenfolge, die ähnelt.
'''</summary>
Friend ReadOnly Property strPropertyDescriptionRDGatewayPasswordInherit() As String
Get
Return ResourceManager.GetString("strPropertyDescriptionRDGatewayPasswordInherit", resourceCulture)
End Get
End Property
'''<summary>
''' Sucht eine lokalisierte Zeichenfolge, die Specifies when to use a Remote Desktop Gateway (RD Gateway) server. ähnelt.
'''</summary>
@@ -4741,6 +4842,27 @@ Namespace My.Resources
End Get
End Property
'''<summary>
''' Sucht eine lokalisierte Zeichenfolge, die Protocol Event Disconnected.
'''Message:
'''{0} ähnelt.
'''</summary>
Friend ReadOnly Property strProtocolEventDisconnected() As String
Get
Return ResourceManager.GetString("strProtocolEventDisconnected", resourceCulture)
End Get
End Property
'''<summary>
''' Sucht eine lokalisierte Zeichenfolge, die Protocol Event Disconnected failed.
'''{0} ähnelt.
'''</summary>
Friend ReadOnly Property strProtocolEventDisconnectFailed() As String
Get
Return ResourceManager.GetString("strProtocolEventDisconnectFailed", resourceCulture)
End Get
End Property
'''<summary>
''' Sucht eine lokalisierte Zeichenfolge, die Protocol to import ähnelt.
'''</summary>
@@ -5074,6 +5196,15 @@ Namespace My.Resources
End Get
End Property
'''<summary>
''' Sucht eine lokalisierte Zeichenfolge, die RDP disconnected! ähnelt.
'''</summary>
Friend ReadOnly Property strRdpDisconnected() As String
Get
Return ResourceManager.GetString("strRdpDisconnected", resourceCulture)
End Get
End Property
'''<summary>
''' Sucht eine lokalisierte Zeichenfolge, die RDP Disconnect failed, trying to close! ähnelt.
'''</summary>
@@ -5551,6 +5682,15 @@ Namespace My.Resources
End Get
End Property
'''<summary>
''' Sucht eine lokalisierte Zeichenfolge, die Setting main form text failed ähnelt.
'''</summary>
Friend ReadOnly Property strSettingMainFormTextFailed() As String
Get
Return ResourceManager.GetString("strSettingMainFormTextFailed", resourceCulture)
End Get
End Property
'''<summary>
''' Sucht eine lokalisierte Zeichenfolge, die Couldn&apos;t save settings or dispose SysTray Icon! ähnelt.
'''</summary>
@@ -5704,6 +5844,15 @@ Namespace My.Resources
End Get
End Property
'''<summary>
''' Sucht eine lokalisierte Zeichenfolge, die SQL Update check finished and there is an update available! Going to refresh connections. ähnelt.
'''</summary>
Friend ReadOnly Property strSqlUpdateCheckUpdateAvailable() As String
Get
Return ResourceManager.GetString("strSqlUpdateCheckUpdateAvailable", resourceCulture)
End Get
End Property
'''<summary>
''' Sucht eine lokalisierte Zeichenfolge, die SSH version 1 ähnelt.
'''</summary>

View File

@@ -1544,9 +1544,6 @@ If you are still not able to pass this check or use the (RDP) Sessions feature i
</data>
<data name="strPropertyDescriptionRDGatewayUsername" xml:space="preserve">
<value>Specifies the user name that a user provides to connect to the RD Gateway server.</value>
</data>
<data name="strPropertyDescriptionRDGatewayPasswordInherit" xml:space="preserve">
<value></value>
</data>
<data name="strProtocolToImport" xml:space="preserve">
<value>Protocol to import</value>
@@ -2302,4 +2299,60 @@ Starting with new connections file.</value>
<data name="strVncSetPropsFailed" xml:space="preserve">
<value>VNC Set Props Failed!</value>
</data>
<data name="strRdpDisconnected" xml:space="preserve">
<value>RDP disconnected!</value>
</data>
<data name="strErrorCode" xml:space="preserve">
<value>Error code {0}.</value>
</data>
<data name="strProtocolEventDisconnected" xml:space="preserve">
<value>Protocol Event Disconnected.
Message:
{0}</value>
</data>
<data name="strProtocolEventDisconnectFailed" xml:space="preserve">
<value>Protocol Event Disconnected failed.
{0}</value>
</data>
<data name="strConnenctionClosedByUserDetail" xml:space="preserve">
<value>Connection to {0} via {1} closed by user {2}. (Description: "{3}"; User Field: "{4}")</value>
</data>
<data name="strConnenctionClosedByUser" xml:space="preserve">
<value>Connection to {0} via {1} closed by user {2}.</value>
</data>
<data name="strConnenctionCloseEvent" xml:space="preserve">
<value>Connection Event Closed</value>
</data>
<data name="strConnenctionCloseEventFailed" xml:space="preserve">
<value>Connection Event Closed failed!</value>
</data>
<data name="strConnectionEventConnected" xml:space="preserve">
<value>Protocol Event Connected</value>
</data>
<data name="strConnectionEventConnectedDetail" xml:space="preserve">
<value>Connection to "{0}" via "{1}" established by user "{2}" (Description: "{3}"; User Field: "{4}")</value>
</data>
<data name="strConnectionEventErrorOccured" xml:space="preserve">
<value>Protocol Event ErrorOccured</value>
</data>
<data name="strConnectionEventConnectionFailed" xml:space="preserve">
<value>Conenction failed!</value>
</data>
<data name="strConnectionRdpErrorDetail" xml:space="preserve">
<value>RDP error!
Error Code: {0}
Error Description: {1}</value>
</data>
<data name="strLogWriteToFileFailed" xml:space="preserve">
<value>Writing to report file failed!</value>
</data>
<data name="strLogWriteToFileFinalLocationFailed" xml:space="preserve">
<value>Couldn't save report to final location.</value>
</data>
<data name="strSqlUpdateCheckUpdateAvailable" xml:space="preserve">
<value>SQL Update check finished and there is an update available! Going to refresh connections.</value>
</data>
<data name="strSettingMainFormTextFailed" xml:space="preserve">
<value>Setting main form text failed</value>
</data>
</root>

View File

@@ -20,7 +20,7 @@
</root>
<appender name="LogFileAppender" type="log4net.Appender.FileAppender">
<file value="%USERPROFILE%\AppData\Local\mRemoteNG\mRemoteNG.log" />
<file value="${USERPROFILE)\AppData\Local\mRemoteNG\mRemoteNG.log" />
<!-- Example using environment variables in params -->
<!-- <file value="${TMP}\log-file.txt" /> -->
<appendToFile value="true" />