Это в каком ролапе? Такая проверка с помощью RegularExpressions же была в 4ке, если я не путаю. Проверка корректности УРЛ - это же чуть больше, чем простая проверка регулярного выражения по маске.
X++:
static client server boolean isValidURL(URL url)
{
InteropPermission permission;
boolean ret;
#define.HTTP("http")
#define.HTTPS("https")
#define.SLASH("://")
;
permission = new InteropPermission(InteropKind::ClrInterop);
permission.assert();
if(strscan(url,#SLASH,1, strlen(url)))
{
if( substr(url,1,4) == #HTTP || substr(url,1,5) == #HTTPS)
ret = System.Uri::IsWellFormedUriString(url,System.UriKind::Absolute);
}
else
{
url = #HTTP + #SLASH + url;
ret = System.Uri::IsWellFormedUriString(url,System.UriKind::Absolute);
}
return ret;
}