<%
Set Conn = Server.CreateObject("ADODB.Connection")
DSN = "DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=" & Server.MapPath ("/fpdb/krispro.mdb")
Conn.Open DSN
if request.querystring("zoom") <> "" then
Set rs = Conn.Execute("select * from teste where id = "&request.querystring("zoom"))
response.write "<table border='0' width='100%' id='zoom' cellspacing='0' cellpadding='0'>"
response.write "<tr><td height='227px' width='227px' colspan='5'><a href='java script:history.back(-1)'><img border='0' src='../grafik/02/referencer/"&rs("arstal")&"/"&rs("job")&".png' width='227px' height='227px' alt='' title='tilbage til oversigten..'></a></td></tr>"
response.write "<tr><td height='1px' width='227' colspan='5'></td></tr>"
t=1
If Not (rs.BOF Or rs.EOF) Then
do while not rs.eof
if (t+2)/3 = Round((t+2)/3) then Response.write "<tr>"
response.write "<td height='75px' width='75px'><img border='0' src='../grafik/02/billeder/"&rs("arstal")&"/"&rs("job")&"/"&rs("img"&t)&".png' width='75px' height='75px' alt='' title='"&rs("arstal")&": "&rs("titel")&" ["&rs("status")&".]'></td>"
if t/3 = Round(t/3) then Response.write "</tr>"
t = t + 1
rs.movenext
loop
if t/3 <> Round(t/3) then Response.write "</tr>"
end if
response.write "</table>"
else
Set rs = Conn.Execute("select * from teknisk order by id desc")
response.write "<table border='0' width='100%' id='teknisk' cellspacing='0' cellpadding='0'>"
t=1
If Not (rs.BOF Or rs.EOF) Then
do while not rs.eof
if (t+5)/6 = Round((t+5)/6) then Response.write "<tr>"
response.write "<td height='37px' width='1px'></td>"
response.write "<td height='37px' width='37px'><a href='?zoom="&rs("id")&"'><img style='cursor:hand;cursor:pointer' border='0' src='../grafik/02/referencer/"&rs("arstal")&"/small/"&rs("job")&".png' width='37px' height='37px' alt='' title='"&rs("arstal")&": "&rs("titel")&" ["&rs("status")&".]'></td>"
if t/6 = Round(t/6) then Response.write "<tr><td height='1px' width='227px' colspan='11'></td></tr></tr>"
t = t + 1
rs.movenext
loop
if t/6 <> Round(t/6) then Response.write "<tr><td height='1px' width='227px' colspan='11'></td></tr></tr>"
end if
response.write "</table>"
end if
%>
dette her er min ide;
En liste med de job jeg har være med til vises i form af små billeder 6 i bredde og maks 12 i højden (virker helt fint!) når der så klikkes på et af disse små billeder er det meningen at det skal blive stort og fylde 6 x 6 små felter i toppen (227x227px) og nedenunder her skal der så vises 9 billeder á 75x75px fra det pågældende job.
?zoom= id fra db'en
For at undgå at der vises dette irrerterende hvide billede med et lille kryds i hjørnet ville jeg gennemgå felterne i databasen og vis dette er tomt skal der ikke vises noget lille billede (75x75) men rækken/tabellen skal blot afsluttes ligesom med den store liste (inden ?zoom)
forskellen er at ved den store liste løbes db-tabellen igennem og når der 'zoomes' er der ikke noget at løbe igennem fordi der kun skal trækkes fra den db-række hvor id = ?zoom=værdi'en
min db-tabel er bygget sådan op - en række i db-tabellen begynder med:
- id
- job
- titel
- status
- img1
- img2
- img3
- img4
- img5
- img6
- img7
- img8
- img9
dvs. når jeg 'zoom'er' skal jeg ikke til næste række (rs.movenext) men (hvis det kan lade sig gøre) hoppe videre i samme række.
håber det er til at forstå?
