Kode system

SELECT * FROM tblSpil WHERE title = '%"& Request.Querystring &"%'

Du kan hendte værdien med Request.Querystring("alf")
Så skal du bruge LIKE i SQL eks på like:
xx LIKE 'a%'  Søger efter alt som starter med a i kolonnen xx
xx LIKE '%a'  Søger efter alt som slutter på a i kolonnen xx
xx LIKE '%a%'  Søger efter alt som indeholder a i kolonnen xx


Så din SQL bliver:

alf = Request.Querystring("alf")
SQL = "SELECT * FROM tabel WHERE spilnavn LIKE '"& alf " "%'"


For at udskrive det kan du gøre sådan her, men det kode har du sikker i forvejen ;)
Set rs = Conn.Execute(SQL)
do while not rs.EOF
  Response.write rs("spilnavn") & "<br>"
  rs.Movenext
loop

Du kan lave det lidt om så den kun har en WHERE del hvis alf indeholder noget.


alf = Request.Querystring("alf")
SQL = "SELECT * FROM tabel"
if alt <> "" then SQL = SQL & " WHERE spilnavn LIKE '"& alf " "%'"

Du kan jo oxo gøre det med "Left" :o)

alf = Request.Querystring("alf")
SQL = "SELECT * FROM tabel WHERE Left(spilnavn,1) = '"& alf "'"

Så er du sikker på at du kun får alle med f.eks. A som forbogstav

/Websam

Endelig fik jeg tid til at kigge på det, Hvad er det galt her ?

<%
Set Conn = Server.CreateObject("ADODB.Connection")
DSN = "DRIVER={Microsoft Access Driver (*.mdb)}; "
DSN = DSN & "DBQ=" & Server.MapPath ("db.mdb")
Conn.Open DSN

alf = Request("alf")
SQL = "SELECT * FROM koder Where Left(titel,1) = '" & alf & "'"

if not rs.eof then
do until rs.eof
Response.write "Ders"
rs.movenext
loop
else
Response.write "ingen"
End If

%>

bare rolig jeg deler pointene mellen jer!

Hvorfor prøvet du ikke det føste som jeg har vist

alf = Request.Querystring("alf")
SQL = "SELECT * FROM tabel WHERE spilnavn LIKE '"& alf " "%'"


Det er standart SQL hvorimod Left kun virker i nogle databaser.

Men det som er galt er der mangler en Set rs = Conn.Exeute(SQL) efter SQL er laver og før if not rs.EOF


alf = Request("alf")
SQL = "SELECT * FROM koder Where Left(titel,1) = '" & alf & "'"

Set rs = Conn.Execute(SQL)

if not rs.eof then

Jeg læste lige dit spørgsmål igen og du skriver du vil havde mulighed for at skrive:

code.asp?alf=AB

Som link og den så skal finde alt som starter med AB. Løsningen med Left vil ikke finde nogle da den kun sammenligner den føste karakter med AB og en karakter kan jo ikke være to karakter ;) Så brug LIKE som vist nedenfor. Så finde den alle dem som starter med det som man skirver i linket.


alf = Request.Querystring("alf")
SQL = "SELECT * FROM tabel WHERE spilnavn LIKE '"& alf " "%'"

Set rs = Conn.Execute(SQL)

eagleeye>> du arbejder hårdt for sagen ;)

Nej der står jeg ikke vil have at man kan det!

Du kan lave noget

alf = Request.Querystring("alf")

If Lenght(alf) = 1 Then
  SQL = "SELECT * FROM tabel WHERE spilnavn LIKE '%"& alf &"%'"
Else
  SQL = "SELECT * FROM tabel WHERE spilnavn = '"& alf &"'"
End If

Ok så forkert ;) Hvad skal der så ske hvis man skriver dette link:??
code.asp?alf=AB

eagleeye>> så viser den vel det spil der hedder AB?

Ja eller alle spil

eagleeye>> ikke hvis han bruge den kode jeg lige er kommet med

Korrekt, og der er lidt uklart i selv spørgsmålet der for spørger jeg. For man kan jo også vise alle som starter med det første bogstav (a i eksemplet).

alf = Request.Querystring("alf")
SQL = "SELECT * FROM tabel WHERE spilnavn LIKE '"& left(alf,1) &"%'"

Undskyld jeg først giver points nu!