Код: Выделить всё
ПОРТУГАЛИЯ, Vinhόs, Peso da Régua 5050-402, Portugal / Виньюш, Пезо да Регуа 5050-402
Модератор: Дед Пахом
Код: Выделить всё
ПОРТУГАЛИЯ, Vinhόs, Peso da Régua 5050-402, Portugal / Виньюш, Пезо да Регуа 5050-402
Кларион не поддерживает работу с юникодом, сами знаете. И, в данном случае, это откровенный бред. В одном названии русские, английские и португальские буквы. Хорошо, что иероглифы не воткнули.Игорь Столяров писал(а): ↑21 Апрель 2020, 20:18Ну так видимо такие строки уже и надо просто хранить в юникоде и всё. Время пришло …
Придёт партия сакэ - будут и иероглифы …
Почему ? Есть же типы строк для работы с UNUCODE. И Вам же не нужно по таким данным строить ключи и фильтры.
Именно с ним.
Код: Выделить всё
Set RegObj = New RegExp
RegObj.Global=true
RegObj.IgnoreCase=false
RegObj.Multiline=false
RegObj.Pattern="[^A-Za-z0-9А-Яа-я_ -.,/\\\()']"
...
SET wb_Product_pref_Producer_oref_FO_oref_FullName = Elem.SelectSingleNode("wb:Product/pref:Producer/oref:FO/oref:FullName")
if not wb_Product_pref_Producer_oref_FO_oref_FullName is Nothing then
mytext=RegObj.Replace(wb_Product_pref_Producer_oref_FO_oref_FullName.text,"?")
outFile.WriteLine "wb:Product/pref:Producer/oref:FO/oref:FullName=" & mytext
end if
то становится понятно, что девица может набрать что угодно, и если бы сама система не работала в UNICODE,