Google Groups no longer supports new Usenet posts or subscriptions. Historical content remains viewable.
Dismiss

Zamiana znaków w stringu

447 views
Skip to first unread message

Maks

unread,
Feb 17, 2009, 9:05:24 AM2/17/09
to
Witam.
W polu ZIMP tabeli IMP_T znajduje się tekst.
Tekst przedzielony jest myślnikami (-).
Muszę myślniki zamienić na spacje.
Jak to zrobić?
Pozdrawiam.
Maks

Krzysztof Pozorek

unread,
Feb 17, 2009, 9:24:59 AM2/17/09
to
(...)

> W polu ZIMP tabeli IMP_T znajduje się tekst.
> Tekst przedzielony jest myślnikami (-).
> Muszę myślniki zamienić na spacje.
> Jak to zrobić?


Najprosciej za pomoca funkcji Replace.

K.P.


Maks

unread,
Feb 17, 2009, 12:16:03 PM2/17/09
to

>
> Najprosciej za pomoca funkcji Replace.
>
> K.P.

Może i najprościej, ale funkcja Replace nie działa na poziomie
kwerendy.
Ale dzięki za ukierunkowanie. Szukałem i znalazłem coś takiego:

Function funcReplace(Expression As String, Find As String, Rep As
String, Optional Compare As VbCompareMethod = vbTextCompare) As String
funcReplace = Replace(Expression, Find, Rep, , , Compare)
End Function

I to działa.
Zapomniałem kto to napisał. Ale świetnie to zrobił.
Chylę czoła.
Pozdrawiam.
Maks

Maks

unread,
Feb 17, 2009, 12:18:36 PM2/17/09
to
Już wiem kto to napisał.
Owym autorem jest Krzysztof Czuryło.
Maks

Krzysztof Pozorek

unread,
Feb 17, 2009, 12:26:22 PM2/17/09
to
(...)

> > Najprosciej za pomoca funkcji Replace.
> >
> > K.P.
>
> Może i najprościej, ale funkcja Replace nie działa na poziomie
> kwerendy.

To oczywiście nieprawda. Replace dziala w kwerendach.

To tak na wszelki wypadek prostuję to dla tych, co będą kiedyś czytali ten
wątek. Przyklady kwerend z uzyciem Replace:
1. Kwerenda aktualizujaca
UPDATE Tabela1 SET Pole1 = Replace([Pole1],"-"," ");
2. Kwerenda wybierajaca
SELECT Replace([Pole1],"-"," ") FROM Tabela1;

K.P.


Maks

unread,
Feb 17, 2009, 12:59:35 PM2/17/09
to

> To oczywiście nieprawda. Replace dziala w kwerendach.


Nie zdefiniowana funkcja 'Replace' w wyrażeniu.
Taki komunikat wyświetla Access po próbie użycia funkcji Replace.
Nie wziąłem tej informacji z powietrza.
Pozdrawiam.
Maks

Krzysztof Pozorek

unread,
Feb 17, 2009, 1:24:53 PM2/17/09
to
(...)

> Nie zdefiniowana funkcja 'Replace' w wyrażeniu.

Tak było w Accessie 2000, już w XP to poprawili. W dobie Accessa 2007, nadal
używasz tak starej wersji ;-)

K.P.


Maks

unread,
Feb 17, 2009, 1:50:06 PM2/17/09
to
> Tak było w Accessie 2000, już w XP to poprawili. W dobie Accessa 2007, nadal
> używasz tak starej wersji ;-)
>
> K.P.

Tak. Takiej wersji używam. Przyzwyczaiłem się.
Nie mam powodu zmieniać.
Pozdrawiam.
Maks

Krzysztof Naworyta

unread,
Feb 17, 2009, 3:50:12 PM2/17/09
to
Juzer Maks <leo...@klub.chip.pl> napisał

|| Tak było w Accessie 2000, już w XP to poprawili. W dobie Accessa 2007,
|| nadal używasz tak starej wersji ;-)

| Tak. Takiej wersji używam. Przyzwyczaiłem się.
| Nie mam powodu zmieniać.

To na przyszłość, pytając o cokolwiek, zaznacz wyraźnie, jakiej wersji
używasz !
Znajomość Netykiety jeszcze nikomu nie zaszkodziła !

--
KN

Krzysztof Czuryło

unread,
Feb 17, 2009, 4:57:37 PM2/17/09
to

"Krzysztof Naworyta" <k.naw...@datacomp.com.pl> wrote in message news:gnf7tb$v5r$1...@news.onet.pl...


Czepiacie się Kolego...

A tymczasem sam KP też nie raczył w swym pierwszym poście napomknąć, że Replace(), owszem,
działa w kwerendach, ale... dopiero od wersji XP. Już się zapomniało... ;-)

Tak czy siak, już się cieszyłem, że ktoś wygrzebał z pomroki dziejów jakiś mój kawałek kodu
i się nim zachwycił, a tu taki niepotrzebny zgrzyt. ;-)

BTW Ja też mam w domu ciągle Office'a 2000. W pracy oczywiście coś nowszego, ale kto
by tego używał... ;-)

--
krzycz


AP...@interia.pl

unread,
Feb 18, 2009, 9:03:51 AM2/18/09
to

Maks napisał(a):

----
http://www.bratki.w.v1.pl/accesspseudofaq/13a_VbaTxtFaq.htm#vba13a_06
szukaj "zbReplace"
----
AP

Krzysztof Naworyta

unread,
Feb 18, 2009, 4:12:32 PM2/18/09
to
Juzer Krzysztof Czuryło <krz...@poczta.SPAM.onet.KILLER.pl> napisał


(...)
| Czepiacie się Kolego...


Ja się czepiam ?
No, poniekąd ...
Ale kto mi niedawno zarzucał używanie QP ? ;-)


| Tak czy siak, już się cieszyłem, że ktoś wygrzebał z pomroki dziejów
| jakiś mój kawałek kodu
| i się nim zachwycił, a tu taki niepotrzebny zgrzyt. ;-)

E tam, google różne zawirowania ma, ale kto z niego korzysta to na KrzyCza
trafi często!
Nie bój, nie bój !
Miło, że jakoś tu zaglądasz, choć wątki już nie takie jak kiedyś ...

--
KN

Zorro_

unread,
Feb 22, 2009, 4:20:09 PM2/22/09
to
Hej.
A ja zauważyłem że i działa i nie działa:) i to w Access 2003
Już wyjaśniam. Kiedy użyłem w kwerendzie funkcji Replace wszystko
działało OK, natomiast kiedy chciałem użyć kryteriów na tym polu z
replace wtedy wyskakiwał opisywany błąd. Ciekawe czy w 2007 to też
wywala ten błąd (przy takiej opcji) czy działa poprawnie.
Ja chciałem tego użyć żeby wyciąć - w nipie a potem zrobić wyszukiwanie.

Pozdrawiam

Maks pisze:

0 new messages