Fetstil Fetstil Kursiv Understrykning linje färgläggning tabellverk Punktlista Nummerlista Vänster Centrerat högerställt Utfyllt Länk Bild htmlmode
  • Forum & Blog
    • Forum - översikt
      • .Net
        • asp.net generellt
        • c#
        • vb.net
        • f#
        • silverlight
        • microsoft surface
        • visual studio .net
      • databaser
        • sql-server
        • databaser
        • access
        • mysql
      • mjukvara klient
        • datorer och komponenter
        • nätverk, lan/wan
        • operativsystem
        • programvaror
        • säkerhet, inställningar
        • windows server
        • allmänt
        • crystal reports
        • exchange/outlook
        • microsoft office
      • mjukvara server
        • active directory
        • biztalk
        • exchange
        • linux
        • sharepoint
        • webbservers
        • sql server
      • appar (win/mobil)
      • programspråk
        • c++
        • delphi
        • java
        • quick basic
        • visual basic
      • scripting
        • asp 3.0
        • flash actionscript
        • html css
        • javascript
        • php
        • regular expresssion
        • xml
      • spel och grafik
        • DirectX
        • Spel och grafik
      • ledning
        • Arkitektur
        • Systemutveckling
        • krav och test
        • projektledning
        • ledningsfrågor
      • vb-sektioner
        • activeX
        • windows api
        • elektronik
        • internet
        • komponenter
        • nätverk
        • operativsystem
      • övriga forum
        • arbete karriär
        • erbjuda uppdrag och tjänster
        • juridiska frågor
        • köp och sälj
        • matematik och fysik
        • intern information
        • skrivklåda
        • webb-operatörer
    • Posta inlägg i forumet
    • Chatta med andra
  • Konto
    • Medlemssida
    • Byta lösenord
    • Bli bonsumedlem
    • iMail
  • Material
    • Tips & tricks
    • Artiklar
    • Programarkiv
  • JOBB
  • Student
    • Studentlicenser
  • KONTAKT
    • Om pellesoft
    • Grundare
    • Kontakta oss
    • Annonsering
    • Partners
    • Felanmälan
  • Logga in

Hem / Forum översikt / inlägg

Posta nytt inlägg


Sökmotor med paging

Postades av 2004-09-01 19:23:11 - Stefan Ekström, i forum asp - allmänt, Tråden har 1 Kommentarer och lästs av 427 personer

Mitt problem är att vad man än söker på så visas inget resultat....nån som kan se vad jag har gjort för fel

I min sökfunktion har jag defaultfilen som innehåller


kod:--------------------------------------------------------------------------------
<%if request("do")="search" then%>
<div class="brodtext">
Sök efter <a class="brodtext" href="/search/?do=search&type=username"> användarnamn</a><br>
Sök efter <a class="brodtext" href="/search/?do=search&type=gender"> man/kvinna</a>
</div>



<%if request("type")="username" then%>
<!--#include virtual="/search/userSearch.asp"-->
<%end if%>
<%end if%>
--------------------------------------------------------------------------------

och efter denna kod har jag en include som heter userSearch.asp och som innehåller sökningen och pagingen.

kod:--------------------------------------------------------------------------------
<!-- ===================================== Visa sökformuläret =====================================-->
<form name="search" action="/search/default.asp?do=search&type=username" method="post">
<table>
<tr>
<td>Sök användarnamn</td><td><input type="text" name="txtUsername" value=""></td>
</tr>
<tr>
<%if Session("userID") = 2 then%>
<td align="right" colspan="2"><input disabled class="button" type="submit" value="Starta sökning"></td>
<%else%>
<td align="right" colspan="2"><input class="button" type="submit" value="Starta sökning"></td>
<%End If%>
</tr>
</table>
</form>
<!-- ===================================== Sluta visa sökformuläret =====================================-->
<hr>
<!-- ===================================== Kontroll om något är inskrivet =====================================-->
<%
if request.form("sokUsername")="" then
response.write ""
else
%>
<!-- ===================================== Slut kontroll om något är inskrivet =====================================-->


<!-- ===================================== Kolla om sökningen gav resultat eller inte =====================================-->
<table>
<%
varUsername=request.form("txtUsername")
Set objRs = Server.Createobject("Adodb.Recordset")
strSQL = "Select * From tblUsers where username LIKE '%" & varUsername & "%'"
strConString = "Provider=Microsoft.Jet.OLEDB.4.0; Data Source= "& server.MapPath("/db/Inloggning.mdb") & ";"


