Avatar billede ecoder Nybegynder
08. august 2002 - 12:02 Der er 13 kommentarer og
1 løsning

Med counter, men hvordan kan man ellers lave det???? 100 point

Hej med jer.........jeg har en stump kode her, hvor jeg trækker billeder ud fra min DB. Jeg har sat en counter på, sådan at når der er genereret 3 <tr> så skal den starte forfra. Nu er mit problem så at jeg har tilføjet et felt i min DB, således at der skal stå lidt text under hver billed. Som også skal være et link. Jeg kan ikke hitte ud af det. Kan en jer, og måske på en anden måde????? :-)

Takker mange gange, og den der laver det mest cool for 100 points.... 

<%
            Set oRS = Server.CreateObject("ADODB.Recordset")
            strSQL = "SELECT * FROM Produkt_foto "
            oRS.Open strSQL, oConn
           
            oRS.MoveFirst
            Response.Write"<table align='center' cellpadding='20' cellspacing='5' border='0'>"
            count = 1
            Do While NOT oRS.EOF
            If count = 4 Then
                    count = 1
                    Response.Write"<tr>"
                End if
                    Response.Write"<td id='tdblank' valign='middle'><a href=index.asp?ID=" & oRS.fields("ID") & ">" & "<img src='" & oRS.fields("Foto") & "'>" & "</a></td>"
                If count = 3 Then
                    Response.Write"</tr>"
                End if
                count = count+1
                oRS.MoveNext
            Loop
            Response.Write"</table>"
           
            oRS.Close
            Set oRS = Nothing
        %>
Avatar billede medions Nybegynder
08. august 2002 - 12:06 #1
Du er her : Eksperten : Programmering : Script : ASP : Med counter, men hvordan kan man ellers lave det???? 100 point :

Sidste nyt fra Eksperten : Søgningen virker igen
Søgningen virker igen, men vælger man "vis uddrag" ser resultatet lidt underligt ud. Dette skyldes at uddragsdatabasens komprimation ikke er kompatibel med den nye installation. Jeg har sat htdig igan... læs mere



Med counter, men hvordan kan man ellers lave det???? 100 point    100 point fra ecoder
Hej med jer.........jeg har en stump kode her, hvor jeg trækker billeder ud fra min DB. Jeg har sat en counter på, sådan at når der er genereret 3 <tr> så skal den starte forfra. Nu er mit problem så at jeg har tilføjet et felt i min DB, således at der skal stå lidt text under hver billed. Som også skal være et link. Jeg kan ikke hitte ud af det. Kan en jer, og måske på en anden måde????? :-)

Takker mange gange, og den der laver det mest cool for 100 points.... 

<%
            Set oRS = Server.CreateObject("ADODB.Recordset")
            strSQL = "SELECT * FROM Produkt_foto "
            oRS.Open strSQL, oConn
           
            oRS.MoveFirst
            Response.Write"<table align='center' cellpadding='20' cellspacing='5' border='0'>"
            count = 1
            Do While NOT oRS.EOF
            If count = 4 Then
                    count = 1
                    Response.Write"<tr>"
                End if
                    Response.Write"<td id='tdblank' valign='middle'><a href=index.asp?ID=" & oRS.fields("ID") & ">" & "<img src='" & oRS.fields("Foto") & "'>" & oRS.Fields("tekst").value & "</a></td>"
                If count = 3 Then
                    Response.Write"</tr>"
                End if
                count = count+1
                oRS.MoveNext
            Loop
            Response.Write"</table>"
           
            oRS.Close
            Set oRS = Nothing
        %>

nu ved jeg ikke hvad dit felt i databasen hedder som indeholder teksten.. men i dette tilfælde har jeg bare kaldt din kolonne for "tekst"...

//>Rune
Avatar billede bocker Nybegynder
08. august 2002 - 12:06 #2
Mener du ikke 3 <td> tags?

Anyway, du kan gøre det sådan her:

while not oRS.EOF

wend
Avatar billede bocker Nybegynder
08. august 2002 - 12:06 #3
hov hehe... kommer lige mere ;)
Avatar billede bocker Nybegynder
08. august 2002 - 12:11 #4
count = 1

Response.Write("<tr>")

while not oRS.EOF
  if count mod 3 then Response.Write("</tr><tr>") & vbCrLf
 
  Response.Write("<td id=""tdblank"" valign=""middle""><a href=""index.asp?ID=" & oRS.fields("ID") & """>" & "<img src=""" & oRS.fields("Foto") & """ border=""0"">" & oRS.fields("tekst") & "</a></td>") & vbCrLf
 
  count = count + 1
  oRS.MoveNext
wend
Avatar billede bocker Nybegynder
08. august 2002 - 12:13 #5
if count mod 3 = 0 then

skal du lige rette i det jeg skrev
Avatar billede ecoder Nybegynder
08. august 2002 - 12:32 #6
Okay...........cool bocker takker!

Men det er i den samme <td> det hele.

Det recordset der hedder text skulle nemlig stå under hvert billed?

Plus hvad gør vbCrLf???
Avatar billede bocker Nybegynder
08. august 2002 - 12:43 #7
Laver et linjeskift i din source...
Avatar billede ecoder Nybegynder
08. august 2002 - 13:00 #8
Aaarrgghhhh nu siger den:

Error Type:
Microsoft VBScript compilation (0x800A0400)
Expected statement
/New_dktele/ssi/produkter.asp, line 15
Wend

Hehehe,- linjeskift hvordan det.........bare et <br>

Sådan:

count = 1
            Response.Write("<tr>")
            While NOT oRS.EOF
                  If count MOD 3 = 0 Then
                    Response.Write("</tr><tr>") & vbCrLf
                      Response.Write("<td id=""tdblank"" valign=""middle""><a href=""index.asp?ID=" & oRS.fields("ID") & """>" & "<img src=""" & oRS.fields("Foto") & """ border=""0"">" & "<br>" & oRS.fields("Beskrivelse") & "</a></td>") & vbCrLf
                      count = count + 1
                  oRS.MoveNext
            Wend
            Response.Write("</table>")
Avatar billede ecoder Nybegynder
08. august 2002 - 13:41 #9
bocker,- er du flink og hjælpe????? Jeg vil gerne være færdig med det her, har nemlig siddet længe med det. :-(
Avatar billede ecoder Nybegynder
08. august 2002 - 13:42 #10
så giver jeg dig points bagefter............
Avatar billede bocker Nybegynder
08. august 2002 - 14:54 #11
Skulle jeg svare eller hva? :)
Avatar billede ecoder Nybegynder
08. august 2002 - 14:57 #12
Yes.........men også lige hurtigt på dette her.

Det er den sidste for i dag,- ;-)

Der er 13 billeder i alt, og i den første <tr> viser den 2 billeder og i den anden og tredje <tr> viser den 3 (som den skal), og i den fjerde <tr> viser den igen 2 billeder. Hvorfor starter den ikke med at vise 3 billeder i de første 3 <tr> og ét billed i den sidste <tr>??????? :-(
Avatar billede bocker Nybegynder
08. august 2002 - 15:00 #13
ah sæt count til 0 i stedet for 1 fra starten af
Avatar billede ecoder Nybegynder
08. august 2002 - 15:03 #14
Yes..........du rykker for vildt!

Here you go'

Hygge
Avatar billede 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.

Loading billede Opret Preview
Kategori
Kurser inden for grundlæggende programmering

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