sök funktion — webForum

cupyMedlem sedan apr. 2002299 inlägg

Frågan16 sep. 2002 17:10#1

Hej
Jag behöver hjälp med att bygga en sök funtion med två dropdown box plus ett textfält.
Scriptet ska användas på en annons sida där finns att välja mellan kommuner, kategorier, köp-sälj, osv.
Jag skulle behöva söka kommuner, kategorier och separera de på två kategorier som köpes eller säljes.

Kan någon hjälpa till? Tack på förhand

voigtann1Medlem sedan juni 20019 519 inlägg

16 sep. 2002 18:02#2

Börja att bygga upp din kod.. om du får problem så finns vi här och klarar direkt svara på dina frågor, det värkar mer som om du vill att person X ska göra hela koden... eller har jag fel?

cupyMedlem sedan apr. 2002299 inlägg

16 sep. 2002 18:15#3

Koden finns redan Men sql-satsen som är största problem att göra själva db kopplingen Hur den skulle se ut?

voigtann1Medlem sedan juni 20019 519 inlägg

16 sep. 2002 18:56#4

lägg till lite koder så har vi ju alltid något att bygga på..

cupyMedlem sedan apr. 2002299 inlägg

16 sep. 2002 19:24#5

här får ni hela sidans kod som jag har hittills men funkar inte riktigtmed sökning! Plus att jag skulle lägga till ett text sökning också!

<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0 Transitional//EN">
<!-- #include file="adovbs.inc" -->
<%
set objConn = Server.CreateObject("ADODB.Connection")
Set rs = Server.CreateObject("ADODB.RecordSet") 
strSQL = "Select Distinctrow * From FILES WHERE visa=true AND ANNO = 'swq' AND kommun LIKE '%" & Request("kommun") & "%' AND KATEGORI LIKE '%" & Request("kategori") & "%' ORDER BY [datum] DESC"

strDSN = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source="&Server.MapPath("omni.mdb") 
objConn.open strDSN
rs.Open strSQL, objConn, 3, 3 
If Rs.EOF Then 
Response.Write"DET FINNS INGEN ANNONS I DENNA KATEGORI / KOMMUN"
Response.Write"<br><center>"
Response.Write "<a href='JavaScript:history.back(1)'>Tillbaka</a></center>"
Else
%>
<%= kommun %>
Köpes
<%
strS = Request.Form("kommun")
%>
<FORM name="kommun" action ="tteesstt.asp" method="post"> 
<select name="kommun">
<font face="verdana, Helvetica" size=2> 
<option value="">-----------ALLA LÄN----------</option>
<option<%If strS = "Blekinge" Then Response.Write " Selected"%>>Blekinge</option> 
		<option<%If strS = "Dalarna" Then Response.Write " Selected"%>>Dalarna</option>
		<option<%If strS = "Gotland" Then Response.Write " Selected"%>>Gotland</option>
		<option<%If strS = "Gävleborg" Then Response.Write " Selected"%>>Gävleborg</option> 
		<option<%If strS = "Göteborg" Then Response.Write " Selected"%>>Göteborg</option>
		<option<%If strS = "Halland" Then Response.Write " Selected"%>>Halland</option>
 		<option<%If strS = "Jämtland" Then Response.Write " Selected"%>>Jämtland</option> 
        <option<%If strS = "Jönköping" Then Response.Write " Selected"%>>Jönköping</option>
		<option<%If strS = "Kalmar" Then Response.Write " Selected"%>>Kalmar</option>
		<option<%If strS = "Kronoberg" Then Response.Write " Selected"%>>Kronoberg</option>             
        <option<%If strS = "Norrbotten" Then Response.Write " Selected"%>>Norrbotten</option>              
        <option<%If strS = "Skaraborg" Then Response.Write " Selected"%>>Skaraborg</option> 
        <option<%If strS = "Skåne" Then Response.Write " Selected"%>>Skåne</option>
        <option<%If strS = "Södermanland" Then Response.Write " Selected"%>>Södermanland</option>
        <option<%If strS = "Stockholm" Then Response.Write " Selected"%>>Stockholm</option>
		<option<%If strS = "Uppsala" Then Response.Write " Selected"%>>Uppsala</option>
		<option<%If strS = "Värmland" Then Response.Write " Selected"%>>Värmland</option>
        <option<%If strS = "Västerbotten" Then Response.Write " Selected"%>>Västerbotten</option> 
        <option<%If strS = "Västernorrland" Then Response.Write " Selected"%>>Västernorrland</option>
        <option<%If strS = "Västmanland" Then Response.Write " Selected"%>>Västmanland</option> 
        <option<%If strS = "Älvsborg" Then Response.Write " Selected"%>>Älvsborg</option> 
        <option<%If strS = "Örebro" Then Response.Write " Selected"%>>Örebro</option> 
        <option<%If strS = "Östergötland" Then Response.Write " Selected"%>>Östergötland</option></select>  
    <%
