Point til netsrac

http://www.eksperten.dk/spm/190632

Som tak for hjælpen, får du 60 point, når du har hjulpet mig med denne her:

Hvordan tildeler jeg de tre kolonner en given bredde i %? Jeg har haft STORE problemer.

<%
Set Conn = Server.CreateObject("ADODB.Connection")
dbConn = "SERVER=Local;DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=" & Server.MapPath("/fpdb/include.mdb")
Conn.open dbConn

SQL = "SELECT TOP 25 * FROM debat ORDER BY emneID DESC"
Set RS = Conn.Execute( SQL )

response.write "<tr><td valign=""top""><span class=""tekst11""><b>" & "Forfatter" & "</b></span></td>"
response.write "<td valign=""top""><span class=""tekst11""><b>" & "Artiklens navn" & "</b></span></td>"
response.write "<td valign=""top""><span class=""tekst11""><b>" & "Lagt på" & "</b></span></td></tr>"

%>
<tr>
<td colspan="3">
<table border="0" cellpadding="0" cellspacing="0" width="100%">
<tr><td height="1" bgcolor="AF0000"><img src="/images/1x1.gif"></td></tr>
</table>
</td>
</tr>
<%

while NOT RS.EOF
tidspunkt = addZ(day(RS("tid"))) & "-" & addZ(month(RS("tid"))) & "-" & year(RS("tid")) & " " & addZ(hour(RS("tid"))) & ":" & addZ(minute(RS("tid")))

response.write "<tr><td valign=""top""><span class=""tekst11"">" &  RS("nick") & ":" & "</span></td>"
    response.write "<td valign=""top""><span class=""tekst11""><a href=""debatemne.asp?emneID=" & RS("emneID") & """>" & RS("emne") & "</a></span></td>"
    response.write "<td valign=""top""><span class=""tekst11""><nobr>" & tidspunkt & "</nobr></span></td></tr>"
RS.MoveNext
text=""
wend

%>
<tr>
<td colspan="3">
<table border="0" cellpadding="0" cellspacing="0" width="100%">
<tr><td height="1" bgcolor="AF0000"><img src="/images/1x1.gif"></td></tr>
</table>
</td>
</tr>
<%

RS.Close
Set RS = nothing
Conn.Close
Set Conn = nothing
%>