Показать сообщение отдельно
Старый 10.12.2012, 22:37   #7  
oip is offline
oip
Axapta
Лучший по профессии 2014
 
2,564 / 1416 (53) ++++++++
Регистрация: 28.11.2005
Записей в блоге: 1
Это в каком ролапе? Такая проверка с помощью 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;
}