function getPreviousLink( intp )
if intp > 1 then
getPreviousLink = " <a class=""menu"" href='/search/?do=search&type=username&p=" & intp - 1 & "'>&lt;&lt; Föregående</a> "
else
If intp < 2 then
response.write "&lt;&lt; Föregående"
end if
end if
end function



function getNextLink( intPageId, intPageCount )
if cint( intpageId ) <> cint( intPageCount ) then
getNextLink = " <a class=""menu"" href='/search/?do=search&type=username&p=" & intp + 1 & "'> Nästa »</a> "
else
getNextLink = " Nästa »"
end if
end function



function getLastLink( intPageCount )
getLastLink = " <a class=""menu"" href='/search/?do=search&type=username&p=" & intPageCount & "'>Sista sidan</a> "
end function



function getPageInfo( intp, intPageCount )
getPageInfo = " Antal sidor: " & intPageCount & ", nuvarande sida: " & intp & " "
end function



intp = request.querystring( "p" )
if intp = "" then intp = 1

with objRs
.cursorlocation = 3
.open strSQL, strConString
.pagesize = 5
.absolutepage = intp
end with

intPages = cint( objRs.pagecount )
intCurrentPost = 0

do while not objRs.eof and intCurrentPost < objRs.pagesize
strContents = strContents

%>
<tr>
<td>
&reciever=<%=objRs("userID")%>">
" <%=mail%>">

</td>
<td>
<a class="menu" href="/view.asp?userID=<%=objRs("userID")%>"><%=objRs("username")%> </a></td>
<td><%alder=FormatNumber(DateDiff("y",objRs("persnr") ,date())/365.2375,1)%>
<%=alder%> år </td><td> från <%=objRs("city")%> i <%=objRs("Community")%>s län</td>
</tr>
<%
intCurrentPost = intCurrentPost + 1
objRs.movenext
loop

for i = 1 to objRs.pagecount
strNavigation = strNavigation & " <a class=""menu"" href='/search/?do=search&type=username&p=" & i & "'>" & i & "</a>"
next

%>
<tr>
<td colspan="4"><br><hr><%=getPreviousLink( intp )%> <%=strNavigation%> <%=getNextLink( intp, intPageCount )%></td>
</tr>
</table>
<!-- ===================================== Slut kolla om sökningen gav resultat eller inte =====================================-->
<%end if%>
--------------------------------------------------------------------------------


Svara

Sv: Sökmotor med paging

Postades av 2004-09-02 23:33:32 - Fredrik Hansson

om jag läser rätt borde
<code>
if request.form("sokUsername")="" then
response.write ""
else
</code>
ersättas med
<code>
if request.form("txtUsername")="" then
response.write ""
else
</code>

vad jag kan se skickar du inte med något som heter "sokUsername"
eller har jag missat någon bit?

använd gärna < code > koden < / code > (fast utan mellanslagen). gör det lite mer lättläst.


Svara

Nyligen

  • 08:28 Butiksskyltar: Hur upplever utbude
  • 22:31 Slappna av
  • 19:55 kick-off med fokus på hälsa?
  • 19:53 kick-off med fokus på hälsa?
  • 16:24 Föreslå en skönhetsklinik online
  • 16:23 Föreslå en skönhetsklinik online
  • 18:42 Hvor finder man håndlavede lamper
  • 18:41 Hvor finder man håndlavede lamper

Sidor

  • Hem
  • Bli bonusmedlem
  • Läs artiklar
  • Chatta med andra
  • Sök och erbjud jobb
  • Kontakta oss
  • Studentlicenser
  • Skriv en artikel

Statistik

Antal besökare:
Antal medlemmar:
Antal inlägg:
Online:
På chatten:
4 570 785
27 960
271 761
738
0

Kontakta oss

Frågor runt konsultation, rådgivning, uppdrag, rekrytering, annonsering och övriga ärenden. Ring: 0730-88 22 24 | pelle@pellesoft.se

© 1986-2013 PelleSoft AB. Last Build 4.1.7169.18070 (2019-08-18 10:02:21) 4.0.30319.42000
  • Om
  • Kontakta
  • Regler
  • Cookies