Simpelt - og dog ikke HASTER

Jeg har en lille opgave, som jeg har fået en del hjælp til, men som bare ikke VIL lykkes:

Jeg skal have listet en lang række af video-film. Denne liste skal være en tabel bestående af 3 kolonner, og en masse rækker.

I kolonne 1 skal der være et billede.
I kolonne 2 skal der være en tekst, som jeg indtaster.
I kolonne 3 skal der være input-boks og en submit-knap.

I kolonne tre skal man kunne indtaste sit navn og reservere filmen.

Hvis der er en bruger, der har gjort det, skal input-boks og submit-knap forsvinde, og der skal så i stedet stå "Yvonne har reserveret denne film".

Altså: Yvonne vil gerne reservere film nr. 3. Hun indtaster sit navn i input-boksen ud for film nr. 3 og trykker på submit-knappen "Reserver filmen".

Når hun har gjort det, skal input-feltet og submit-knappen være erstattet af "Yvonne har reserveret denne film" ud for film nr. 3.

Det er sådan set det hele. Jeg HAR fået hjælp til det, og det virker nu. Mit problem er bare, at jeg ikke kan få sat det ordentligt op.

For lige at illustrere hvad jeg mener, kan du prøve at se på dette her:

<div align="center">
    <center>
    <table border="0" cellpadding="4" cellspacing="0" width="755">
        <tr>
            <td align="center" width="33%" valign="top">AceVentura.jpg</td>
            <td width="34%" valign="top">En masse tekst (præsentation af
                filmen)</td>
            <td width="33%" valign="top">Indtast dit navn:<br>
                <form method="POST" action="default.asp">
                    <p><input type="text" name="T1" size="20"></p>
                    <p><input type="submit" value="Reserver filmen" name="B1"></p>
                </form>
            </td>
        </tr>
        <tr>
            <td align="center" width="33%" valign="top">BraveHeart.jpg</td>
            <td width="34%" valign="top">En masse tekst (præsentation af
                filmen)</td>
            <td width="33%" valign="top">Indtast dit navn:<br>
                <form method="POST" action="default.asp">
                    <p><input type="text" name="T1" size="20"></p>
                    <p><input type="submit" value="Reserver filmen" name="B1"></p>
                </form>
            </td>
        </tr>
        <tr>
            <td align="center" width="33%" valign="top">Gladiator.jpg</td>
            <td width="34%" valign="top">En masse tekst (præsentation af filmen)</td>
            <td width="33%" valign="top">Indtast dit navn:<br>
                <form method="POST" action="default.asp">
                    <p><input type="text" name="T1" size="20"></p>
                    <p><input type="submit" value="Reserver filmen" name="B1"></p>
                </form>
            </td>
        </tr>
    </table>
    </center>
</div>

Jeg håber det er til at forstå. Ellers kan du se på

http://www.eksperten.dk/spm/209416
http://www.eksperten.dk/spm/214438

Jeg har allerede afleveret 160 point for opgaven, så jeg må kun aflevere 40 point. Jeg håber der er en, der kan hjælpe. Det haster lidt nu, håber jeg kan have det klart inden middag i morgen.

For en sikkerheds skyld kan du få koden her, og den virker. Men jeg kan ikke få det til at passe. Du bør måske også kigge på det sidste stykke kode i det sidste spørgsmål. Dette her har jeg rettet en smule til, men det blev som sagt ikke godt.

<html>

<!--#include virtual="/includes/inc_header.asp"-->

<body>

<%
If Request.Form("T1") > "" Then
Set Conn = Server.CreateObject("ADODB.Connection")
DSN = "DRIVER={Microsoft Access Driver (*.mdb)}; "
DSN = DSN & "DBQ=" & Server.MapPath("/fpdb/film.mdb")
Conn.Open DSN

Navnet = Request.Form("T1")
V1 = 1

strSQL = "Update film SET Navn = '" & Navnet & "', Reserveret = '" & V1 & "' Where produkt='Braveheart';"
Conn.Execute(strSQL)

Conn.Close
Set Conn = Nothing
End If
%>

<p>&nbsp;</p>
<p align="center"><span class="overskrift17">Lidt til en gråvejrs-weekend</span></p>
<p align="center">&nbsp;</p>
<div align="center">
  <center>
  <table border="0" cellpadding="0" cellspacing="0" width="755">
    <tr>
      <td valign="top">
        <div align="center">
          <table border="0" cellpadding="4" cellspacing="0" width="755%" class="tekst11">
            <tr>
              <td width="240">
                <p align="center"><img border="0" src="/film/AceVentura.jpg"></td>
            </tr>
            <tr>
              <td width="100%">
                <p align="center">Jim Carrey i<br>
                <b>
                ACE VENTURA<br>
                Når Naturen kalder</b></td>
            </tr>
          </table>
        </div>
      </td>
      <td valign="top" width="509">

<%
Set Conn = Server.CreateObject("ADODB.Connection")
DSN = "DRIVER={Microsoft Access Driver (*.mdb)}; "
DSN = DSN & "DBQ=" & Server.MapPath("/fpdb/film.mdb")
Conn.Open DSN

