webForumDet fria alternativet

sökning av databas ? kort fråga

ASP

3 svar · 221 visningar · startad av erka

Medlem sedan dec. 19996 522 inlägg
Frågan#1

hejsan !

min kod ser ut så här

<%@ LANGUAGE=VBScript %>
<%Response.buffer = true 
Dim Connect, conntemp, DSNtemp
Dim rs

Set Connect=server.CreateObject("adodb.connection")
DSNtemp="DRIVER={Microsoft Access Driver (*.mdb)}; "
DSNtemp=dsntemp & "DBQ=" & server.mappath("db/produkter.mdb")
Connect.Open DSNtemp
SQLstmt = "SELECT * From produkter WHERE beskrivning LIKE '%" & Request.Form("sok")& "%' "
Set RS = Connect.Execute(SQLstmt)
%> 
<%
If request.form("sok")="" Then
response.redirect("main.asp")
%> 

<%else%> 
Resultatet av din sökning
<%Do Until rs.eof %> 
<%=RS("beskrivning")%>
<a href="produkter_visa.asp?id=<%=RS("id")%>"><%=RS("namn")%></a> 

<% 
rs.movenext
loop
rs.close
%> 
<% End If%> 
<% connect.close %>

Nu är det så att jag vill få fram "Din sökning genererade inga träffar" om den inte hittar något. Jag har fan prövat allt, lyckas inte..prövat om och om igen...Tacksam !

Medlem sedan juni 200032 967 inlägg
#2

innan do while not rs.eof:

if rs.eof then response.write "din sökning gav inga träffar"

------------------
<A HREF="http://www.cartman.nu" TARGET=_blank>
det man inte minns har inte hänt.
hit med en berka!</A>

Medlem sedan dec. 19996 522 inlägg
#3

Du menar innan
<%Do Until rs.eof %> , tack fick det att fungera...

så svårt var det..=)

Medlem sedan juni 200032 967 inlägg
#4

prexis ;)

------------------
<A HREF="http://www.cartman.nu" TARGET=_blank>
det man inte minns har inte hänt.
hit med en berka!</A>

260 ms totalt · 4 externa anrop · v20260731065814-full.86ec41c2
124 ms — deklarationer (db)
0 ms — hämta statistik (cache)
134 ms — hämta tråd, inlägg och bilagor (db)
123 ms — ändringar (db)