Sonderzeichen in Tabelle suchen

06/12/2007 - 10:18 von Andreas Gauer | Report spam
Hallo NG,

ich hàtte folgendes Problem: in einer Tabelle mit Teilepositionen ist ein
Textfeld mit dem jeweiligen Teilenamen enthalten. Diese Namen sind alle
unterschiedlich lang und bestehen in der Regel aus den Zeichen a-z,A-Z
und/Oder 0-9.

Ich möchte jetzt alle DS herausfiltern, die irgend ein abweichendes Zeichen
enthalten wie zB.: )(&%!;._ usw. Auch sollen alle DS mit Umlaute (àöü), oder
èê usw herausgefiltert werden.

Wie kann ich dies in einer Abfrage am leichtesten bewerkstelligen.

Für Hilfe im voraus vielen Dank!

Gruß
Andreas
 

Lesen sie die antworten

#1 Henry Habermacher
06/12/2007 - 11:30 | Warnen spam
Hallo Andreas

Andreas Gauer wrote:
ich hàtte folgendes Problem: in einer Tabelle mit Teilepositionen ist ein
Textfeld mit dem jeweiligen Teilenamen enthalten. Diese Namen sind alle
unterschiedlich lang und bestehen in der Regel aus den Zeichen a-z,A-Z
und/Oder 0-9.

Ich möchte jetzt alle DS herausfiltern, die irgend ein abweichendes
Zeichen enthalten wie zB.: )(&%!;._ usw. Auch sollen alle DS mit Umlaute
(àöü), oder èê usw herausgefiltert werden.

Wie kann ich dies in einer Abfrage am leichtesten bewerkstelligen.



Mit einem Filter alleine wirst Du das kaum oder nur sehr mühsam hinbekommen.
Das einfachste wird sein, wenn Du Dir eine Funktion schreibst, z.B.
hatSonderzeichen().

diese würde etwa so aussehen:

Public Function hatSonderzeichen(Textfeld As Variant) As Boolean
hatSonderzeichen = False
Dim I As Long
Dim J As Long
For I = 1 To Len(Nz(Textfeld, ""))
Select Case Asc(Mid(Textfeld, I, 1))
Case 48 To 57, 65 To 90, 97 To 122
'nicht's machen
Case Else
hatSonderzeichen = True
Exit For
End Select
Next
End Function

Diese Funktion in ein Standard Modul ablegen. Dann kannst Du diese Funktion
in einer Abfrage benutzen:

SELECT * From [TeilePositionen]
WHERE hatSonderzeichen([TeileName]) = True

Die Performance wird alledings nicht sehr gut sein, aber das ist ja auch
was, was Du nicht hàufig machen willst, hoffentlich.

HTH
Henry




Microsoft MVP Office Access
Keine E-Mails auf Postings in NGs. Danke.
Access FAQ www.donkarl.com

Ähnliche fragen