Имя: Пароль:
1C
1С v8
Оставить только буквы и цифры
0 dft2014
 
21.12.17
13:42
Подскажите, есть ли какая-нибудь функция, которая убирала бы все знаки (такие как, например . / - и т.д.), а оставляла только буквы и цифры.
1 nordbox
 
21.12.17
13:47
существует- руки
а в место знаков что?
тебе вообще это зачем?
что ты там такое хочешь сделать?
2 Aleksey
 
21.12.17
13:48
я в 7-ке по сканкоду убирал
3 Mankubus
 
21.12.17
13:50
(0) есть функция СтроковыеФункцииКлиентСервер.ТолькоЦифрыВСтроке.
Переделай ее на буквы
4 dft2014
 
21.12.17
13:52
(1) Вместо таких знаков - ничего не должно быть, даже пробелов.
5 АЛьФ
 
21.12.17
13:53
Алфавит                = "0123456789АБВГДЕЁЖЗИКЛМНОПРСТУФХЦЧШЩЬЫЪЭЮЯ";
    
    ПодготовленнаяСтрока = "";
    Для инд = 1 По СтрДлина(Назначение) Цикл
        текСимвол = Сред(Врег(Назначение), инд, 1);
        Если Найти(Алфавит, текСимвол) = 0 Тогда
            Продолжить;
        КонецЕсли;
        ПодготовленнаяСтрока = ПодготовленнаяСтрока + текСимвол;
    КонецЦикла;
6 Aleksey
 
21.12.17
13:53
(4) И что? Если символ не попадает в диапозон, то неереносим его в приемник
7 dft2014
 
21.12.17
13:55
(6) Лучше наверное опираться не на диапазон исключений. А если это не буква и не цифра, то уничтожать ее.
8 dft2014
 
21.12.17
13:55
(5) Здесь проверка на буквы, а у меня еще цифры.
9 АЛьФ
 
21.12.17
13:57
2(8) Здесь проверка на любые допустимые символы.
10 Lexey_
 
21.12.17
14:02
(0) какая задача? проверить имя файла?
11 singlych
 
21.12.17
14:10
(9) Там нет "Й". Не подходит.
12 dft2014
 
21.12.17
14:13
(10) Есть Excel-файл, у которого заголовки колонок написаны с использованием символов, типа ". / -" и т.п. При загрузке этого файла таблицу значений, названия колонок таблицы значений делаю такими же, как и в файле. Но из-за таких вот символов, ТЗ не создается.
13 dft2014
 
21.12.17
14:14
(9) Точно, не увидела! Сейчас попробую...
14 singlych
 
21.12.17
14:23
(12) Делай имя вида Колонка1, а в заголовок пиши как есть.
15 Maniac
 
21.12.17
14:24
Есть
16 DES
 
21.12.17
14:27
А еще можно убивать ненужные символы, например (как вариант? )

Стр = СокрЛП(Стр);
Пока СтрНайти(Стр," ")>0 Цикл; Стр = СтрЗаменить(Стр," ", ""); КонецЦикла
Стр = СтрЗаменить(Стр,".","");
Стр = СтрЗаменить(Стр,"/","");
Стр = СтрЗаменить(Стр,"\","");
Стр = СтрЗаменить(Стр,"|","");
Стр = СтрЗаменить(Стр,"#","");

и т.д.
17 Maniac
 
21.12.17
14:27
Вот тут наиболее полный алгоритм и буквы и цифры. можно комбинировать и прочее.

Вычисляет только слова которые одновременно содержат и то и другое

https://subsystems.ru/forum/50/topic799/
18 Maniac
 
21.12.17
14:29
в (17) идет вычисление, присутствия англ букв и цифр (строка где есть и русский алфавит заккоментирована)

Может применятся для поисков артикулов в наименованиях
19 Адинэснег
 
21.12.17
14:29
(8) колонка ТЗ с именем "1", "2Колонка", "3 квартал" у тебя не создастся... делай колонки как в 14 и храни соответствие заголовков, например
20 Timon1405
 
21.12.17
14:31
(18) в (17) используются функции глРазложитьСтрокуВМассивПодстрок,ПеревестиВРег описание которых в посте отсутствует. значит в (17) нерабочий код
21 Адинэснег
 
21.12.17
14:32
ну или после функции приведения к алфавиту добавляй нецифровой символ вперед, типа "_"
22 Maniac
 
21.12.17
14:32
(20) есть в глобальных модулях типовых. Ок опубликую тоже
23 Ненавижу 1С
 
гуру
21.12.17
14:33
(17) есть греческие, армянские, грузинские? если нет - свободен
24 Maniac
 
21.12.17
14:34
У меня просто задача тут намного глубже чем в (0)

В (0) он пишет как убрать символы.
А у меня описан пример когда есть длинное наименование, в котором есть куча слов.

И нужно оставить только слова которые имеют англ буквы и цифры в одном слове одновременно. а все остальные слова убрать полностью.
25 Maniac
 
21.12.17
14:35
(23) замени строку вверху и получишь что хочешь.
26 Timon1405
 
21.12.17
14:40
RegExp = Новый COMОбъект("VBScript.RegExp");
RegExp.IgnoreCase = Истина;
RegExp.Global = Истина;
RegExp.MultiLine = Ложь;
RegExp.Pattern = "(\W+)";
СтрВход = "12%3@m#ail.r_u";
СтрВыход = RegExp.Replace(СтрВход,"");
27 Maniac
 
21.12.17
14:43
(26) На серверной 1С заработает? На линуксе?
28 Timon1405
 
21.12.17
14:49
(27) в (0) ничего об этом. как нет и исходной конфигурации, в которой вы почему-то уверены, что есть ваши функции из (17).
29 Maniac
 
21.12.17
14:52
(28) а надо сразу об этом думать)
Независимо от того, куда вы едете — это в гору и против ветра!