title image


Smiley Was sind denn alles "Sonderzeichen" für dich?!
Ansonsten: Schreib halt eine kleine Funktion, die alle Zeichen bis auf die gewünschten herausfiltert:



Public Function NurMeineZeichen(S)

Dim I as Long, Ch as String, Res as String

If Isnull(S) then

NurMeineZeichen = Null

else

For I = 1 to Len(S)

Ch = Mid(S,I,1)

Select Case Ch

Case "A" to "Z", "0" to "9" ', ... usw.

Res = Res & Ch

end Select

Next I

NurMeineZeichen = Res

end if

end function



Gruß aus dem Norden
Reinhard


Bitte immer die Access-Version angeben!
DB-Wiki


Wie man Fragen richtig stellt

YaccessAccess-FAQUnd ansonsten: Wikipedia




geschrieben von

Login

E-Mail:
  

Passwort:
  

Beitrag anfügen

Symbol:
 
 
 
 
 
 
 
 
 
 
 
 
 

Überschrift: