Sorterar inte.. — webForum

cgiMedlem sedan jan. 2000371 inlägg

12 juni 2000 19:03#1

När jag vill sortera ut ord i bokstavsordning ex, A|B|C|D...
och trycker på D så vill jag att alla
rubriker på D visas, men istället skriver den ut alla rubriker i databasen, vad är fel.?
här kommer koden:

<!--#include file="functions.inc"-->
<%
Set Databas = Server.CreateObject("ADODB.Connection") MdbFilePath = Server.MapPath("sok.mdb") Databas.Open "Driver={Microsoft Access Driver (*.mdb)}; DBQ=" & MdbFilePath & ";" SQL = "Select * from Sok"
Set RS = databas.Execute(SQL)
bokstav = Request("bokstav")
SQLStmt = "SELECT kolumn FROM table WHERE kolumn LIKE '" & bokstav & "%'"
Set RS = databas.Execute(SQL)
%>
<html>

<head>
<title>-Sök-</title>

</head>

<body MARGINHEIGHT="0" MARGINWIDTH="0" bgcolor="#FFFFFF" text="#000000" topmargin="0" leftmargin="0" vlink="#0000FF">

<table border="0" width="600">
  
  <tr>
    <td width="200" valign="top"><p align="right"></td>
    <td valign="top" width="608"><p align="left"><small><font face="Verdana">
Följande resultat matchande din sökning:</font></small></p>
    <p align="left"></p>
    <table border="0" width="100%">
      <tr>
        Sökresultat:
<a href="<%=rs("url")%>"><%=rs("titel")%></a>      </font></small></td>
        
<%=rs("beskrivning")%>        </font></small></td>
      </tr>
      <tr>
        <td width="44%" colspan="2"></td>
      </tr>
    </table>
    <table border="0" width="100%">
<%
If RS.EOF Then 
Response.Write("<font face=Verdana><small> Tyvärr, din sökning gav inga träffar...</small></font>")
Else
%>
      
<%Do until RS.EOF%>
      
<% 
RS.MoveNext
Loop
RS.Close
End If

%>
    </table>
    
  </tr>
</table>
</body>
</html>

emissionMedlem sedan dec. 19996 721 inlägg

12 juni 2000 19:45#2

Därför att du exekverar SQL och inte SQLstmt, som du ser ....

SQL = "Select * from Sok"
Set RS = databas.Execute(SQL)
bokstav = Request("bokstav")
SQLStmt = "SELECT kolumn FROM table WHERE kolumn LIKE '" & bokstav & "%'"
Set RS = databas.Execute(SQL)

Den övre sökningen kan du ta bort helt. Den fyller ingen som helst funktion. Dessutom måste jag fråga om kolumnen verkligen heter "kolumn" och tabellen "table"? Det känns inget vidare.

Sidan i övrigt var inte riktigt klar väl? :)

[Redigerat av emission den 12 jun 2000]