Thema: Delphi SQL Abfrage

Einzelnen Beitrag anzeigen

Benutzerbild von motu
motu

Registriert seit: 20. Jul 2004
76 Beiträge
 
Delphi 6 Professional
 
#21

Re: SQL Abfrage

  Alt 3. Aug 2004, 07:23
Also falls nochmal jemand wie ich hier her kommt, pack ich mal zwei Lösungen hier rein.

Die Erste gibt nur den Wert, sofern vorhanden, sowie den Vorgänger/Nachfolger aus.
Da das die ASP-Source ist, müßte "&input1&" durch eine Variable ersetzt werden.

SQL-Code:
SELECT Spalten, MAX(wert) FROM Tabellen WHERE wert < "&input1&"
UNION
SELECT Spalten FROM Tabellen WHERE wert = "&input1&"
UNION
SELECT Spalten, MIN(wert) FROM Tabellen WHERE wert > "&input1&" ORDER BY wert

Die Zweite gibt 5 Vorgänger/Nachfolger aus:

SQL-Code:
SELECT Spalten
FROM Tabellen
WHERE Wert IN (SELECT TOP 5 Wert FROM Tabelle WHERE Wert < "&input1&" ORDER BY Wert DESC)
UNION
SELECT Spalten
FROM Tabellen
WHERE Wert = "&input1&"
UNION
SELECT Spalten
FROM Tabellen
WHERE Wert IN (SELECT TOP 5 Wert FROM Tabelle WHERE Wert > "&input1&" ORDER BY Wert)
ORDER BY Wert
Es gibt nur eine dumme Frage: Ist Impotenz vererbbar?
  Mit Zitat antworten Zitat