mirror of
https://github.com/mRemoteNG/mRemoteNG.git
synced 2026-02-25 19:38:37 +08:00
d18a510310
Fix issue MR-367 - Make the 'Connect' button on the 'Quick Connect' toolbar a forced dropdown
45 lines
1.4 KiB
VB.net
45 lines
1.4 KiB
VB.net
Imports mRemoteNG.Tools.LocalizedAttributes
|
|
|
|
Namespace Connection
|
|
Namespace Protocol
|
|
Public Class Converter
|
|
Public Shared Function ProtocolToString(ByVal protocol As Protocols) As String
|
|
Return protocol.ToString()
|
|
End Function
|
|
|
|
Public Shared Function StringToProtocol(ByVal protocol As String) As Protocols
|
|
Try
|
|
Return [Enum].Parse(GetType(Protocols), protocol, True)
|
|
Catch ex As Exception
|
|
Return Protocols.RDP
|
|
End Try
|
|
End Function
|
|
End Class
|
|
|
|
Public Enum Protocols
|
|
<LocalizedDescription("strRDP")> _
|
|
RDP = 0
|
|
<LocalizedDescription("strVnc")> _
|
|
VNC = 1
|
|
<LocalizedDescription("strSsh1")> _
|
|
SSH1 = 2
|
|
<LocalizedDescription("strSsh2")> _
|
|
SSH2 = 3
|
|
<LocalizedDescription("strTelnet")> _
|
|
Telnet = 4
|
|
<LocalizedDescription("strRlogin")> _
|
|
Rlogin = 5
|
|
<LocalizedDescription("strRAW")> _
|
|
RAW = 6
|
|
<LocalizedDescription("strHttp")> _
|
|
HTTP = 7
|
|
<LocalizedDescription("strHttps")> _
|
|
HTTPS = 8
|
|
<LocalizedDescription("strICA")> _
|
|
ICA = 9
|
|
<LocalizedDescription("strExtApp")> _
|
|
IntApp = 20
|
|
End Enum
|
|
End Namespace
|
|
End Namespace
|