Grim Table

Hej alle..!

Jeg sider lige med en søger til min side, Er der ikke en der kan give mig nogle gode råd til hvordan jeg gør denne table pæner, jeg syndes den er grim,

><>><<<<>>Koden>>><<<<

' Skaber et recordset udfra SQL strengen
Set rs = myConn.Execute(strSQL)
If Not (rs.BOF Or rs.EOF) Then
    ' Hvis der er fundet poster på søgningen
    Response.Write "<p>Søgeresultat</p>"
    Response.Write "<table border=1>"
    Response.Write "<tr><th>Hjemmehold</th><th>Resultat</th><th>Udehold</th><th>Dato</th></tr>"
    Do While Not rs.EOF
        Response.Write "<tr><td><Center>" & rs("Hjemmehold") & "</Center></td>"
        Response.Write "<td><Center>" & rs("Resultat") & "</Center></td>"
        Response.Write "<td><Center>" & rs("Udehold") & "</Center></td>"
        Response.Write "<td><Center>" & rs("Dato") & "</Center></td></tr>"
        rs.MoveNext
    Loop
    Response.Write "</table>"
Else
    ' Hvis der ikke er fundet poster på søgningen
    Response.Write "<p>Der er ikke fundet noget på denne søgning</p>"
End If