Notifikationer

Markér alle som læst Log ud

mettecarsten Nybegynder

12. marts 2004 - 22:17 Der er 13 kommentarer og
1 løsning

Få kant om tabel, hvis felt i database f.eks. lig med 1

Hej eksperter

Jeg mangler en asp-kode til følgende situation.

På en side vises mange annoncer efter hinanden i en standardtabel, jf. kode:

<%
intpage = Request("page")

if isNumeric(intPage) = False or IntPage < 1 then
intpage = 1

end if
objrs.pagesize = 4
objrs.absolutePage = intpage
intpagecount = objrs.pagecount

intRecCount = objrs.pageSize
Do While not objrs.eof and intRecCount > 0

%>
<center>
<table border="0" cellpadding="0" cellspacing="0" width="400" height="34"> osv.

Jeg vil gerne have det sådan, at hvis feltet, "fedannonce" i accessdatabasens tabel "bruger", er = 0, så skal der ikke være en kant om tabellen, altså:

<table border="0" cellpadding="0" cellspacing="0" width="400" height="34">

Hvis feltet i stedet = 1, så skal tabellen have en tynd kant, altså:

<table border="0" cellpadding="0" cellspacing="0" width="400" height="34" style="border: 1 solid #000000">

Hvordan ser en sådan kode ud?

På forhånd tak

Synes godt om

eagleeye Praktikant

12. marts 2004 - 22:21 #1

Hvis du henter kolonnen fedannonce ud med din SQL sætninge kan du tilføje noget som dette:

if Int(objrs("fedannonce") = 0 then %>
<table border="0" cellpadding="0" cellspacing="0" width="400" height="34">
<% else %>
<table border="0" cellpadding="0" cellspacing="0" width="400" height="34" style="border: 1 solid #000000">
<% end if

Synes godt om

mettecarsten Nybegynder

12. marts 2004 - 22:39 #2

Hvis jeg sætter ovenstående ind efter "<center>", altså erstatter sidste linie i min tidligere indsatte kode, så får jeg blot at vide, at siden ikke kan vises. Da jeg først opdaterere, så sagde den noget med fejl - loop-fejl!

Synes godt om

eagleeye Praktikant

12. marts 2004 - 22:46 #3

Prøv at ændre:

%>
<center>
<table border="0" cellpadding="0" cellspacing="0" width="400" height="34">

Det til dette:

%>
<center>
<% if Int(objrs("fedannonce") = 0 then %>
<table border="0" cellpadding="0" cellspacing="0" width="400" height="34">
<% else %>
<table border="0" cellpadding="0" cellspacing="0" width="400" height="34" style="border: 1 solid #000000">
<% end if %>

Synes godt om

mettecarsten Nybegynder

12. marts 2004 - 22:57 #4

Så kommer den med denne fejlmelding:

Microsoft VBScript compilation error '800a03ee'

Expected ')'

/Sgef2.asp, line 453

if Int(objrs("Fedannonce") = 0 then
-------------------------------^

Synes godt om

eagleeye Praktikant

12. marts 2004 - 23:00 #5

hov ja der mangler en ) prøv lige at rette denne:

if Int(objrs("Fedannonce") = 0 then

Til denne:

if Int(objrs("Fedannonce")) = 0 then

Synes godt om

mettecarsten Nybegynder

12. marts 2004 - 23:08 #6

Så kom der desværre denne fejlmelding:

ADODB.Recordset error '800a0cc1'

Item cannot be found in the collection corresponding to the requested name or ordinal.

/Sgef2.asp, line 453

Jeg har lige tjekket, at "Fedannonce" er oprettet som tal og indsat i linien:

Sql = "Select id, foto, op, antalp, grundareal, vr, Beskr, ann, Overskrift, amt, uge, link, Ledigt, Fedannonce From hus2 where "

Synes godt om

eagleeye Praktikant

12. marts 2004 - 23:10 #7

ok, og det er den sql sætning som åbnes med objrs ?

Synes godt om

mettecarsten Nybegynder

12. marts 2004 - 23:13 #8

Umiddelbart ikke? Den indgår i følgende kode:

<%
fl = 0
if session ("fl2") = 1 Then
SQL = session("SQL")

Else
Sql = ""
Sql = "Select id, foto, op, antalp, grundareal, vr, Beskr, ann, Overskrift, amt, uge, link, Ledigt, Fedannonce From hus2 where "
if uge = "Uvæsentlig" Then
sql = sql
Else
osv.

Synes godt om

eagleeye Praktikant

12. marts 2004 - 23:16 #9

hmm er fedannonce en kolonne til en annonce eller hvordan??
Hvis kolonne ikke er i objrs så skal det være det recordset hvor kolonne så er der skal bruges i if sætningen.

Synes godt om

mettecarsten Nybegynder

12. marts 2004 - 23:21 #10

Det virker :-) Gik helt tilbage og prøvede igen og ikke kun opdaterede siden!

MANGE TAK FOR HJÆLPEN

Lav lige et svar, så jeg kan give pointene.

Synes godt om

eagleeye Praktikant

12. marts 2004 - 23:22 #11

ok :)) så laver jeg et svar.

Synes godt om

mettecarsten Nybegynder

12. marts 2004 - 23:24 #12

Pointene er sendt afsted :-)

Synes godt om

eagleeye Praktikant

12. marts 2004 - 23:28 #13

Næsten du skal huske at markere modtageren i listen af dem som har svaret inden du trykker accepter, også selvom der kun er en i listen :) Det er nyt i E4 pga. mange kom til at acceptere svar ved et uhed.

Synes godt om

mettecarsten Nybegynder

12. marts 2004 - 23:30 #14

Tak for hjælpen :-)

Synes godt om

Ny bruger Nybegynder

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.

Følg dette spørgsmål

Opret Preview

Programmeringssprog kurser

Kurser inden for grundlæggende programmering

Se alle Programmeringssprog kurser

Flere spørgsmål fra ASP kategorien

Titel	Indlæg	Oprettet	Seneste aktivitet
ASP classic kopiere database fil på server Af bsn i ASP	7	31/10/202610:20	01/11/202620:28
Persits.Upload Af bsn i ASP	9	17/09/202611:37	21/09/202615:15
Jeg bakser med noget Database og If Then med ASP - hvad gør jeg galt? Af Peer i ASP	10	25/06/202622:20	04/09/202602:30
Tjek alle checkbox i form Af bsn i ASP	4	18/05/202601:57	19/05/202613:33
Lost focus Af bsn i ASP	1	07/11/202415:34	01/01/202514:58

Se alle spørgsmål i kategorien Opret spørgsmål

Log ind eller opret profil

Hov!

For at kunne deltage på Computerworld Eksperten skal du være logget ind.

Det er heldigvis nemt at oprette en bruger: Det tager to minutter og du kan vælge at bruge enten e-mail, Facebook eller Google som login.

Du kan også logge ind via nedenstående tjenester

Alle kategorier på Eksperten

Seneste artiklerRSS