Функция УбратьЛишниеСимволы(Строка1) Экспорт

	НовСтрока = "";

	ПравильныеСимволы = "QWERTYUIOPASDFGHJKLZXCVBNMqwertyuiopasdfghjklzxcvbnmЙЦУКЕНГШЩЗХЪФЫВАПРОЛДЖЭЯЧСМИТЬБЮйцукенгшщзхъфывапролджэячсмитьбю";

	Для Сч = 1 по СтрДлина(Строка1) Цикл

		ТекСимв = Сред(Строка1, Сч, 1);

		Если Найти(ПравильныеСимволы, ТекСимв) > 0 Тогда

			НовСтрока = НовСтрока + ТекСимв;

		КонецЕсли;

	КонецЦикла;

	

	Возврат НовСтрока;

	

КонецФункции