sql med 2 kriterier

SELECT *
FROM Sponsor
WHERE Sponsor.Sponsor_gruppe = 3 AND Sponsor.Sponsor_afd = 1;

Burde fungere foruden alle de paranteser.

<%
Dim H_sponsor
Dim H_sponsor_numRows

Set H_sponsor = Server.CreateObject("ADODB.Recordset")
H_sponsor.ActiveConnection = MM_login_2005_STRING
H_sponsor.Source = SELECT * FROM Sponsor WHERE (((Sponsor.Sponsor_gruppe)=3) AND ((Sponsor.Sponsor_afd)=1));
H_sponsor.CursorType = 0
H_sponsor.CursorLocation = 2
H_sponsor.LockType = 1
H_sponsor.Open()

H_sponsor_numRows = 0
%>

når du siger indgå, skal den så overskrive den anden, eller skal det være dem begge der er opfyldt hver for sig.. altså:

<%
Dim H_sponsor
Dim H_sponsor_numRows

Set H_sponsor = Server.CreateObject("ADODB.Recordset")
H_sponsor.ActiveConnection = MM_login_2005_STRING
H_sponsor.Source = SELECT * FROM Sponsor WHERE (Sponsor.Sponsor_gruppe=3 AND Sponsor.Sponsor_afd=1) OR (Sponsor.Sponsor_gruppe=3 AND Sponsor.Sponsor_afd=1);
H_sponsor.CursorType = 0
H_sponsor.CursorLocation = 2
H_sponsor.LockType = 1
H_sponsor.Open()

H_sponsor_numRows = 0
%>

Ohhhh, jeg fejllæste spørgsmålet... undskylder mange gange, var sq' for hurtig på aftrækkeren - ignorer venligst min kommentar.

i første erstatter den sql du har skrevet bare den anden sql..

I det andet eksempel hentes alle elementer fra sponsor tabellen hvor:
(gruppe er 3 og afd er 1) samt (gruppe 1 og afd er 1)
fik skrevet forkert.. det skal være:

<%
Dim H_sponsor
Dim H_sponsor_numRows

Set H_sponsor = Server.CreateObject("ADODB.Recordset")
H_sponsor.ActiveConnection = MM_login_2005_STRING
H_sponsor.Source = SELECT * FROM Sponsor WHERE (Sponsor.Sponsor_gruppe=1 AND Sponsor.Sponsor_afd=1) OR (Sponsor.Sponsor_gruppe=3 AND Sponsor.Sponsor_afd=1);
H_sponsor.CursorType = 0
H_sponsor.CursorLocation = 2
H_sponsor.LockType = 1
H_sponsor.Open()

H_sponsor_numRows = 0
%>

Jeg har prøvet med denne. Giver fejl
<%
Dim H_sponsor
Dim H_sponsor_numRows

Set H_sponsor = Server.CreateObject("ADODB.Recordset")
H_sponsor.ActiveConnection = MM_login_2005_STRING
H_sponsor.Source = "SELECT * FROM Sponsor WHERE (Sponsor.Sponsor_gruppe=3 AND Sponsor.Sponsor_afd=1);"
H_sponsor.CursorType = 0
H_sponsor.CursorLocation = 2
H_sponsor.LockType = 1
H_sponsor.Open()

H_sponsor_numRows = 0
%>

Følgende fejl
Data type mismatch in criteria expression.
h_sponsorer.asp, line 13

Samme fejl når jeg bruger denne.

"SELECT * FROM Sponsor WHERE Sponsor.Sponsor_gruppe = 3 AND Sponsor.Sponsor_afd = 1;"

hmm...

så prøv:

<%
Dim H_sponsor
Dim H_sponsor_numRows

Set H_sponsor = Server.CreateObject("ADODB.Recordset")
H_sponsor.ActiveConnection = MM_login_2005_STRING
H_sponsor.Source = "SELECT * FROM Sponsor WHERE (Sponsor.Sponsor_gruppe='3' AND Sponsor.Sponsor_afd='1');"
H_sponsor.CursorType = 0
H_sponsor.CursorLocation = 2
H_sponsor.LockType = 1
H_sponsor.Open()

H_sponsor_numRows = 0
%>

Kanon
Det var lige det der skulle til.
Takker mange gange.

Smid lige et svar.

jeg smider et svar her ;-)