Войти

Показать полную графическую версию : Задачки по Access


SVlad
02-02-2005, 18:17
Может кто подскажет как из Поля1 получить Поле2 без определенных символов (например в Поле1 "61-6985/6 STD" - надо получить в поле2 (или запросе) "6169856STD" - т.е. удалить все символы кроме цифр и латинских букв)

SVlad
14-04-2005, 11:53
Неужели нет знатоков Access, которые могли бы написать такую функцию? как все-таки очистить от лишних символов поля с большим объемом информации (500000 записей) если делать обычной заменой - очень долго и заменяет только 8-9 тыс. - чтобы была возможность отмены

hasherfrog
18-04-2005, 10:12
Точно уже было...
Ладно.

http://songhaysystem.com/document.php?cmd=getKBDoc&get=2076071635
Ctrl+F "ReplaceChars"

SVlad
30-04-2005, 14:12
SVlad
Спасибо что откликнулись. Вставил в модуль, вызываю функцию в запросе (хочу удалить пробелы в поле [CROSS]![KKKNummer])
Pin: ReplaceChars([CROSS]![KKKNummer];" ";"";10;1;0)
а Access ругается Ambiguous name. in query expression 'ReplaceChars([CROSS]![KKKNummer];" ";"";10;1;0)'

hasherfrog
30-04-2005, 14:27
Эммм. Может вместо ReplaceChars([CROSS]![KKKNummer];" ") сделать что-нибудь типа a=[CROSS]![KKKNummer].AsString:ReplaceChars(a;" "):[CROSS]![KKKNummer]=a

Я плохо помню как там всё правильно пишется, извините... VBA - не мой конёк

aESThete
01-05-2005, 08:26
имхо в запросе выполняются не всегда/не все VBA функции
попробуйте в одном из модулей базы определить глобальную (public) функцию вида:

Public Function RemoveSpace(S as String) As String
RemoveSpace = ReplaceChars(S;" ";"";10;1;0)
End Function

соответственно в запросе:

select RemoveSpace([CROSS]![KKKNummer]) as Pin ....




© OSzone.net 2001-2012