Söka i en databas

Collapse
X
 
  • Time
  • Show
Clear All
new posts
  • costodia
    Medlem
    • 2000-08-18
    • 780

    #1

    Söka i en databas

    Jag undrar om det finns nåot standard-exempel på hur man söker i en databas om man till exmepl utgår från Vides kod för uppdelning av ett recordset:[kod] <table>
    <%
    mypage = Request("whichpage")
    If mypage = "" then
    mypage = 1
    End If
    mypagesize = 10

    SQL = "Select * From tabell Order by fält"

    Set rstemp = Server.Createobject("ADODB.Recordset")
    rstemp.cursorlocation = 3
    rstemp.cachesize = 5
    MdbFilePath = Server.MapPath("path/databas.mdb")
    rstemp.open SQL, "Driver={Microsoft Access Driver (*.mdb)}; DBQ=" & MdbFilePath & ";"
    If rstemp.EOF then
    Response.write "Där fanns det ju inget... " & sok
    Else
    rstemp.movefirst
    rstemp.pagesize = mypagesize
    maxcount = Cint(rstemp.pagecount)
    rstemp.absolutepage = mypage
    howmanyrecs = 0
    howmanyfields = rstemp.fields.count -1
    Do While Not RStemp.EOF AND howmanyrecs < rstemp.pagesize
    counter = counter + 1
    If counter mod 2 = 0 then
    color = "CCCC99"
    Else
    color = "CCCC66"
    End If
    Response.write "<tr bgcolor='" & color & "'><td>" & RStemp("fält") & "</td></tr>"

    rstemp.movenext
    howmanyrecs = howmanyrecs + 1
    Loop
    rstemp.close
    Set rstemp = nothing
    %>
    <tr><td><hr></td></tr>
    <tr><td>
    <%
    If maxcount <> 0 then
    response.write "sida " & mypage & " av " & maxcount & "<br>" & sidor:
    pad = "0"
    scriptname = request.Servervariables("script_name")
    for counter = 1 to maxcount
    If counter >= 10 then
    pad = ""
    End If
    ref = "<a href='" & scriptname & "?whichpage=" & counter & "&pagesize=" & mypagesize & "'>" & pad & counter & "</a> "
    response.write ref & " "
    if counter mod 10 = 0 then
    response.write "<br>"
    End If
    Next
    End If
    End If
    %>
    </td></tr>
    </table> [/kod]eftersom detta kommer behövas om databasen består av 14000 poster som min gör (alla Lunds Kommuns företag) och man ibland kan få några hundra poster.
    Så om du finns något sätt att söka i denna så skulle det undelätta riktigt mycket

    ------------------
    Mvh Martin Persson
    www.Costodia.com, http://www.martinpersson.com, http://www.merinternet.com/ , http://www.sveriges.com/ , http://www.sigill.net/ , www.dress.nu/ , mittinternet.com/

    [Redigerat av costodia den 03 maj 2001]
    [1] Martin Persson
    http://www.mittinternet.com/
  • @nders
    Moderator
    Marsvin
    • 2000-06-30
    • 26914

    #2
    nu är jag inte helt säker på vad du är ute efter, men i kodstycket ovan så hämtas ju hela tabellen, eftersom det är så det är sagt i sql-frågan.

    du måste modifiera sql-frågan så du ställer villkor på den data som skall hämtas, exempelvis med like för en sökning.

    ------------------
    <A HREF="http://cartman.nu" TARGET=_blank>
    nobody expects the spanish inquisition!</A>
    @aviddevguy

    Comment

    Working...