database relationer og søgemaskine!

SELECT * FROM vare INNER JOIN kundereg ON vare.KundeId = kundereg.Id WHERE vare.VareNavn LIKE \'%test%\' OR vare.Kategori LIKE \'%test%\' OR kundereg.Postnummer LIKE \'%test%\' OR kundereg.Amt LIKE \'%test%\'

Eller noget i den stil.. :-)

/Jesper

Okay! Jeg skal lige teste det....

Hmm... det ser ud til at virke - meeen jeg får en [Microsoft][ODBC Microsoft Access Driver] Too few parameters. Expected 2.  fejl!

Har du rettet alle feltnavne til så de passer med databasen?

/Jesper

Ja, det skulle jeg mene.... men det er en stavefejl eller en mangel et eller andet sted ikk\'??
Men jeg synes sgu at jeg har kigget det hele igennem for fejl.... men fortsætter... :o)

Dette rigtigt nok ud ikk\'?
strSQL = \"SELECT * FROM VARE INNER JOIN KUNDEREG ON VARE.KUNDEID = KUNDEREG.VAREID WHERE\"
strSQL = strSQL & \" (VARE.VARENAVN LIKE \'%\" & strKEYWORD & \"%\')\"
strSQL = strSQL & \" OR (VARE.VAREBESKRIVELSE LIKE \'%\" & strKEYWORD & \"%\')\"

Prøv at lave \" ON VARE.KUNDEID = KUNDEREG.VAREID\" om til \" ON VARE.KUNDEID = KUNDEREG.ID\"

/Jesper

Hmm.... nej! Hjalp heller ikke.... jeg ved fanme ikke ved der er i vejen.... du får lige scriptet!
strSQL = \"SELECT * FROM VARE INNER JOIN KUNDEREG ON VARE.KUNDEID = KUNDEREG.ID WHERE\"
strSQL = strSQL & \" (VARE.VARENAVN LIKE \'%\" & strKEYWORD & \"%\')\"
strSQL = strSQL & \" OR (VARE.VAREBESKRIVELSE LIKE \'%\" & strKEYWORD & \"%\')\"

IF strKATEGORIKEYWORD = \"ALLE\" THEN
    strSQL = strSQL & \" AND (VARE.KATEGORI LIKE \'%Radio/TV%\')\"
ELSE
    strSQL = strSQL & \" AND (VARE.KATEGORI LIKE \'%\" & strKATEGORIKEYWORD & \"%\')\"
END IF

IF strAMTKEYWORD = \"ALLE\" THEN
    strSQL = strSQL & \" AND (KUNDEREG.AMT LIKE \'%Nordsjællands amt%\',\'%Bornholms amt%\')\"
ELSE
    strSQL = strSQL & \" AND (KUNDEREG.AMT LIKE \'%\" & strAMTKEYWORD & \"%\')\"
END IF

IF strPOSTNRKEYWORD = \"ALLE\" THEN
    strSQL = strSQL & \" AND (KUNDEREG.POSTNR LIKE \'%1000%\',\'%3700%\')\"
ELSE
    strSQL = strSQL & \" AND (KUNDEREG.POSTNR LIKE \'%\" & strPOSTNRKEYWORD & \"%\')\"
END IF

IF strBYKEYWORD = \"ALLE\" THEN
    strSQL = strSQL & \" AND (KUNDEREG.BY LIKE \'%Rønne%\',\'%København%\')\"
ELSE
    strSQL = strSQL & \" AND (KUNDEREG.BY LIKE \'%\" & strBYKEYWORD & \"%\')\"
END IF

IF strUGEKEYWORD = \"ALLE\" THEN
    strSQL = strSQL & \" AND (VARE.UGE LIKE \'%10%\',\'%2%\')\"
ELSE
    strSQL = strSQL & \" AND (VARE.UGE LIKE \'%\" & strUGEKEYWORD & \"%\')\"
END IF