strS = Request.Form("kategori")
%>          
			  <select name="kategori">
<option value=""> ----- KATEGORIER -----</option>
<option<%If strS = "Antikt &amp; Samlarprylar" Then Response.Write " Selected"%>>Antikt &amp; Samlarprylar</option>
<option<%If strS = "Bilar" Then Response.Write " Selected"%>>Bilar</option>
<option<%If strS = "Bildelar &amp; Biltillbehör" Then Response.Write " Selected"%>>Bildelar &amp; Biltillbehör</option>
<option<%If strS = "Bilstereo" Then Response.Write " Selected"%>>Bilstereo</option>
<option<%If strS = "Biljetter &amp; Resor" Then Response.Write " Selected"%>>Biljetter &amp; Resor</option>
<option<%If strS = "Båtar &amp; tillbehör" Then Response.Write " Selected"%>>Båtar &amp; tillbehör</option>
<option<%If strS = "Cyklar &amp; tillbehör" Then Response.Write " Selected"%>>Cyklar &amp; tillbehör</option>
<option<%If strS = "Datorer" Then Response.Write " Selected"%>>Datorer</option>
<option<%If strS = "Datatillbehör &amp; Delar" Then Response.Write " Selected"%>>Datatillbehör &amp; Delar</option>
<option<%If strS = "Djur" Then Response.Write " Selected"%>>Djur</option>
<option<%If strS = "Foto" Then Response.Write " Selected"%>>Foto</option>
<option<%If strS = "För Hus &amp; Trädgård" Then Response.Write " Selected"%>>För Hus &amp; Trädgård</option>
<option<%If strS = "För Kontoret" Then Response.Write " Selected"%>>För Kontoret</option>
<option<%If strS = "Golf" Then Response.Write " Selected"%>>Golf</option>
<option<%If strS = "Hus &amp; bostad" Then Response.Write " Selected"%>>Hus &amp; Bostad</option>
<option<%If strS = "Husvagnar &amp; Husbilar" Then Response.Write " Selected"%>>Husvagnar &amp; Husbilar</option>
<option<%If strS = "Hushållsmaskiner" Then Response.Write " Selected"%>>Hushållsmaskiner</option>
<option<%If strS = "Hobby" Then Response.Write " Selected"%>>Hobby</option>
<option<%If strS = "Hästar &amp; Hästsport" Then Response.Write " Selected"%>>Hästar &amp; Hästsport</option>
<option<%If strS = "Jakt &amp; Fiske" Then Response.Write " Selected"%>>Jakt &amp; Fiske</option>
<option<%If strS = "kläder" Then Response.Write " Selected"%>>Kläder</option>
<option<%If strS = "Leksaker &amp; Barnartiklar" Then Response.Write " Selected"%>>Leksaker &amp; Barnartiklar</option>
<option<%If strS = "Litteratur" Then Response.Write " Selected"%>>Litteratur</option>
<option<%If strS = "Musikinstrument" Then Response.Write " Selected"%>>Musikinstrument</option>
<option<%If strS = "Motorcyklar &amp; tillbehör" Then Response.Write " Selected"%>>Motorcyklar &amp; tillbehör</option>
<option<%If strS = "Mopeder &amp; tillbehör" Then Response.Write " Selected"%>>Mopeder &amp; tillbehör</option>
<option<%If strS = "Möbler &amp; Heminredning" Then Response.Write " Selected"%>>Möbler &amp; Heminredning</option>
<option<%If strS = "Snöskotrar" Then Response.Write " Selected"%>>Snöskotrar</option>
<option<%If strS = "Sport &amp; Fritid" Then Response.Write " Selected"%>>Sport &amp; Fritid</option>
<option<%If strS = "Telefoner" Then Response.Write " Selected"%>>Telefoner</option>
<option<%If strS = "TV/Radio/etc..." Then Response.Write " Selected"%>>TV/Radio/etc...</option>
<option<%If strS = "TV-Spel" Then Response.Write " Selected"%>>TV-Spel</option>
<option<%If strS = "Verktyg &amp; Maskiner" Then Response.Write " Selected"%>>Verktyg &amp; Maskiner</option>
<option<%If strS = "Övrigt" Then Response.Write " Selected"%>>Övrigt</option>
</select><p>
<INPUT title="sök" style="BORDER-TOP-WIDTH: 1px;BORDER-LEFT-WIDTH: 
1px; BORDER-LEFT-COLOR: #000000; BORDER-BOTTOM-WIDTH: 1px; BORDER-BOTTOM-COLOR: #000000; 
WIDTH: 342px;  BORDER-TOP-COLOR: #000000; HEIGHT: 22px; BACKGROUND-COLOR: #FFFFFF; 
BORDER-RIGHT-WIDTH: 1px; BORDER-RIGHT-COLOR: #000000" type=submit value=SÖK name=sök size=1119></FORM> 
<br>
<br>
<table style="TABLE-LAYOUT: fixed" align="center" cellspacing="2" cellpadding="0" border="0" WIDTH="560">
<tr valign="bottom">
	<td align=left WIDTH = 100><h4>Datum</h4></td>
	<td align=left WIDTH = 350><h4>&nbsp;&nbsp;&nbsp;Rubrik</h4></td>
	<td align=left WIDTH = 100><h4>Kategori</h4></td>
	