Sql = "Select * From film Where Produkt = 'AceVentura'"
Set rs = Conn.Execute(SQL)
If Not rs.EOF Then
'laver de 2 strenge med vores info på (til AceVentura filmen)
Bruger = rs("navn")
reserveret = rs("reserveret")
End If

Sql = "Select * From film Where Produkt = 'Armagedon'"
Set rs = Conn.Execute(SQL)
If Not (rs.BOF Or rs.EOF) Then
'laver de 2 strenge med vores info på (til Armagedon filmen)
Bruger2 = rs("navn")
reserveret2 = rs("reserveret")
End If

Sql = "Select * From film Where Produkt = 'BodyGuard'"
Set rs = Conn.Execute(SQL)
If Not (rs.BOF Or rs.EOF) Then
'laver de 2 strenge med vores info på (til BodyGuard filmen)
Bruger2 = rs("navn")
reserveret2 = rs("reserveret")
End If

Sql = "Select * From film Where Produkt = 'Braveheart'"
Set rs = Conn.Execute(SQL)
If Not (rs.BOF Or rs.EOF) Then
'laver de 2 strenge med vores info på (til Braveheart filmen)
Bruger2 = rs("navn")
reserveret2 = rs("reserveret")
End If

Sql = "Select * From film Where Produkt = 'DenSjetteSans'"
Set rs = Conn.Execute(SQL)
If Not (rs.BOF Or rs.EOF) Then
'laver de 2 strenge med vores info på (til DenSjetteSans filmen)
Bruger2 = rs("navn")
reserveret2 = rs("reserveret")
End If

Sql = "Select * From film Where Produkt = 'Gladiator'"
Set rs = Conn.Execute(SQL)
If Not (rs.BOF Or rs.EOF) Then
'laver de 2 strenge med vores info på (til Gladiator filmen)
Bruger2 = rs("navn")
reserveret2 = rs("reserveret")
End If

If reserveret = True  AND reserveret2 = True Then
Response.Write "<table border=0 cellpadding=4 cellspacing=0 width='100%'><tr><td width=250 valign=top></td><td width=250 valign=top>Hvem vil købe filmen?</td><td width=255 valign=top><span class='tekst11'>" & Bruger & " har reserveret denne film.</span></td></tr>"
Response.Write "<tr><td width=250 valign=top><p align=center><img border=0 src='/film/Armagedon.jpg' width=200 height=343></td><td width=250 valign=top>Jim Carrey som Ace Ventura</td><td width=255 valign=top>" & Bruger2 & " har reserveret denne film.</td></tr></table>"

Elseif reserveret = True AND reserveret2 = False Then
Response.Write "<table border=0 cellpadding=4 cellspacing=0 width='100%' class='tekst11'><tr><td width=250 valign=top></td><td width=250 valign=top>Hvem vil købe filmen?</td><td width=255 valign=top>" & Bruger & " har reserveret denne film.</td></tr>"
Response.Write "<tr><td width=250 valign=top><p align=center><img border=0 src='/film/Gladiator.jpg' width=200 height=343></td><td width=250 valign=top>Jim Carrey som Ace Ventura</td><td width=255 valign=top><form method=POST action='default.asp'><p>Indtast dit navn:</p><p><input type=text name=T1 size=20></p><p><input type=submit value='Reserver filmen' name='B1'></p></form></td></tr></table>"

Elseif reserveret = False AND reserveret2 = True Then
Response.Write "<table border=0 cellpadding=4 cellspacing=0 width='100%' class='input'><tr><td width=250 valign=top><p align=center></td><td width=250 valign=top><span class=tekst11>Hvem vil købe filmen?</span></td><td width=255 valign=top><form method=POST action='default.asp'><p><span class='tekst11'>Indtast dit navn:</span></p><p><input type=text name=T1 size='20' class='input'></p><p><input type=submit value='Reserver filmen' name='B1' class='input'></p></form></td></tr><tr><td width=250 valign=top><p align=center><img border=0 src='/film/Gladiator.jpg' width=200 height=343></td>"
Response.Write "<td width=250 valign=top>En masse tekst</td><td width=255 valign=top><span class='tekst11'>" & Bruger2 & " har reserveret denne film.</span></td></tr></table>"

Else
Response.Write "<table border=0 cellpadding=4 cellspacing=0 width='100%'><tr><td width=250 valign=top><p align=center></td><td width=250 valign=top><span class='tekst11'>Jim Carrey som Ace Ventura</span></td><td width=255 valign=top><form method=POST action='default.asp'><p><span class='tekst11'>Indtast dit navn:</span></p><p><input type=text name=T1 size=20 class='input'></p><p><input type=submit value='Reserver filmen' name=B1 class='input'></p></form></td></tr><tr><td width=250 valign=top><p align=center><img border=0 src='/film/Gladiator.jpg' width=200 height=343></td><td width=250 valign=top><span class='tekst11'>En masse tekst</span></td><td width=255 valign=top><form method=POST action='default.asp'><p><span class=tekst11>Indtast dit navn:</span></p><p><input type=text name=T1 size=20 class=input></p><p><input type=submit value='Reserver filmen' name=B1 class='input'></p></form></td></tr></table>"
End If

rs.Close
Conn.Close
Set Conn = Nothing
%>
        </td>
    </table>
</body>
</html>