14. august 2001 - 20:29
Der er
9 kommentarer og 2 løsninger
ASP og HTML-tabeller
Jeg har dette lille script: <% Dim objRec Set objRec = Server.CreateObject (\"ADODB.Recordset\") objRec.Open \"Select * from billeder WHERE sti=´lolland´\", \"dsn=billeder\" While Not objRec.EOF Response.Write \"<A HREF=/billeder/\" & objRec(\"sti\") & \"/\" & objRec(\"billedfil\") & \">\" & \"<IMG SRC=/billeder/\" & objRec(\"sti\") & \"/\" & \"tn\" & objRec(\"billedfil\") & \" \" & \"border=0\" & \">\" & \"</a>\" objRec.MoveNext wend objRec.Close Set ObjRec = Nothing %> Hvordan får jeg dataene til at stå i en tabel, med 3 kolonner. Eller et andet antal ?? Jeg har prøvet med at sætte <tr> og <td> ind som html i forespøgslen, men det virker ikke ?? Håber i kan hjælpe Niki
Annonceindlæg fra Computerworld
14. august 2001 - 20:54
#1
hvilke data vil du have som en tabel? jeg ser det, så laver du et anchor, der peger på et billede. hvad er det der skal deles op?
14. august 2001 - 21:28
#2
Det er en masse billeder i en access-database... DVS det er kun filnavnet... Det skal stå i en tabel på hjemmesiden... billede 1 Billede 2 Billede 3 Billede 4 Billede 5 Billede 6 etc
14. august 2001 - 21:36
#3
bikser noget sammen....
14. august 2001 - 21:46
#4
dether skulle virke: smider det op i en tabel med 3 kolonner <% Dim objRec, counter Set objRec = Server.CreateObject (\"ADODB.Recordset\") objRec.Open \"Select * from billeder WHERE sti=´lolland´\", \"dsn=billeder\" \'skriver table tag response.write(\"<table>\") response.write(\"<tr>\") counter = 0 While Not objRec.EOF \'skriver ny linie if counter = 3 then response.write(\"</tr>\") response.write(\"<tr>\") counter = 0 end if \'ny celle response.write(\"<td>\") Response.Write \"<A HREF=/billeder/\" & objRec(\"sti\") & \"/\" & objRec(\"billedfil\") & \">\" & \"<IMG SRC=/billeder/\" & objRec(\"sti\") & \"/\" & \"tn\" & objRec(\"billedfil\") & \" \" & \"border=0\" & \">\" & \"</a>\" response.write(\"</td>\") counter = counter + 1 objRec.MoveNext wend \'hvis der ikke er 3 celler i nederste række for i = counter to 2 response.write(\"<td> </td>\") next \'afslutter tabel tag response.write(\"</tr>\") response.write(\"</table>\") objRec.Close Set ObjRec = Nothing %>
14. august 2001 - 21:51
#5
Det virker super.... Der er bare et lille problem..... Det er 4 billeder i den første..., der passer counter jo ikke....
14. august 2001 - 22:05
#6
så udvider du bare scriptet så den laver fire kolonner i stedet. der hvor der skal ændres er: \'skriver ny linie if counter = 4 then response.write(\"</tr>\") response.write(\"<tr>\") counter = 0 end if og \'hvis der ikke er 4 celler i nederste række for i = counter to 3 response.write(\"<td> </td>\") next
14. august 2001 - 22:08
#7
Du misforstår mig.... I den første linie i tabellen, bliver der 4 billeder. \"count\" er jo fra starten 0. Inden den når 3 første gang, har den været igennem 4 gange
14. august 2001 - 22:13
#8
gør den det? det burde den ikke. første gennemløb: counter = 0 tjekker: counter = 3 nej laver en celle (første celle i samme række) counter++ andet gennemløb: counter = 1 tjekker: counter = 3 nej laver en celle (anden celle i samme række) counter++ tredje gennemløb: counter = 2 tjekker: counter = 3 nej laver en celle (tredje celle i samme række) counter++ fjerde gennemløb: counter = 3 tjekker: counter = 3 JA laver ny række i tabellen sætter counter = 0 laver en celle (første celle i samme række) counter++ osv...
14. august 2001 - 22:15
#9
jeg tror du har lavet en OBO fejl... \"Of By One\" error, som er typisk når man taler løkker. Jeg lavede en test af scriptet inden jeg smed det op, og det skulle virke efter hensigten...
14. august 2001 - 22:22
#10
Ups... My mistake.... Tak for hjælpen.. Det er kanon
14. august 2001 - 22:27
#11
så lidt.
Kurser inden for grundlæggende programmering