strDSN = \"DRIVER={Microsoft Access Driver (*.mdb)};DBQ=\"&Server.MapPath(\"varedatabase.mdb\")
Set myConn = Server.CreateObject(\"ADODB.Connection\")
myConn.Open strDSN
Set rs = myConn.Execute(strSQL)

Ok. Tilrettet lidt. Mon det virker?? :-)

strSQL = \"SELECT * FROM VARE INNER JOIN KUNDEREG ON VARE.KUNDEID = KUNDEREG.ID WHERE\"
strSQL = strSQL & \" (VARE.VARENAVN LIKE \'%\" & strKEYWORD & \"%\')\"
strSQL = strSQL & \" OR (VARE.VAREBESKRIVELSE LIKE \'%\" & strKEYWORD & \"%\')\"

IF strKATEGORIKEYWORD = \"ALLE\" THEN
    strSQL = strSQL & \" AND (VARE.KATEGORI = \'Radio/TV\')\"
ELSE
    strSQL = strSQL & \" AND (VARE.KATEGORI LIKE \'%\" & strKATEGORIKEYWORD & \"%\')\"
END IF

IF strAMTKEYWORD = \"ALLE\" THEN
    strSQL = strSQL & \" AND (KUNDEREG.AMT = \'Nordsjællands amt\' OR KUNDEREG.AMT = \'Bornholms amt\')\"
ELSE
    strSQL = strSQL & \" AND (KUNDEREG.AMT LIKE \'%\" & strAMTKEYWORD & \"%\')\"
END IF

IF strPOSTNRKEYWORD = \"ALLE\" THEN
    strSQL = strSQL & \" AND (KUNDEREG.POSTNR = 1000 OR KUNDEREG.POSTNR = 3700)\"
ELSE
    strSQL = strSQL & \" AND (KUNDEREG.POSTNR LIKE \'%\" & strPOSTNRKEYWORD & \"%\')\"
END IF

IF strBYKEYWORD = \"ALLE\" THEN
    strSQL = strSQL & \" AND (KUNDEREG.BY LIKE \'%Rønne%\' OR KUNDEREG.BY LIKE \'%København%\')\"
ELSE
    strSQL = strSQL & \" AND (KUNDEREG.BY LIKE \'%\" & strBYKEYWORD & \"%\')\"
END IF

IF strUGEKEYWORD = \"ALLE\" THEN
    strSQL = strSQL & \" AND (VARE.UGE = 10 OR VARE.UGE = 2)\"
ELSE
    strSQL = strSQL & \" AND (VARE.UGE =\" & strUGEKEYWORD & \")\"
END IF

Nope! Heller ikke..... men tak for forsøget - du får dine point... jeg må bare se om jeg ikke kan få det til at køre...!
Tak for hjælpen

Kan du ikke prøve at skrive
Response.Write strSql
Response.End

lige inden linien med

Set rs = myConn.Execute(strSQL)

Og derefter poste den sql der kommer ud?

/Jesper

Den er her:

SELECT * FROM VARE INNER JOIN KUNDEREG ON VARE.KUNDEID = KUNDEREG.VAREID WHERE (VARE.VARENAVN LIKE \'%sko%\') OR (VARE.VAREBESKRIVELSE LIKE \'%sko%\') AND (VARE.KATEGORI LIKE \'%Radio/TV%\') AND (KUNDEREG.AMT LIKE \'%Nordsjællands amt%\',\'%Bornholms amt%\') AND (KUNDEREG.POSTNR LIKE \'%1000%\') AND (KUNDEREG.BY LIKE \'%Rønne%\') AND (VARE.UGE LIKE \'%10%\',\'%2%\')

Jeg har søgt på \'Sko\' - og der burde komme noget frem.. se bort fra kategorien den er lagt osv!

Jeg har fundet ud af at det er denne sætning der er noget i vejen med...
strSQL = \"SELECT * FROM VARE INNER JOIN KUNDEREG ON VARE.KUNDEID = KUNDEREG.ID WHERE\"

HURRA!!!! Så virker det.....

... ON VARE.VAREID = KUNDEREG.ID WHERE....

Hmmmm.... og dog...!!????? FUCK!!!

Heh... nu går det stærkt!! Så virker det ...IGEN!