Frage zu einer Abfrage

11/05/2010 - 21:03 von Johann Weiss | Report spam
Hallo NG,

ich habe eine SQL- Abfrage die auch seit Jahren funktioniert
hier mal der Code:
-
Private Sub MakeSQL()
'SQL erstellung
Krit = ""
If Not IsNull(Me!txtkst) Then Krit = Krit & " AND Kst_6 LIKE '" &
Me!txtkst & "*'"
If Not IsNull(Me!txtgrp) Then Krit = Krit & " AND F_Gruppe LIKE '" &
Me!txtgrp & "*'"
If Not IsNull(Me!txtAP) Then Krit = Krit & " AND Arbeitsplatz LIKE '" &
Me!txtAP & "*'"
If Not IsNull(Me!txtAF1) Then Krit = Krit & " AND AF LIKE '" & Me!txtAF1 &
"*'"
If Not IsNull(Me!txtTyp) Then Krit = Krit & " AND FzgKl LIKE '" &
Me!txtTyp & "*'"
If Not IsNull(Me!txtKlassif) Then Krit = Krit & " AND Klass LIKE '" &
Me!txtKlassif & "*'"
If Not IsNull(Me!txtZeit) Then Krit = Krit & " AND zeit >= '" & Me!txtZeit
& "'"
If Not IsNull(Me!txtZeit1) Then Krit = Krit & " AND zeit <= '" &
Me!txtZeit1 & "'"
If Not IsNull(Me!txtpr) Then Krit = Krit & " AND PRNr LIKE '" & Me!txtpr &
"*'"
If Not IsNull(Me!txtML) Then Krit = Krit & " AND ML LIKE '" & Me!txtML &
"*'"
If Not IsNull(Me!txtBA) Then Krit = Krit & " AND BA LIKE '" & Me!txtBA &
"*'"
If Not IsNull(Me!txtKw) Then Krit = Krit & " AND KW LIKE '" & Me!txtKw &
"*'"
SQL = "SELECT * FROM qry_suchen "
If Krit <> "" Then
Krit = MID(Krit, 5)
SQL = SQL & "WHERE " & Krit
If Me!KritAnz Then
GblKrit = Krit
Else
GblKrit = ""
End If
Me!txtAF1.SetFocus
End If
End Sub
-

Nun wird über das Textfeld "txtpr" verschiedene Produktnummern zB. "1GP"
abgerufen.
Bisher habe ich das immer einzeln gemacht, zb 1GP nacher 2GP oder 8GP.

Nun meiner Frage, ist es möglich das ich in das Formular 3 Textfelder mache
zB. "txtpr1", "txtpr2" und "txtpr3",
und somit die Abfrage dann zB. Inhalt aus "txtpr1" oder "txtpr2" abfragen,
oder auch so" txtpr1" oder "txtpr2" oder "txtpr3"
Ist sowas möglich?

gruss Johann
 

Lesen sie die antworten

#1 Thomas Möller
11/05/2010 - 22:07 | Warnen spam
Hallo Johann,

Am 11.05.2010 21:03, schrieb Johann Weiss:
ich habe eine SQL- Abfrage die auch seit Jahren funktioniert
hier mal der Code:
-
Code entfernt
-

Nun wird über das Textfeld "txtpr" verschiedene Produktnummern zB. "1GP"
abgerufen.
Bisher habe ich das immer einzeln gemacht, zb 1GP nacher 2GP oder 8GP.

Nun meiner Frage, ist es möglich das ich in das Formular 3 Textfelder
mache zB. "txtpr1", "txtpr2" und "txtpr3",
und somit die Abfrage dann zB. Inhalt aus "txtpr1" oder "txtpr2" abfragen,
oder auch so" txtpr1" oder "txtpr2" oder "txtpr3"



Vielleicht kannst Du noch einmal mit anderen Worten erlàutern, was Du
genau vor hast. Für das Verstàndnis wàre es evtl. auch hilfreich, wenn
Du den Code für das bisherige Vorgehen zeigst.

CU
Thomas

Homepage: www.Team-Moeller.de

Ähnliche fragen