</tr>
</table>

<!-- HÄR SKRIVER JAG UT TEXTEN I TABELLEN SOM JAG HÄMTADE MED SQL SATSEN --> 
<table style="TABLE-LAYOUT: fixed" align="center" cellspacing="0" cellpadding="0" border="0" WIDTH="600">
    <tr style="HEIGHT: 18px" onMouseOver="this.style.backgroundColor='#FFFFFC';" onMouseOut="this.style.backgroundColor='';">
        <td align=left WIDTH = 90><h5><%= FormatDateTime(Rs("datum"),2)%></h5></td><td align=left WIDTH = 15 NOWRAP><%IF trim(Rs("filename") & "") <> "" then%>
<a href="uploaded/<%= replace(Rs("filename"),"_th", "_or") %>"><img src="mpix/pil.gif" border=0 alt="bild" height="9" width="10"></a>
<%end if%></td>
        <td align=left WIDTH = 300 NOWRAP><a href="visa3.asp?id=<%=TRIM(Server.HTMLEncode(Rs("ID"))) %>"><% =TRIM(Server.HTMLEncode(Rs("rubrik")))%></a></td>
       
	    <td align=left WIDTH = 120><h5>&nbsp;&nbsp;<% =TRIM(Server.HTMLEncode(Rs("kategori")))%></h5></td>
        
    </tr><hr Size=1 NOSHADE Color="#FFFCC0">
</table>
<!-- Tabell slut --> <% end if %>