From b0272722b98c31092917383e539584431e20e4d9 Mon Sep 17 00:00:00 2001 From: Kim Date: Wed, 9 Feb 2022 00:54:47 +1100 Subject: [PATCH] fixed #65 - Allow colons (:) in the address fields to enable IPv6 --- remoteapp-tool/RemoteAppFunctions.vb | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/remoteapp-tool/RemoteAppFunctions.vb b/remoteapp-tool/RemoteAppFunctions.vb index b28986e..74ec738 100644 --- a/remoteapp-tool/RemoteAppFunctions.vb +++ b/remoteapp-tool/RemoteAppFunctions.vb @@ -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)