Задачки по Access
Может кто подскажет как из Поля1 получить Поле2 без определенных символов (например в Поле1 "61-6985/6 STD" - надо получить в поле2 (или запросе) "6169856STD" - т.е. удалить все символы кроме цифр и латинских букв)
|
Неужели нет знатоков Access, которые могли бы написать такую функцию? как все-таки очистить от лишних символов поля с большим объемом информации (500000 записей) если делать обычной заменой - очень долго и заменяет только 8-9 тыс. - чтобы была возможность отмены
|
Точно уже было...
Ладно. http://songhaysystem.com/document.ph...get=2076071635 Ctrl+F "ReplaceChars" |
SVlad
Спасибо что откликнулись. Вставил в модуль, вызываю функцию в запросе (хочу удалить пробелы в поле [CROSS]![KKKNummer]) Pin: ReplaceChars([CROSS]![KKKNummer];" ";"";10;1;0) а Access ругается Ambiguous name. in query expression 'ReplaceChars([CROSS]![KKKNummer];" ";"";10;1;0)' |
Эммм. Может вместо ReplaceChars([CROSS]![KKKNummer];" ") сделать что-нибудь типа a=[CROSS]![KKKNummer].AsString:ReplaceChars(a;" "):[CROSS]![KKKNummer]=a
Я плохо помню как там всё правильно пишется, извините... VBA - не мой конёк |
имхо в запросе выполняются не всегда/не все VBA функции
попробуйте в одном из модулей базы определить глобальную (public) функцию вида: Public Function RemoveSpace(S as String) As String RemoveSpace = ReplaceChars(S;" ";"";10;1;0) End Function соответственно в запросе: select RemoveSpace([CROSS]![KKKNummer]) as Pin .... |
Время: 07:45. |
Время: 07:45.
© OSzone.net 2001-