mirror of
https://github.com/kimmknight/remoteapptool.git
synced 2024-11-23 22:17:20 +00:00
fixed #65 - Allow colons (:) in the address fields to enable IPv6
This commit is contained in:
parent
ebae885253
commit
b0272722b9
@ -61,7 +61,7 @@ Module RemoteAppFunction
|
||||
|
||||
Public Sub ValidateDNSname(ByVal TheTextBox As TextBox)
|
||||
' pattern matches any character that is NOT A-Z (allows upper and lower case alphabets)
|
||||
Dim rx As New Regex("[^\p{L}LlUu0-9\-\._]")
|
||||
Dim rx As New Regex("[^\p{L}LlUu0-9\-\._:]")
|
||||
If (rx.IsMatch(TheTextBox.Text)) Then
|
||||
TheTextBox.Text = rx.Replace(TheTextBox.Text, "")
|
||||
TheTextBox.Select(TheTextBox.Text.Length, 0)
|
||||
|
Loading…
Reference in New Issue
Block a user