Удаление html тегов из строки

 RegExp = Новый COMОбъект("VBScript.RegExp");

    RegExp.IgnoreCase = Ложь; //Игнорировать регистр   

    RegExp.Global = Истина; //Поиск всех вхождений шаблона   

    RegExp.MultiLine = Ложь; //Многострочный режим   

    

    RegExp.Pattern = "<[^>]*>"; //Ищем теги HTML   

    стр=RegExp.Replace(стр, ""); //Заменяем все теги на пустоту