04. februar 2002 - 00:56Der er
17 kommentarer og 1 løsning
Søgemaskine
Hej "eksperter"
jeg skal bruge en søgefunktion til min hjemmeside. det skal ikke være en der søger i google, jubii elle lign. det skal være en der kun er baseret på links, der bliver tilføjet på min side. envidere må den gerne være simpel, og nem at redigere i. den skal kunne søge på søgeord, der er indtastede ved tilmeldese af side(denne funktion skal altså oxo være med)
hvis der er en af jeg eksperter der kunne hjælp mig ville jeg blive meget glad
detter er ikke implementeret på min side endnu, derfor er der ikke oprette nogen database endnu, men jeg regner med at de skal indføres i en acces database, hvis dette kan være kompatibelt med en søgefunktion
Jeg kan lave en søgefunktion til dig. Dog i PHP og MySQL, men den bliver MEGET nem at redigere i og tager ikke særlig lang tid at lave, så jeg kan nøjes med points her fra eksperten!!
' Hvis der er skrevet i feltet strKeyword = Replace(strKeyword,"'","''")
' Opbygger en dynamisk SQL streng strSQL = "SELECT * FROM firma WHERE " 'strSQL = strSQL & " (amt LIKE '%" & strKeyword & "%')" 'strSQL = strSQL & " OR (by LIKE '%" & strKeyword & "%')" strSQL = strSQL & " (firma LIKE '%" & strKeyword & "%')" 'strSQL = strSQL & " OR (www LIKE '%" & strKeyword & "%')" strSQL = strSQL & " ORDER BY firma asc"
' Skaber DSNLess forbindelse til DBen strDSN = "DRIVER={Microsoft Access Driver (*.mdb)};DBQ="&Server.MapPath("min-database.mdb") Set myConn = Server.CreateObject("ADODB.Connection") myConn.Open strDSN
' Skaber et recordset udfra SQL strengen Set rs = myConn.Execute(strSQL) If Not (rs.BOF Or rs.EOF) Then ' Hvis der er fundet poster på søgningen Response.Write "<table border=1 align=""center"">" ' Response.Write "<tr><th>Amt</th><th>By</th><th>Firma</th><th>www-adresse</th></tr>" Do While Not rs.EOF notatfelt = rs("lokalt") 'start farver counter = counter + 1 if counter = 2 then counter = 0 end if if counter = 0 then color="#003366" else color="#333366" end if ' slut farver Response.write("<tr align=""center""><td bgcolor='" & color & "' align=""center"">") Response.write("<a href=""" & notatfelt & """>" & rs("firma") & " </td></tr>") rs.MoveNext Loop Response.Write "</table>" Else ' Hvis der ikke er fundet poster på søgningen Response.Write "<p>Der er ikke fundet noget på denne søgning</p>" Response.write "<p>Prøv igen. Kontroller for trykfejl</p>" End If
' Rydder op efter os myConn.Close Set myConn = Nothing %>
</body></html>
Synes godt om
Slettet bruger
04. februar 2002 - 01:16#5
jonatand, kunne den laves så den opfyldte min ovenstående krav ???
Jeps, skriv hvad brugeren skal opgive under oprettelse af link, så laver jeg det færdigt til imorgen!! Altså: Navn Email Hjemmeside IP-adresse osv... osv...
Synes godt om
Slettet bruger
04. februar 2002 - 01:41#7
lyder godt. jeg havde forestillet mig dette: Sidens navn Beskrivelse af siden (70 tegn) søgeord (5) Adressen på siden (URL) kategori: (skulle gerne være sådanne at jeg selv kunne redige mulige kategorier) email:
Anvend www.atomz.com - den er super - og nem at anvende og rette.
Synes godt om
Slettet bruger
04. februar 2002 - 16:31#11
jeg referer lige til en komentar fra dig selv jonatand
"Jeg kan lave en søgefunktion til dig. Dog i PHP og MySQL, men den bliver MEGET nem at redigere i og tager ikke særlig lang tid at lave, så jeg kan nøjes med points her fra eksperten!! "
derfor går jeg ligsom ikke ud fra at den skulle koste andet en de angivede point, men det er jo op til dig.
i værste tilfælde må jeg finde en anden der kan kode denne funktion for mig hvis dette ikke lever op til dine forvententninger.
En sidste ting: Kan du ikke lige skrive hvilke kategorier der skal være...
Synes godt om
Slettet bruger
04. februar 2002 - 17:57#16
ok, er der mulighed for at kunne rette i dette senere ?
» Det sker » Edb & Internet » Erhverv & Økonomi » Fakta & Oplysninger » Forvaltning & Politik » Fritid » Hjemmesider » Erotik
Synes godt om
Slettet bruger
06. februar 2002 - 13:23#17
jonatan>> er det ved at blive til noget ????
Synes godt om
Slettet bruger
08. februar 2002 - 16:44#18
nå, men når det ikke bliver til noget med jonatand, så må jeg jo opgive dette og trække min point tilbege, undskyldermange gange.
Synes godt om
Ny brugerNybegynder
Din løsning...
Tilladte BB-code-tags: [b]fed[/b] [i]kursiv[/i] [u]understreget[/u] Web- og emailadresser omdannes automatisk til links. Der sættes "nofollow" på alle links.