---

Hejsa

Jeg er skal have lavet en søgemaskine i asp.

Men jeg er i tvivl om hvordan jeg bygger den op
i flere felter.

Feks. skal der indtastet følgende søgekriterier:

Firma
Adresse
postnr.
by
tlf. nr.

Hvordan får jeg de enkelte felter til at søge i de
samme kolonner i databasen........

På forhånd tak.

Med venlig hilsen
Karsten Korsholm
www.korsholm.dk

---

Karsten Korsholm wrote:
>
> Hejsa
>
> Jeg er skal have lavet en søgemaskine i asp.
>
> Men jeg er i tvivl om hvordan jeg bygger den op
> i flere felter.
>
> Feks. skal der indtastet følgende søgekriterier:
>
> Firma
> Adresse
> postnr.
> by
> tlf. nr.
>
> Hvordan får jeg de enkelte felter til at søge i de
> samme kolonner i databasen........

Jeg er ikke helt sikker på, hvad du mener:
Har du et felt, hvor folk kan indtaste et søgeord og dette skal så
findes i flere kolonner i databasen?
I dette tilfælde kan du gøre noget simpelt i retning af (går ud fra du
bruger access, corrent me if I'm wrong):

Dim soegeord, sql
soegeord = Trim(Request("soegeord"))
soegeord = "'*" & Replace(soegeord, "'", "''") & "*'"
sql = ""
sql = sql & "SELECT navn, adresse " & vbCrLf
sql = sql & "FROM personer " & vbCrLf
sql = sql & "WHERE navn LIKE " & soegeord & " " & vbCrLf
sql = sql & "OR adresse LIKE " & soegeord & " " & vbCrLf
sql = sql & "OR postnr LIKE " & soegeord & " " & vbCrLf
sql = sql & "OR bynavn LIKE " & soegeord & " " & vbCrLf
sql = sql & "OR tlf LIKE " & soegeord & " " & vbCrLf

Eller har du flere søgefelter (et til navn, et til adresse ...)?

--
Lauritz

---

>> Eller har du flere søgefelter (et til navn, et til adresse ...)?

Det var måske lidt dårligt forklaret, men der er flere søgefelter....!!!!!

Med venlig hilsen
Karsten Korsholm


"Lauritz Jensen" <lauritz2@hotmail.com> skrev i en meddelelse
news:3A254674.AA835E46@hotmail.com...
> Karsten Korsholm wrote:
> >
> > Hejsa
> >
> > Jeg er skal have lavet en søgemaskine i asp.
> >
> > Men jeg er i tvivl om hvordan jeg bygger den op
> > i flere felter.
> >
> > Feks. skal der indtastet følgende søgekriterier:
> >
> > Firma
> > Adresse
> > postnr.
> > by
> > tlf. nr.
> >
> > Hvordan får jeg de enkelte felter til at søge i de
> > samme kolonner i databasen........
>
> Jeg er ikke helt sikker på, hvad du mener:
> Har du et felt, hvor folk kan indtaste et søgeord og dette skal så
> findes i flere kolonner i databasen?
> I dette tilfælde kan du gøre noget simpelt i retning af (går ud fra du
> bruger access, corrent me if I'm wrong):
>
> Dim soegeord, sql
> soegeord = Trim(Request("soegeord"))
> soegeord = "'*" & Replace(soegeord, "'", "''") & "*'"
> sql = ""
> sql = sql & "SELECT navn, adresse " & vbCrLf
> sql = sql & "FROM personer " & vbCrLf
> sql = sql & "WHERE navn LIKE " & soegeord & " " & vbCrLf
> sql = sql & "OR adresse LIKE " & soegeord & " " & vbCrLf
> sql = sql & "OR postnr LIKE " & soegeord & " " & vbCrLf
> sql = sql & "OR bynavn LIKE " & soegeord & " " & vbCrLf
> sql = sql & "OR tlf LIKE " & soegeord & " " & vbCrLf
>
> Eller har du flere søgefelter (et til navn, et til adresse ...)?
>
> --
> Lauritz

---

Karsten Korsholm wrote:
>
> >> Eller har du flere søgefelter (et til navn, et til adresse ...)?
>
> Det var måske lidt dårligt forklaret, men der er flere søgefelter....!!!!!
>
> Med venlig hilsen
> Karsten Korsholm

Okey, hvad vil du så gerne kunne gøre med de enkelte søgefelter (smid
gerne en simpel form og den beskrivelse af tabellen)?

--
Lauritz

---

Har forresten sparket noget simpelt afsted til dig....

"Lauritz Jensen" <lauritz2@hotmail.com> skrev i en meddelelse
news:3A25513C.6D486A26@hotmail.com...
> Karsten Korsholm wrote:
> >
> > >> Eller har du flere søgefelter (et til navn, et til adresse ...)?
> >
> > Det var måske lidt dårligt forklaret, men der er flere
søgefelter....!!!!!
> >
> > Med venlig hilsen
> > Karsten Korsholm
>
> Okey, hvad vil du så gerne kunne gøre med de enkelte søgefelter (smid
> gerne en simpel form og den beskrivelse af tabellen)?
>
> --
> Lauritz

---

Karsten Korsholm wrote:
>
> Har forresten sparket noget simpelt afsted til dig....

Yep ... jeg kunne ikke læse din database (måske fordi jeg ikke har
win2000 installeret). Prøv bare at liste de involverede felter (aka. "en
beskrivelse af tabellen")

Men det jeg bad var også "en simpel form", jeg har klippet lidt i den
form du sendte mig, så du kan se hvordan "en simpel form" ser ud (håber
ikke du har noget imod, at jeg poster det her, det så ikke "hemmeligt"
ud):
<form name="form1" >
Firma: <input type="text" name="textfield" size="50"><br>
Adresse: <input type="text" name="textfield2" size="50"><br>
Postnr.: <input type="text" name="textfield3" size="10"><br>
By: <input type="text" name="textfield4" size="32"><br>
Telefon: <input type="text" name="textfield5"><br>
</form>
Herudaf ses at din <form> ikke har nogen action parameter og at dine
felter er navngivet således at det kan forvirre en hver.

Men spørgsmålet "hvad vil du så gerne kunne gøre med de enkelte
søgefelter [...]?", er du ikke kommet nærmere ind på.

Her er endnu et forsøg på noget kode (for at skyde mig ind på hvad du
gerne vil, brænder tampen eller bliver det varmere eller kodere):

--- kode - start ---
<%
firma = FormatSearchStr(Request("textfield"))
adresse = FormatSearchStr(Request("textfield2"))
postnr = FormatSearchStr(Request("textfield3"))
bynavn = FormatSearchStr(Request("textfield4"))
telefon = FormatSearchStr(Request("textfield5"))

sql = ""
sql = sql & "SELECT navn, adresse " & vbCrLf
sql = sql & "FROM firmaer " & vbCrLf
sql = sql & "WHERE firma LIKE " & firma & " " & vbCrLf
sql = sql & "OR adresse LIKE " & adresse & " " & vbCrLf
sql = sql & "OR postnr LIKE " & postnr & " " & vbCrLf
sql = sql & "OR bynavn LIKE " & bynavn & " " & vbCrLf
sql = sql & "OR telefon LIKE " & telefon & " " & vbCrLf

Function FormatSearchStr(s)
   FormatSearchStr="'*" & Replace(Trim(s), "'", "''") & "*'"
End Function
%>
--- kode - slut ---

--
Lauritz

---

Databasen er som følger:

| ID | FIRMA | ADRESSE | POSTNR | BY | TELEFON |
1 Sko a/s skovej 2 1234 sko 12345678
2 Sko aps skovej 10 1234 sko 87654321


Hvis der på søgemaskinen udfyldes noget i firma, skal feltet
firma søge i kolonnen firma ovre i databasen.

Hvis der på søgemaskinen udfyldes noget i telefon, skal feltet
firma søge i kolonnen telefon ovre i databasen.

Og hvis der søges på alle felter, skal den selvfølgelig søge på
alle felter over i databasen.

Jeg tror snart ikke jeg kan forenkle (forvirre) det mere for dig.

Med venlig hilsen
Karsten Korsholm


"Lauritz Jensen" <lauritz2@hotmail.com> skrev i en meddelelse
news:3A25820E.BC23AAC5@hotmail.com...
> Karsten Korsholm wrote:
> >
> > Har forresten sparket noget simpelt afsted til dig....
>
> Yep ... jeg kunne ikke læse din database (måske fordi jeg ikke har
> win2000 installeret). Prøv bare at liste de involverede felter (aka. "en
> beskrivelse af tabellen")
>
> Men det jeg bad var også "en simpel form", jeg har klippet lidt i den
> form du sendte mig, så du kan se hvordan "en simpel form" ser ud (håber
> ikke du har noget imod, at jeg poster det her, det så ikke "hemmeligt"
> ud):
> <form name="form1" >
> Firma: <input type="text" name="textfield" size="50"><br>
> Adresse: <input type="text" name="textfield2" size="50"><br>
> Postnr.: <input type="text" name="textfield3" size="10"><br>
> By: <input type="text" name="textfield4" size="32"><br>
> Telefon: <input type="text" name="textfield5"><br>
> </form>
> Herudaf ses at din <form> ikke har nogen action parameter og at dine
> felter er navngivet således at det kan forvirre en hver.
>
> Men spørgsmålet "hvad vil du så gerne kunne gøre med de enkelte
> søgefelter [...]?", er du ikke kommet nærmere ind på.
>
> Her er endnu et forsøg på noget kode (for at skyde mig ind på hvad du
> gerne vil, brænder tampen eller bliver det varmere eller kodere):
>
> --- kode - start ---
> <%
> firma = FormatSearchStr(Request("textfield"))
> adresse = FormatSearchStr(Request("textfield2"))
> postnr = FormatSearchStr(Request("textfield3"))
> bynavn = FormatSearchStr(Request("textfield4"))
> telefon = FormatSearchStr(Request("textfield5"))
>
> sql = ""
> sql = sql & "SELECT navn, adresse " & vbCrLf
> sql = sql & "FROM firmaer " & vbCrLf
> sql = sql & "WHERE firma LIKE " & firma & " " & vbCrLf
> sql = sql & "OR adresse LIKE " & adresse & " " & vbCrLf
> sql = sql & "OR postnr LIKE " & postnr & " " & vbCrLf
> sql = sql & "OR bynavn LIKE " & bynavn & " " & vbCrLf
> sql = sql & "OR telefon LIKE " & telefon & " " & vbCrLf
>
> Function FormatSearchStr(s)
> FormatSearchStr="'*" & Replace(Trim(s), "'", "''") & "*'"
> End Function
> %>
> --- kode - slut ---
>
> --
> Lauritz

---

Karsten Korsholm wrote:
>
> Hvis der på søgemaskinen udfyldes noget i firma, skal feltet
> firma søge i kolonnen firma ovre i databasen.
>
> Hvis der på søgemaskinen udfyldes noget i telefon, skal feltet
> firma søge i kolonnen telefon ovre i databasen.
>
> Og hvis der søges på alle felter, skal den selvfølgelig søge på
> alle felter over i databasen.

Jamen, det er da også det min kode gør?

--
Lauritz

---

"Lauritz Jensen" <lauritz2@hotmail.com> wrote in message
news:3A25820E.BC23AAC5@hotmail.com...
[Klip]
> FormatSearchStr="'*" & Replace(Trim(s), "'", "''") & "*'"
[Klip]

Du skal lige huske at tage højde for at man gerne skal kunne søge efter
karakterer som fx: [, ], &, _ og ?

MVH
Allan Ebdrup, 10-4

---

Allan Ebdrup wrote:
>
> "Lauritz Jensen" <lauritz2@hotmail.com> wrote in message
> news:3A25820E.BC23AAC5@hotmail.com...
> [Klip]
> > FormatSearchStr="'*" & Replace(Trim(s), "'", "''") & "*'"
> [Klip]
>
> Du skal lige huske at tage højde for at man gerne skal kunne søge efter
> karakterer som fx: [, ], &, _ og ?
>
> MVH
> Allan Ebdrup, 10-4

Ja, og "*" (hvis det da ikke skal opfattes som et wildcard), men det
efterlades, som en øvelse for læseren

--
Lauritz