Kun 1 hits

Du kan bruge SELECT DISTINCT

strSQL = \"SELECT DISTINCT * From sog WHERE (sogeord LIKE \'%\" & request(\"sog\") & \"%\')\"
Set rs = myConn.Execute(strSQL)

hyde

hjælper ikke...

hvad gør DISTINCT???

http://www.dktop.dk/nyt/sog.asp prøv at søge efter mobil

Distinct eliminerer netep dublerede størrelser.

Prøv at give distinct en kolonnne...

SELECT DISTINCT( link ), whatever FROM ssog WHERE (sogeord LIKE \'%\" & request(\"sog\") & \"%\')\"

det virker vist ikke. prøv at nøjes med ....

SELECT DISTINCT( link ) FROM sog WHERE (sogeord LIKE \'%\" & request(\"sog\") & \"%\')\"

det skal jo naturligvis være

strSQL = \"SELECT DISTINCT( link ) FROM sog WHERE (sogeord LIKE \'%\" & request(\"sog\") & \"%\')\"

...er lige stået op :)

uihmm det se ikke lige ud til at virke....

<%if mode = \"sog\" then
    sogeord = Request(\"sogeord\")
strsql= \"SELECT DISTINCT( link ),id FROM sog WHERE (sogeord LIKE \'%\" & request(\"sog\") & \"%\')\"
\'strSQL = \"SELECT DISTINCT * From sog WHERE (sogeord LIKE \'%\" & request(\"sog\") & \"%\')\"
Set rs = myConn.Execute(strSQL)

    if rs.eof then
        %><div align=\"center\">Vi fandt desværre ingen links til dig. Beklager</div<%
    end if
    do while not rs.eof
        strsql= \"SELECT * FROM sog WHERE id = \" & rs(\"id\")
        Set ds = myConn.Execute(strSQL)
        %>
        <a href=\"sog.asp?mode=videre&id=<%= ds(\"id\") %>\"><%= ds(\"overskrift\") %></a> - <%= ds(\"beskrivelse\") %><br>
        <%
        rs.movenext
    loop
end if%>

dette har jeg sat ind... For jeg er jo nød til at havde id, med så jeg kan lave et output senere...

Det er fordi du også selecter id. Hvis 2 links hedder det samme, hvilket id skal Access så vælge?
Den reagerer ved at selecte begge to...

jamen, jeg er jo nød til at havde id, med for at kunne finde de andre

hmmm,hvad med at sørge for at der ikke komme dubletter ind når det bliver indsat? sådan ville jeg nok gøre alligevel, for at sikre at datamængden er mindst mulig...

Nops, fordi det skal være sådan at hver links, må ligge i flere katogorier, uden maks...

jamen skal den så ikke vise alle links der bliver fundet? hvad er så problemet med at vise dubletterne?

det se jo dumt, ud at hvis man søger efter mobil, så viser, den 5 links til sendit.dk, fordi den hører til i alt under mobil ikk...

OK, så må du stoppe dem ind i et array når du looper dem igennem, altså finde ud af undervejs om linket findes i arrayet i forvejen, hvis ikke, skriv det, og stop det i arrayet...

lidt hjælp tak

ok, jeg laver lige koden....10 minutter...ok?

k½

<%@ Language=VBScript %>
<HTML>
<HEAD>
<META NAME=\"GENERATOR\" Content=\"Microsoft Visual Studio 6.0\">
</HEAD>
<BODY>
<%
    Dim linkArr
    linkArr = array()
   
    function linkInArr( link )
        linkInArr = false
   
        for i = 0 to ubound(linkArr)
            if linkArr(i) = link then
                linkInArr = true
            end if   
        next
       
        if not linkInArr then    
            redim preserve linkArr(i+1)
            linkArr(i+1)=link
        end if
    end function
   
    mode = Request.Querystring(\"mode\")
    if mode = \"sog\" then
        sogeord = Request.QueryString(\"sogeord\")
        strsql = \"SELECT * FROM sog WHERE (sogeord LIKE \'%\" & request(\"sog\") & \"%\')\"
        Set rs = DBConn.Execute(strSQL)
        if rs.eof then
%>
<div align=\"center\">Vi fandt desværre ingen links til dig. Beklager</div
<%
        end if
        do while not rs.eof
            if not linkInArr( rs(\"link\") ) then
%>
        <a href=\"sog.asp?mode=videre&id=<%=rs(\"id\")%>\"><%=rs(\"overskrift\")%></a> - <%=rs(\"beskrivelse\")%>        
<%
            end if
            rs.movenext
        loop
    end if
   
    DBConn.Close
    set DBConn = nothing
%>

</BODY>
</HTML>

du skal lige abstrahere fra at det kommer direkte fra mit dev miljø, så navnet på connection osv skal lige rettes til...og ups, DBConn.Close og det der i bunden, væk med det...

virker det?

jeg har ikke lige testede det, tester det i morgen.

http://www.sendit.dk/nyt/sog.asp


Det virker ikke...

Ingen svar, hugger selv mine points igen