---

Hej Gruppe

Jeg har en loop jeg stater sådan her:

<%
intPage = Request.QueryString("page")
If IsNumeric(intPage) Then
intPage = CLng(intPage)
If intPage < 1 Then intPage = 1
Else
intPage = 1
End If %>

'Henter værdien fra soeg.htm & åbner DB

strKeyword = Trim(Request.Form("Keyword"))
Set objRs5 = Server.CreateObject("ADODB.RecordSet")
strSQL5 = "SELECT * FROM under_varegruppe WHERE"
strSQL5 = strSQL5 & " (menu_body_short LIKE '%" & strKeyword & "%')"
strSQL5 = strSQL5 & " OR (menu_body_over LIKE '%" & strKeyword & "%')"
strSQL5 = strSQL5 & " OR (menu_short LIKE '%" & strKeyword & "%')"
strDSN = "DRIVER={Microsoft Access Driver (*.mdb)};DBQ="&Server.MapPath
("XXX.mdb")
objRs5.Open strSQL5, strDSN,1


Jeg prøver så her med :

if objRs5 <>"" or IsNull then
Response.Write("Ingen søgeresultater")
else

If Not (objRs5.BOF Or objRs5.EOF) Then
objRs5.PageSize =6
objRs5.AbsolutePage = intPage
intRecCount = objRs5.PageSize
intPageCount = objRs5.PageCount

if objRs5.PageCount = 1 then
Response.Write "&nbsp;"
else

For intNum = 1 To intPageCount
Response.Write "<a href=default.asp?page=" & intNum & "&vare_id="
&objRs5("vare_id")&" class='varemenu' >" & intNum & "</a> "
Response.Write "&nbsp;"

Next

End If

Dette er en søge funktion hvor når der ikke er fundet nogen på det
man søgte skal den skrive Ingen søgeresultater!
Men hele mit design skalerer ?

http://test.webex.dk/allan/shop/default.asp

Lav en søgning så skal du se ;)

Håber nogen kan hjælpe ;)

---

On Tue, 25 Nov 2008 07:46:55 -0800 (PST),
multi-sitemaster-cms@hotmail.com wrote:

>'Henter værdien fra soeg.htm & åbner DB
>
>strKeyword = Trim(Request.Form("Keyword"))

strKeyword = Trim("" & Request.Form("Keyword"))

<snip>

>Jeg prøver så her med :
>
>if objRs5 <>"" or IsNull then

Du kan ikke sammenligne et objekt med en streng.

>Response.Write("Ingen søgeresultater")
>else

Fjern If'en over denne 'else' og skriv i stedet:

If (objRs5.BOF Or objRs5.EOF) Then
Response.Write("Ingen søgeresultater")
Else
> objRs5.PageSize =6
> objRs5.AbsolutePage = intPage
.... osv.

Jeg har ikke checket siden.

Good luck!

--
Jørn Andersen,
Brønshøj

---

On 25 Nov., 15:56, Jørn Andersen <j...@jorna.dk> wrote:
> On Tue, 25 Nov 2008 07:46:55 -0800 (PST),
>
> multi-sitemaster-...@hotmail.com wrote:
> >'Henter værdien fra soeg.htm & åbner DB
>
> >strKeyword = Trim(Request.Form("Keyword"))
>
> strKeyword = Trim("" & Request.Form("Keyword"))
>
> <snip>
>
> >Jeg prøver så her med :
>
> >if objRs5 <>"" or IsNull then
>
> Du kan ikke sammenligne et objekt med en streng.
>
> >Response.Write("Ingen søgeresultater")
> >else
>
> Fjern If'en over denne 'else' og skriv i stedet:
>
> If (objRs5.BOF Or objRs5.EOF) Then
>  Response.Write("Ingen søgeresultater")
> Else>  objRs5.PageSize =6
> >  objRs5.AbsolutePage = intPage
>
Hmm det virker til dels men ikke helt
Den skalere stadig siden ....?
>
> Jeg har ikke checket siden.
Du skulle næste lige kikke så:)


Allan

---

On Tue, 25 Nov 2008 08:20:31 -0800 (PST),
multi-sitemaster-cms@hotmail.com wrote:

>Hmm det virker til dels men ikke helt

Du har da fået ASP-fejlen væk

>Den skalere stadig siden ....?
>>
>> Jeg har ikke checket siden.
>Du skulle næste lige kikke så:)

Jeg kan gdt se, at den smadrer siden, men det er nok et
HTML/CSS-problem.

Prøv at validere, så vil du fx se, at du bruger samme id flere gange (id
må kun bruges én gang pr. side - brug class, hvis den skal genbruges) +
at der er uafsluttet div m.v.

Hvis du vil validere siden med søgeresultat, så kopiér evt.
HTML-kildekoden over i et separat .htm-dokument og validér herfra.


Mvh. Jørn

--
Jørn Andersen,
Brønshøj

---

On 25 Nov., 16:33, Jørn Andersen <j...@jorna.dk> wrote:
> On Tue, 25 Nov 2008 08:20:31 -0800 (PST),
>
> multi-sitemaster-...@hotmail.com wrote:
> >Hmm det virker til dels men ikke helt
>
> Du har da fået ASP-fejlen væk
>
> >Den skalere stadig siden ....?
Yes ;)
> Prøv at validere, så vil du fx se, at du bruger samme id flere gange (id
> må kun bruges én gang pr. side - brug class, hvis den skal genbruges) +
> at der er uafsluttet div m.v.
>
> Hvis du vil validere siden med søgeresultat, så kopiér evt.
> HTML-kildekoden over i et separat .htm-dokument og validér herfra.

hmm undre mig så bae over den virker når der findes et produkt ;)

---

On Tue, 25 Nov 2008 10:12:25 -0800 (PST),
multi-sitemaster-cms@hotmail.com wrote:

>hmm undre mig så bae over den virker når der findes et produkt ;)

Når der ingen resultater er:
------
<div style="width:90%; text-align:right;" >Ingen søgeresultater

</div>
</div>
</div>
------

Når der ér resultater:

------
<div style="width:90%; text-align:right;" ><a
href=default.asp?page=1&vare_id=1 class='varemenu' >1</a> &nbsp;<a
href=default.asp?page=2&vare_id=1 class='varemenu' >2</a> &nbsp;
</div>
<p>[Fjernet varer]

</div>
</div>
</div>
------

Med andre ord: Du mangler at afslutte en div, når der ikke er
resultater.

Et hint til at gøre det lettere at fejlsøge i HTML'en er at bruge:
.... & vbcrlf
eller
.... & vbcrlf & vbcrlf

til at skabe linieskift.

Jeg plejer at spørge mig selv: Hvordan ville jeg skrive HTML'en, hvis
jeg skrev den i hånden? Der er så ingen grund til at den er ringere, når
den er skrevet med ASP.
Det tager lidt tid i starten lige at få det pudset af, men dels er det
en tid, der hurtigt tjener sig, ind, når man får HTML-fejl. Dels skriver
man det snart helt automatisk, når man laver sin ASP-kode.


Mvh. Jørn

--
Jørn Andersen,
Brønshøj

---

> Jeg kan gdt se, at den smadrer siden, men det er nok et
> HTML/CSS-problem.
>
> Prøv at validere, så vil du fx se, at du bruger samme id flere gange (id
> må kun bruges én gang pr. side - brug class, hvis den skal genbruges) +
> at der er uafsluttet div m.v.


Mrn nu hvor jeg tænker mig om har jeg nok brugt det samme ID så der
ligger fejlen


Roder lidt videre og vender tilbage ;)

Endnu engang tak ;)